wellington1993

uses
  System.SysUtils, Data.DBXJSON, IdHTTP, IdSSLOpenSSL;

procedure SendJSON(const AURL: string);
var
  JSONObject, ImageObject, ThumbnailObject: TJSONObject;
  IdHTTP: TIdHTTP;
  SSLHandler: TIdSSLIOHandlerSocketOpenSSL;
  JSONStream: TStringStream;
  Response: string;

wellington1993

uses
  SysUtils, IniFiles, Classes, ShellAPI, Windows, RegularExpressions, Dialogs, System.Threading, IBX.IBServices, IBX.IBUtils;

type
  TDatabaseConfig = record
    Server: string;
    Port: string;
    DatabasePath: string;
    UserName: string;
    Password: string;

wellington1993

namespace :cleanup do
  desc "Cleanup old versions and keep only the last year of data / Limpeza de versões antigas e manter apenas os dados do último ano"
  task versions: :environment do
    require 'benchmark'

    class Version < ApplicationRecord
      self.table_name = 'versions'
    end

    class TempVersion < ApplicationRecord

wellington1993

<?php

$date = new DateTime();
$tempo = $date->getTimestamp();

$my_file = "/tmp/output-$tempo.html";
$handle = fopen($my_file, 'w');

ob_start();
echo '<pre>';

wellington1993

[1099855:0806/101240.304397:ERROR:object_proxy.cc(623)] Failed to call method: org.freedesktop.NetworkManager.GetDevices: object_path= /org/freedesktop/NetworkManager: org.freedesktop.DBus.Error.AccessDenied: An AppArmor policy prevents this sender from sending this message to this recipient; type="method_call", sender=":1.13768" (uid=1000 pid=1099855 comm="/snap/skype/354/usr/share/skypeforlinux/skypeforli" label="snap.skype.skype (enforce)") interface="org.freedesktop.NetworkManager" member="GetDevices" error name="(unset)" requested_reply="0" destination="org.freedesktop.NetworkManager" (uid=0 pid=2426 comm="/usr/sbin/NetworkManager --no-daemon" label="unconfined")

ioctl failed for wlan0, errno = 19 (No such device)

SHM_CHROMIUM_WRAP: [unlink post-call] redirected_path=/dev/shm/snap.skype.shm-1100161-1-flags ret=0x0
SHM_CHROMIUM_WRAP: [unlink pre-call] redirected_path=/dev/shm/snap.skype.shm-1100161-1 (from path=/dev/shm/shm-1100161-1)
SHM_CHROMIUM_WRAP: [unlink post-call] redirected_path=/dev/shm/snap.s

wellington1993

#!/bin/bash

# Script to compress PDF files, be carefull with signed docs
# Original Size: 241M
# output.pdf

# Reduce PDF Size using QPDF
# new size: 217M
qpdf --compress-streams=y --object-streams=generate output.pdf output-qpdf.pdf

wellington1993

Organizar: https://appsource.microsoft.com/pt-br/marketplace/partner-dir?filter=services%3DLicensing%3Bsort%3D0%3BpageSize%3D18%3BonlyThisCountry%3Dtrue%3Blat%3D-23.4231203%3Blng%3D-51.926358%3Bcountry%3DBR%3Bradius%3D100%3Blocname%3DRua%2520Santos%2520Dumont%252C%25201321%252C%2520Zona%252003%252C%2520Maring%25C3%25A1%2520-%2520Paran%25C3%25A1%252C%252087050-100%252C%2520Brazil%3BlocationNotRequired%3Dtrue


Creativity Tecnologia Ltda
https://appsource.microsoft.com/pt-br/marketplace/partner-dir/28948bee-120a-40aa-b126-f1ac96601cca/overview/contact
https://creativity.eti.br/#licencas
https://api.whatsapp.com/send/?phone=554399859157&text&type=phone_number&app_absent=0

Becker Consultoria e Comércio EIRELI EPP
https://appsource.microsoft.com/pt-br/marketplace/partner-dir/068a8d39-f726-4df6-92c2-896008f7c1f3/overview

wellington1993

uses
  SysUtils, Classes, ShellApi, Windows, IBDatabase, IBSQL;

const
  CAMINHO_BANCO_ORIGEM = 'caminho_do_banco_origem.fdb';
  USUARIO_ORIGEM = 'usuario_origem';
  SENHA_ORIGEM = 'senha_origem';
  CAMINHO_BANCO_DESTINO = 'caminho_do_novo_banco_de_dados.fdb';
  USUARIO_DESTINO = 'usuario_destino';
  SENHA_DESTINO = 'senha_destino';

wellington1993

uses
  IdHTTP, IdSSLOpenSSL, IdGlobal, System.Classes;

function CreateIdHTTPComponent(AOwner: TComponent = nil; const Url: string = ''): TIdHTTP;
var
  SSLio: TIdSSLIOHandlerSocketOpenSSL;
begin
  // Cria o componente TIdHTTP com o Owner especificado
  Result := TIdHTTP.Create(AOwner);
  Result.HandleRedirects := true;

wellington1993

<?php

// Criar uma função para imprimir os dados de uma variável
function print_data($var, $label = null) {
  echo "\xA" . '---------' . "\xA";
  if ($label) {
    echo $label . "\xA";
  }
  var_dump($var); // Usar var_dump em vez de print_r para mostrar mais detalhes
}