Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Internet
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Grupo de Teaming del ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 30-05-2023
Avatar de pgranados
pgranados pgranados is offline
Miembro
 
Registrado: sep 2022
Ubicación: México
Posts: 264
Poder: 2
pgranados Va por buen camino
Scraping con Delphi

Buen día, estoy intentando hacer scraping a la pagina del SAT, necesito ingresar los certificados (.key & .cer) pero al presionar el boton buscar me abre un dialog para la selección de archivos, mi duda es. ¿Cómo puedo ocultar esa ventana y hacer la selección del archivo yo? El problema que tengo, es que al dar realizar la acción de click el codigo se detiene en Element.click, solamente cuando cierro o selecciono un archivo en el dialog el codigo continua, anexo mi código, pasen un buen día

Código Delphi [-]

var
Doc: OleVariant;
Element: OleVariant;
begin
  Doc:=  Navegador.Document as IHTMLDocument2;
  try
    Element := Doc.getElementById('btnCertificate');
    // Verifica si se encontró el elemento
    if not VarIsNull(Element) then
    begin
      // Simula un clic en el botón
      Element.click;
      SimulateFileSelection; // EN TEORIA, AQUI OCULTO LA VENTANA
      // Espera un tiempo para que la página se cargue (puedes ajustar el tiempo según la velocidad de carga)
      Sleep(2000);
    end;
  except
    on e: Exception do
        showMessage(e.Message);
  end;

end;

Código Delphi [-]
function SimulateFileSelection:boolean;
var
  FileDialogHandle: HWND;
begin
  FileDialogHandle := FindWindow(nil, 'Elegir archivos para cargar');
  if FileDialogHandle <> 0 then
  begin
    ShowWindow(FileDialogHandle, SW_HIDE);
    SetWindowText(FileDialogHandle, 'C:\ruta\CERTIFICADO.cer');
    SendMessage(FileDialogHandle, WM_KEYDOWN, VK_RETURN, 0);
    SendMessage(FileDialogHandle, WM_KEYUP, VK_RETURN, 0);
  end;
end;

Responder Con Cita
Respuesta



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro


La franja horaria es GMT +2. Ahora son las 16:38:57.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi