elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.
 
Inicio Ayuda Buscar Ingresar Registrarse
29 Mayo 2012, 03:18  


Tema destacado: Sigue las noticias más importantes de elhacker.net en ttwitter!

+  Foro de elhacker.net
|-+  Programación
| |-+  Programación Visual Basic (Moderadores: LeandroA, seba123neo, raul338)
| | |-+  [Duda Vb6]Acceder a un .txt subido a un servidor
0 Usuarios y 1 Visitante están viendo este tema.
Páginas: [1] Ir Abajo Respuesta Imprimir
Autor Tema: [Duda Vb6]Acceder a un .txt subido a un servidor  (Leído 953 veces)
andres_5

Desconectado Desconectado

Mensajes: 198



Ver Perfil
[Duda Vb6]Acceder a un .txt subido a un servidor
« en: 18 Agosto 2011, 04:33 »

Hola, alguien me podria mas o menos decir, como puedo acceder a un .txt o .ini alojado en una nube en internet, y leer lineas por lineas al igual que si estubiera en algun direcctorio del pc.

Aprovecho para plasmas 2 dudas mas que tengo ahora mismo.
1.- Como minimizar una aplicacion en la barra de tareas, desde vb6, porque en .net es facil, pero mientras que no termine la aplicacion entera y la vaya actualizando a .net tendre que buscar alternativa en 6.
2.- autodestruir la aplicacion, quisiera poder autoeliminar la aplicacion, ya que voy a difundirlo primeramente a un grupo de personas para que hagan pruebas y que los usen, y vallan reportando los errores, y cuando acabe ese periodo, desde el .ini del server el programe vea que se ha pasado el tiempo de tester y se autoelimine automaticamente. A su vez que se puedan autoactualizar, en tal caso se autoelimine y autedescarge la otra version.
Saludo y gracias


En línea

Algunos de mis proyectos sobre electronica -->
En Mi Canal de Youtube


Tenient101

Desconectado Desconectado

Mensajes: 127


Ver Perfil
Re: [Duda Vb6]Acceder a un .txt subido a un servidor
« Respuesta #1 en: 18 Agosto 2011, 04:43 »

1.- Api de windows para descargar archivos ó sockets
2.- Si te refieres a minimizar tu formulario al area de notificaciones, alguien habia preguntado lo mismo un poco mas abajo de estos temas
http://foro.elhacker.net/programacion_visual_basic/minimizar_al_area_de_notificacion-t336553.0.html
3.- Melt.


En línea
raul338
Moderador
***
Conectado Conectado

Mensajes: 2.371


La sonrisa es la mejor forma de afrontar las cosas


Ver Perfil WWW
Re: [Duda Vb6]Acceder a un .txt subido a un servidor
« Respuesta #2 en: 18 Agosto 2011, 10:36 »

1- Lindo resumen simple aca 6 Ways to get HTML in vb

Un archivo es como un HTML, lo unico que tenes que hacer es hacer la petición, descargarlo (ya sea en memoria en un string o en un archivo local) y leerlo :P

3- Busca sobre Melt o Meltdown :P
En línea

andres_5

Desconectado Desconectado

Mensajes: 198



Ver Perfil
Re: [Duda Vb6]Acceder a un .txt subido a un servidor
« Respuesta #3 en: 18 Agosto 2011, 12:23 »

Buuah muchas gracias a los 2, ya tengo info suficiente para conseguirlo. Lo unico que creo es que lo de descargar en local el archvo, haria muy vulnerable a mi aplicacion, cosa que no quiero. :s
Por lo demas, perfecto.
Muchas gracias. :)
En línea

Algunos de mis proyectos sobre electronica -->
En Mi Canal de Youtube


raul338
Moderador
***
Conectado Conectado

Mensajes: 2.371


La sonrisa es la mejor forma de afrontar las cosas


Ver Perfil WWW
Re: [Duda Vb6]Acceder a un .txt subido a un servidor
« Respuesta #4 en: 18 Agosto 2011, 13:01 »

Lo unico que creo es que lo de descargar en local el archvo, haria muy vulnerable a mi aplicacion, cosa que no quiero. :s
en gran casos no se descarga el archivo a disco, sino en un string en memoria, igual se puede leer viendo la memoria reservada o con un sniffer :P
En línea

Elemental Code


Desconectado Desconectado

Mensajes: 499


Im beyond the system


Ver Perfil
Re: [Duda Vb6]Acceder a un .txt subido a un servidor
« Respuesta #5 en: 19 Agosto 2011, 13:28 »

cifra las cadenas de texto del txt y desencriptalas despues en tu exe  :silbar:
En línea

79137913


Desconectado Desconectado

Mensajes: 780


4 Esquinas


Ver Perfil WWW
Re: [Duda Vb6]Acceder a un .txt subido a un servidor
« Respuesta #6 en: 19 Agosto 2011, 13:36 »

HOLA!!!

Que le estan diciendo pobre chico XD

Mira aca tenes la funcion de seba123neo es buenisima:
Código
Option Explicit
Public Declare Function InternetOpen Lib "wininet.dll" Alias "InternetOpenA" (ByVal sAgent As String, ByVal lAccessType As Long, ByVal sProxyName As String, ByVal sProxyBypass As String, ByVal lFlags As Long) As Long
Public Declare Function InternetOpenUrl Lib "wininet.dll" Alias "InternetOpenUrlA" (ByVal hInternetSession As Long, ByVal sURL As String, ByVal sHeaders As String, ByVal lHeadersLength As Long, ByVal lFlags As Long, ByVal lContext As Long) As Long
Public Declare Function InternetReadFile Lib "wininet.dll" (ByVal hFile As Long, ByVal sBuffer As String, ByVal lNumBytesToRead As Long, lNumberOfBytesRead As Long) As Integer
Public Declare Function InternetCloseHandle Lib "wininet.dll" (ByVal hInet As Long) As Integer
 
Public Const IF_FROM_CACHE = &H1000000
Public Const IF_MAKE_PERSISTENT = &H2000000
Public Const IF_NO_CACHE_WRITE = &H4000000
 
Private Const BUFFER_LEN = 256
 
 
Public Function GetUrlSource(sURL As String) As String
   Dim sBuffer As String * BUFFER_LEN, iResult As Integer, sData As String
   Dim hInternet As Long, hSession As Long, lReturn As Long
 
   'get the handle of the current internet connection
   hSession = InternetOpen("vb wininet", 1, vbNullString, vbNullString, 0)
   'get the handle of the url
   If hSession Then hInternet = InternetOpenUrl(hSession, sURL, vbNullString, 0, IF_NO_CACHE_WRITE, 0)
   'if we have the handle, then start reading the web page
   If hInternet Then
       'get the first chunk & buffer it.
       iResult = InternetReadFile(hInternet, sBuffer, BUFFER_LEN, lReturn)
       sData = sBuffer
       'if there's more data then keep reading it into the buffer
       Do While lReturn <> 0
           iResult = InternetReadFile(hInternet, sBuffer, BUFFER_LEN, lReturn)
           sData = sData + Mid(sBuffer, 1, lReturn)
       Loop
   End If
 
   'close the URL
   iResult = InternetCloseHandle(hInternet)
 
   GetUrlSource = sData
End Function

Haces:
Código
VariableStringCualquiera = GetUrlSource(UrlDelTXT)
Y listo en la variable VariableStringCualquiera tenes tu archivo de texto.

GRACIAS POR LEER!!!
En línea

"Como no se puede igualar a Dios, ya he decidido que hacer, ¡SUPERARLO!"
"La peor de las ignorancias es no saber corregirlas"

 79137913                          *Shadow Scouts Team*                                                          Resumenes Cs.Economicas
andres_5

Desconectado Desconectado

Mensajes: 198



Ver Perfil
Re: [Duda Vb6]Acceder a un .txt subido a un servidor
« Respuesta #7 en: 19 Agosto 2011, 15:26 »

Muchas gracias a todos, me pondre con ello.
En línea

Algunos de mis proyectos sobre electronica -->
En Mi Canal de Youtube


Páginas: [1] Ir Arriba Respuesta Imprimir 

Ir a:  

Mensajes similares
Asunto Iniciado por Respuestas Vistas Último mensaje
[MOD] Acceder a un servidor win2k server
Hacking Básico
LuloX 1 347 Último mensaje 24 Julio 2004, 20:50
por Mance
no puedo acceder a mi servidor FTP
Dudas Generales
The Ghost 2 587 Último mensaje 20 Diciembre 2004, 05:13
por The Ghost
acceder via mi dominio a mi servidor local
Desarrollo Web
The Ghost 12 1,357 Último mensaje 23 Enero 2006, 06:14
por [.:: NauJFracT ::.]
No puedo acceder a mi servidor web
Redes
Jess_Kapria 2 931 Último mensaje 29 Marzo 2006, 13:25
por Jess_Kapria
[SOLUCIONADO] Acceder a servidor FTP a través de internet
Redes
novalida 6 2,582 Último mensaje 23 Octubre 2010, 23:48
por novalida
Powered by SMF 1.1.16 | SMF © 2006-2008, Simple Machines