Mensajes

No es tan dificil men, es sacar el get de la web por ejemplo la primera que has puesto:

Código [Seleccionar] Expandir

http://www.mundonds.es/buscar.html?busqueda=NOMBREDELJUEGO&submit.x=0&submit.y=0

E ir leyendo el code 
Saludos

Mirate esto
http://foro.elhacker.net/net/aporte_como_utilizar_las_clases_httpwebrequest_y_httpwebresponse-t313514.0.html
Averiguas el get de las paginas del buscador y empleas eso, despues ya es que se almacenen los post en un combobox o algo asi

Esto solo seria con un simple IF no?

seria algo asi, en un form con un textbox & un button y en el codigo del button asi

Código (vb.net) [Seleccionar] Expandir

Public Class Form1

Dim Password As String = "Contraseña"

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
IF TextBox1.Text = Password THEN
Form2.Show()
Me.Close()
Else
MsgBox("Error: Contraseña Incorrecta")
End IF
End Sub

End Class


Si pero esa contraseña te la sacan en lo que les cuesta abrir el Salamander xD

Saludos

Te daré una pista, con esto deberías de poder sacarlo.

Código (vbnet) [Seleccionar] Expandir

LastWriteTime
DateTime.Now

Saludos

Si se bloquea la cuenta al intentarlo muchas veces, esto huele a freezer tuenti! xD

Pero seguramente ni se de cuenta y si se da cuenta ni sepa sacar tu ip, y en el caso de que veas que mira ipconfig y historias de esas, cargate el pc! 

Saludos.

[¿Que hacen estas clases?]

De este tema en Internet vi poca información y me dispongo a explicar lo que aprendí en este foro de la mano de .::IT::. de como usar estas clases.

¿Que hacen estas clases?
El HttpWebRequest hace una petición a la url indicada y el HttpWebResponse devuelve los datos de la petición, esta es su función principal y "creo" que es su única función.

¿Para qué?
Para sacar contenido de una web, ya sea un objeto o simplemente un texto.

Pasos a seguir.

Lo primero de todo es Importar lo siguiente para que reconozca las clases.

Código (vbnet) [Seleccionar] Expandir

Imports System.Net
Imports System.IO

Vallamos al grano, ahora nos dispondremos a guardar la Url de la petición en una variable String(No hace falta pero viene bien si le quieres dar formato como en este ejemplo, donde valpepito es {0} y valpepe es {1}).

Código (vbnet) [Seleccionar] Expandir

Dim MyUrl As String = String.Format("http://www.eldominio.com/?pepito={0}&pepe={1}", valpepito, valpepe)

El siguiente paso es declarar la petición Http

Código (vbnet) [Seleccionar] Expandir

Dim MyHttpWebRequest As HttpWebRequest = CType(WebRequest.Create(MyUrl), HttpWebRequest)

Algo importante es declarar las credenciales de identificación, muchas veces me ha dado error por no declarar este paso, lo que hacemos es hacer la petición con las credenciales estandar.

Código (vbnet) [Seleccionar] Expandir

MyHttpWebRequest.Credentials = CredentialCache.DefaultCredentials

Una vez que hemos declarado como queremos hacer la petición, la enviamos.

Código (vbnet) [Seleccionar] Expandir

Dim MyHttpWebResponse As HttpWebResponse = CType(MyHttpWebRequest.GetResponse(), HttpWebResponse)

A continuación leemos los bytes enviados por el servidor.

Código (vbnet) [Seleccionar] Expandir

Dim MyStream As Stream = MyHttpWebResponse.GetResponseStream

Y guardamos los bytes en un streamreader.

Código (vbnet) [Seleccionar] Expandir

Dim MyStreamReader As StreamReader = New StreamReader(MyStream)

Ahora guardaremos el contenido del stream en una string.

Código (vbnet) [Seleccionar] Expandir

Dim MyHtml As String = MyStreamReader.ReadToEnd

Organizamos el MyHtml que tenemos por líneas.

Código (vbnet) [Seleccionar] Expandir

Dim MyHtmlEnLineas() As String = MyHtml.Split(vbNewLine)

Ahora nos dispondremos a seleccionar la línea en la que se encuentra el contenido que queremos sacar de la web.(Donde 1 es la linea 1)

Código (vb.net) [Seleccionar] Expandir

Dim MyLinea As String = MyHtmlEnLineas(1)

Lógicamente de esa linea sólo queremos un texto determinado de este, en nuestro caso del carácter 1 al 5.

Código (vbnet) [Seleccionar] Expandir

MyLinea = Mid(MyLinea, 1, 5)

Y por fin tenemos en MyLinea la información que queríamos, no ha sido tan difícil no?

Ahora solo quedaría como ultimo detalle para los más perfeccionistas limpiar las variables para que no consuman recursos.

Código (vbnet) [Seleccionar] Expandir

MyUrl = Nothing
MyHttpWRequest = Nothing
MyHttpWResponse = Nothing
MyStream = Nothing
MyStreamReader = Nothing
MyHtml = Nothing
'etc...

Espero que le sirva a alguien esta explicación, el tema es más extenso pero me he dedicado a explicar lo esencial. Sin más que decir.

Saludos.

Código (vbnet) [Seleccionar] Expandir

textBox1.Text = Datetime.Now().ToString("dd/MM/yyyy hh:mm:ss tt")

Saludos

Mira yo empece con batch a los 14 años, despues me fui a vb6 y ahora vb.net. En estos momentos estoy aprendiendo C y por culpa de vb estoy bastante perdido, pero lo aprenderé igualmente  , te aconsejo que aprendas primero C, y despues si quieres c# o java, ya que el cambio casi ni lo notarás.

Saludos

Yo uso esto por si te sirve, aun que el método da igual mientras que funcione

Código (vbnet) [Seleccionar] Expandir

Dim htmle As HtmlElement
        For Each htmle In WebBrowser1.Document.GetElementsByTagName("Input")
            Select Case htmle.Name
                Case "number"
                    htmle.InnerText = numero.Text
                Case "gcode"
                    htmle.InnerText = captcha.Text
                    htmle.Focus()
                    SendKeys.SendWait(Chr(13))
            End Select