Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > OOP
Registrarse FAQ Miembros Calendario Guía de estilo Buscar Temas de Hoy Marcar Foros Como Leídos

Grupo de Teaming del ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 08-02-2023
esublim esublim is offline
Miembro
 
Registrado: dic 2022
Posts: 40
Poder: 0
esublim Va por buen camino
y tambien me tope con esto:
http://www.cne.gob.ve/web/registro_e...al/ce.php.save
Responder Con Cita
  #2  
Antiguo 08-02-2023
esublim esublim is offline
Miembro
 
Registrado: dic 2022
Posts: 40
Poder: 0
esublim Va por buen camino
http://www.cne.gob.ve/web/registro_e...edula=20188760
por alli consulta la pagina del cne pero no logro verlo en json
Responder Con Cita
  #3  
Antiguo 09-02-2023
Avatar de Neftali [Germán.Estévez]
Neftali [Germán.Estévez] Neftali [Germán.Estévez] is offline
[becario]
 
Registrado: jul 2004
Ubicación: Barcelona - España
Posts: 18.293
Poder: 10
Neftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en bruto
Cita:
Empezado por esublim Ver Mensaje
quiero ver si logro verlo en tipo json y me tope con esto:
http://www.cne.gob.ve/web/js/re.php
sera que alguien me echa una manito
Cita:
Empezado por esublim Ver Mensaje
Eso simplemente son páginas de código que no deberías ver.

Como te he dicho en el otro mensaje, busca en los links:
Con este código puede descargar el código fuente de la página:

Código Delphi [-]
procedure TForm3.Button1Click(Sender: TObject);
var
  http: TIdHTTP;
  IdSSLIOHandler: TIdSSLIOHandlerSocketOpenSSL;
  temp: TFileStream;
  fName:string;
begin
  fName := 'r:\out.txt';

  http := TIdHTTP.Create(Self);
  IdSSLIOHandler := TIdSSLIOHandlerSocketOpenSSL.Create(nil);
  try
    http.IOHandler := IdSSLIOHandler;
    IdSSLIOHandler.SSLOptions.SSLVersions := [sslvSSLv2, sslvTLSv1_2];
    IdSSLIOHandler.SSLOptions.Method := sslvSSLv23;

    temp := TFileStream.Create(fName, fmCreate);
    try
      http.Get('https://bcv.org.ve/', temp);
    finally
      temp.Free;
    end;
    Memo1.Lines.LoadFromFile(fName);
  finally
    FreeAndNil(http);
    FreeAndNil(IdSSLIOHandler);
  end;
end;

Una vez tienes el código de la página, en tu caso, sólo necesitas buscar el texto: <span> USD</span>


Una vez que lo encuentres, solo debes seguir hasta obtener el valor que deseas: <strong> 23,80950000 </strong>
El texto que busques puede variar.


Haz pruebas con eso.
__________________
Germán Estévez => Web/Blog
Guía de estilo, Guía alternativa
Utiliza TAG's en tus mensajes.
Contactar con el Clubdelphi

P.D: Más tiempo dedicado a la pregunta=Mejores respuestas.
Responder Con Cita
Respuesta


Herramientas Buscar en Tema
Buscar en Tema:

Búsqueda Avanzada
Desplegado

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

Temas Similares
Tema Autor Foro Respuestas Último mensaje
problema con consulta con POST chelox Internet 1 18-09-2006 23:27:57
Post de las tablas JavierO Varios 6 23-11-2005 17:58:44
IBDatase Insert Post Edit Post ariefez Firebird e Interbase 4 12-10-2005 01:53:04
Post con ODBC urush30 Oracle 0 20-09-2004 12:28:06
Anular un post ?? chele Conexión con bases de datos 6 08-06-2004 19:11:51


La franja horaria es GMT +2. Ahora son las 10:54:46.


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