elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.

 

 


Tema destacado: Rompecabezas de Bitcoin, Medio millón USD en premios


+  Foro de elhacker.net
|-+  Programación
| |-+  Programación General
| | |-+  .NET (C#, VB.NET, ASP)
| | | |-+  Programación Visual Basic (Moderadores: LeandroA, seba123neo)
| | | | |-+  ayuda para ver codigo de fuente de una web
0 Usuarios y 1 Visitante están viendo este tema.
Páginas: [1] Ir Abajo Respuesta Imprimir
Autor Tema: ayuda para ver codigo de fuente de una web  (Leído 2,391 veces)
DarkFire

Desconectado Desconectado

Mensajes: 21


Ver Perfil
ayuda para ver codigo de fuente de una web
« en: 7 Mayo 2008, 08:21 am »

hola, soy nuevo xD! pero kisiera saber como hago para ver un codigo de fuente de una web sin usar un browser, y que lo pueda obtener el codigo en un textbox. me han dicho que puedo usar una ocx, pero io desearia que el programa sea independiente, osea solo el exe y na mas. agradeceria mucho al que me ayduara.

pa los que den ayuda mas privada agregarme  ;D tazmania_rroo@hotmail.com

ty


En línea

krackwar


Desconectado Desconectado

Mensajes: 900


Ver Perfil
Re: ayuda para ver codigo de fuente de una web
« Respuesta #1 en: 7 Mayo 2008, 18:39 pm »

Leete las reglas ,no se pueden dar mails en posts solo por mps y no se puede hacer doble post unicamente para que el post no se pierda.
y sobre tu pregunta yo se que descargando la pagina luego la lees i listop.
s4lu2!


En línea

Mi blog
Bienvenido krackwar, actualmente tu puntuación es de 38 puntos y tu rango es Veteran.
El pollo número 1, es decir yo, (krackwar), adoro a Shaddy como a un dios.
Dynamique


Desconectado Desconectado

Mensajes: 401



Ver Perfil
Re: ayuda para ver codigo de fuente de una web
« Respuesta #2 en: 7 Mayo 2008, 18:50 pm »

Si te hicieras tu un navegador .. y ahí ya agregas la opción de ver el Source de la pagina web alomejor hasta seria mas facil xdd
En línea

Código
  1. <?php echo "Hello, I am Dynamique"; ?>
SKL (orignal)

Desconectado Desconectado

Mensajes: 259


UpLoadSourceCode


Ver Perfil WWW
Re: ayuda para ver codigo de fuente de una web
« Respuesta #3 en: 7 Mayo 2008, 23:22 pm »

Leete las reglas ,no se pueden dar mails en posts solo por mps y no se puede hacer doble post unicamente para que el post no se pierda.
y sobre tu pregunta yo se que descargando la pagina luego la lees i listop.
s4lu2!

mas alla de eso, el foro es una comunidad para compartir informacion, no para que le enviemos los codigos al mail ;)


otra cosa... busca en el apiguide qeu seguro encontras algo...
En línea

naderST


Desconectado Desconectado

Mensajes: 625



Ver Perfil WWW
Re: ayuda para ver codigo de fuente de una web
« Respuesta #4 en: 8 Mayo 2008, 00:24 am »

Coloca en un modulo bas

Código:
Option Explicit

Private 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
Private 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
Private Declare Function InternetReadFile Lib "wininet.dll" (ByVal hFile As Long, ByVal sBuffer As String, ByVal lNumBytesToRead As Long, lNumberOfBytesRead As Long) As Integer
Private Declare Function InternetCloseHandle Lib "wininet.dll" (ByVal hInet As Long) As Integer

Public Function wSource(Web As String) As String
    Dim sBuffer As String * 256
    Dim iRet As Integer
    Dim lRet As Long
    Dim sData As String
    Dim hInternet As Long
    Dim hSession As Long
   
    hSession = InternetOpen("tatatata", 1, vbNullString, vbNullString, 0&)
    hInternet = InternetOpenUrl(hSession, Web, vbNullString, 0&, 0&, 0&)
    iRet = InternetReadFile(hInternet, sBuffer, 256, lRet)
    sData = sBuffer
   
    Do While lRet <> 0
        iRet = InternetReadFile(hInternet, sBuffer, 256, lRet)
        sData = sData & Mid(sBuffer, 1, lRet)
    Loop
   
    iRet = InternetCloseHandle(hInternet)
    wSource = sData
End Function


En un form
Código:
Private Sub Form_Load()
Text1.Text = wSource("http://www.google.co.ve")
End Sub
En línea

DarkFire

Desconectado Desconectado

Mensajes: 21


Ver Perfil
Re: ayuda para ver codigo de fuente de una web
« Respuesta #5 en: 8 Mayo 2008, 08:19 am »

muchas gracias men, de verdad que me ayudaste ;)
En línea

Littl3

Desconectado Desconectado

Mensajes: 239


Tarde o temprano aparece el hombre


Ver Perfil
Re: ayuda para ver codigo de fuente de una web
« Respuesta #6 en: 11 Mayo 2008, 10:32 am »

Si, ami tambien, gracias
salu2
En línea

Páginas: [1] Ir Arriba Respuesta Imprimir 

Ir a:  

WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines