Jump to content

PauloBarbosa

Membros
  • Contagem de Conteúdo

    18
  • Ingressou

  • Última visita

  • Dias Ganhos

    1

PauloBarbosa ganhou o dia em Julho 30 2023

PauloBarbosa teve o conteúdo mais curtido!

Clientes & Parceiros

  • Você é um cliente TecnoSpeed?
    Não
  • Você é um parceiro da Casa do Desenvolvedor?
    Não

Visitantes Recentes do Perfil

52 visualizações do perfil

Conquistas de PauloBarbosa

4

Reputação na Comunidade

  1. Olá! Já tentou deixar a porta 587 e retirar as configurações de socketFactory?
  2. Olá! Veja se resolve seu problema... Sub DeleteOldLines() Dim ws As Worksheet Dim lastRow As Long Dim currentDate As Date Dim sixMonthsAgo As Date Dim i As Long ' Defina a planilha de trabalho Set ws = ThisWorkbook.Sheets("Dados") ' Defina a data atual currentDate = Date ' Calcule a data seis meses atrás sixMonthsAgo = DateAdd("m", -6, currentDate) ' Determine a última linha preenchida na coluna G lastRow = ws.Cells(ws.Rows.Count, "G").End(xlUp).Row ' Loop através das linhas da coluna G a partir da segunda linha For i = lastRow To 2 Step -1 If ws.Cells(i, "G").Value < sixMonthsAgo Then ' Se a data for anterior aos últimos seis meses, exclua a linha ws.Rows(i).Delete End If Next i End Sub Lembre-se de testar antes de colocar realmente no seu arquivo principal.
  3. Olá! No site da w3schools tem exemplos ótimos e simples de entender... Segue abaixo um exemplo para adaptar ao seu problema <?php // Dados da conexão $servername = "localhost"; $username = "username"; $password = "password"; $dbname = "myDB"; // Create connection $conn = new mysqli($servername, $username, $password, $dbname); // Check connection if ($conn->connect_error) { die("Connection failed: " . $conn->connect_error); } // Modifique para o seu SQL $sql = "INSERT INTO MyGuests (firstname, lastname, email) VALUES ('John', 'Doe', 'john@example.com')"; if ($conn->query($sql) === TRUE) { echo "New record created successfully"; } else { echo "Error: " . $sql . "<br>" . $conn->error; } $conn->close(); ?>
  4. Ola! Dá uma estudada nas bibliotecas PyPDF2 ou Tabula para PDF e a openpyxl para o excel
  5. Olá! O ambiente que você está criando a aplicação é no seu próprio servidor local ou remoto? Não vi erros no código passado. Tente abrir o arquivo usando o navegador(Chrome,Firefox) em modo privado e veja se aparece normalmente.
  6. Bom dia! Veja se resolve o que você precisa... Crie um botão para listar procedure TForm1.btnListarClick(Sender: TObject); var SelectedID: Integer; begin if UniQuery1.IsEmpty then // Altere o UniQuery1 para o que você irá usar Exit; // Verifica se há um registro selecionado no DBGrid if DBGrid1.SelectedRows.Count = 0 then begin ShowMessage('Selecione um registro para excluir.'); Exit; end; // Obtém o ID do registro selecionado no DBGrid SelectedID := UniQuery1.FieldByName('prod_id').AsInteger; if MessageDlg('Deseja realmente excluir o registro?', mtConfirmation, [mbYes, mbNo], 0) = mrYes then begin UniQuery1.Close; UniQuery1.SQL.Clear; UniQuery1.SQL.Add('SELECT * FROM NOMETABELA'); // Mude o nome da tabela de NOMETABELA para a tabela correta UniQuery1.Open; // Atualiza os dados no UniQuery1 end; end; Botão de excluir procedure TForm1.btnExcluirClick(Sender: TObject); var SelectedID: Integer; begin if UniQuery1.IsEmpty then // Altere o UniQuery1 para o que você irá usar Exit; // Verifica se há um registro selecionado no DBGrid if DBGrid1.SelectedRows.Count = 0 then begin ShowMessage('Selecione um registro para excluir.'); Exit; end; // Obtém o ID do registro selecionado no DBGrid SelectedID := UniQuery1.FieldByName('prod_id').AsInteger; if MessageDlg('Deseja realmente excluir o registro?', mtConfirmation, [mbYes, mbNo], 0) = mrYes then begin UniQuery1.Close; UniQuery1.SQL.Clear; UniQuery1.SQL.Add('DELETE FROM NOMETABELA'); // Mude o nome da tabela de NOMETABELA para a tabela correta UniQuery1.SQL.Add('WHERE prod_id = :id'); UniQuery1.Parameters.ParamByName('id').Value := SelectedID; UniQuery1.ExecSQL; // Executa a consulta de exclusão UniQuery1.SQL.Clear; UniQuery1.SQL.Add('SELECT * FROM NOMETABELA'); // Consulta para recarregar os dados no DBGrid UniQuery1.Open; // Atualiza os dados no UniQuery1 end; end; Agora só adaptar as suas necessidades 😁
  7. Disponha!! Caso tiver mais dúvidas só postar no fórum 🙂
  8. Boa noite! Essa imagem em questão ela exibe no site sem colocar pelo PHP? Já fez esse teste?
  9. Olá! Coloca uma foto aqui do erro que está aparecendo e como aparece para lhe ajudar melhor
  10. Olá! Se você não deseja esse botão de forma alguma, pode removê-lo do HTML da página em questão, e assim resolveria o problema.
  11. Realize o mapeamento correto do Dbgrid, utilizando o componente que você usa para executar suas queries. Basta pegar exemplos do próprio código que você enviou. No botão de listar: with dm_dados.sql_vendasconsultas do // Altere o dm_dados.sql_vendasconsultas para o que deseja usar begin Close; SQL.Clear; SQL.Add('SELECT * FROM tbl_produtos'); // Altere o SQL para o que desejar retornar no DBgrid; nesse caso, está retornando a lista de produtos Open; end; Com isso, ele já lista no DBgrid, caso o mapeamento esteja correto. Para editar e deletar, você precisará de parâmetros para escolher qual registro deletar ou atualizar. Caso deseje fazer isso em um botão e não diretamente pelo dbgrid.
  12. Estuda sobre o SpringBoot pode lhe dar um norte no que você está precisando.
  13. O que parece estar ocorrendo é um "Type Casting". Se você pesquisar sobre no google já vai abrir um pouco a mente sobre o que é rsrsrs
×
×
  • Create New...