Jump to content

PauloBarbosa

Membros
  • Contagem de Conteúdo

    18
  • Ingressou

  • Última visita

  • Dias Ganhos

    1

Tudo que foi postado por PauloBarbosa

  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
  14. Olá! Levando em conta seu raciocínio seria mais ou menos assim o seu código para não retornar valores nulos Scanner sc = new Scanner(System.in); String[] nomes = new String[10]; for (int i = 0; i < nomes.length; i++) { nomes[i] = sc.nextLine(); if (nomes[i] == nomes[2]) { System.out.println("Está no index 3: " + nomes[2]); } if (nomes[i] == nomes[6]) { System.out.println("Está no index 7: " + nomes[6]); } if (nomes[i] == nomes[8]) { System.out.println("Está no index 9: " + nomes[8]); } } sc.close(); } Com isso você já evitaria os valores nulos... Porém acredito que no problema está pedindo o retorno final a saída como "adriana ray venilton" que seria mais ou menos assim Scanner sc = new Scanner(System.in); String[] nomes = new String[10]; String resultado = ""; for (int i = 0; i < nomes.length; i++) { nomes[i] = sc.nextLine(); if (nomes[i] == nomes[2]) { resultado += nomes[i] + ' '; } if (nomes[i] == nomes[6]) { resultado += nomes[i] + ' '; } if (nomes[i] == nomes[8]) { resultado += nomes[i] + ' '; } } System.out.println(resultado); sc.close(); Apenas foi adicionado uma variável String com nome de resultado e pegando os valores para deixar como no pedido da saída...
  15. Olá! Faz anos que não mexo em Delphi... Mas acredito que a listagem está sendo feita com o mapeamento dos componentes ou com SQL, e os botões estão executando SQL, assim como ele deixou um exemplo na resposta.
×
×
  • Create New...