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

 

 


Tema destacado: ¿Eres nuevo? ¿Tienes dudas acerca del funcionamiento de la comunidad? Lee las Reglas Generales


+  Foro de elhacker.net
|-+  Programación
| |-+  Programación General
| | |-+  .NET (C#, VB.NET, ASP) (Moderador: kub0x)
| | | |-+  Google & Google Lucky Instant en vb.NET
0 Usuarios y 1 Visitante están viendo este tema.
Páginas: [1] Ir Abajo Respuesta Imprimir
Autor Tema: Google & Google Lucky Instant en vb.NET  (Leído 2,741 veces)
jdc


Desconectado Desconectado

Mensajes: 3.406


Ver Perfil WWW
Google & Google Lucky Instant en vb.NET
« en: 15 Septiembre 2010, 08:24 am »

Estaba aburrido molestando a nakp y se me ocurrio hacer esto xDDDDDD


Les dejo el ejecutable, si les interesa les dejo el codigo aunque es una mierrrrrrr jajajajaja y los 3l33t lo optimizaran un minuto y medio despues de que lo publique xDDDDDDD

les dejo el ejecutable aqui a ver si les gusta...

Descargar <== Libre de virus bajo mi palabra.

Esta en vb.NET 2010 asi que les dejo un video por si no tienen el .NET FrameWork 4400 xDDD



Me parecio divertido


En línea

[D4N93R]
Wiki

Desconectado Desconectado

Mensajes: 1.646


My software never has bugs. Its just features!


Ver Perfil WWW
Re: Google & Google Lucky Instant en vb.NET
« Respuesta #1 en: 15 Septiembre 2010, 15:19 pm »

Muy bueno, haha, lo mejor es la música de fondo.. :)


En línea

Braayhaan

Desconectado Desconectado

Mensajes: 224



Ver Perfil
Re: Google & Google Lucky Instant en vb.NET
« Respuesta #2 en: 15 Septiembre 2010, 15:35 pm »

Todos amamos a google y todos amamos la 5ta de Beethoven xDD

Muy bueno eso del Instant Search, por alguna razón el Google Chrome no lo tiene y el Firefox si...

En fin muy bueno xd
En línea

raul338


Desconectado Desconectado

Mensajes: 2.633


La sonrisa es la mejor forma de afrontar las cosas


Ver Perfil WWW
Re: Google & Google Lucky Instant en vb.NET
« Respuesta #3 en: 15 Septiembre 2010, 16:19 pm »

Jajaja, es un adelanto que seria para todos los paises antes de que salga oficialmente (?) :xD
En línea

jdc


Desconectado Desconectado

Mensajes: 3.406


Ver Perfil WWW
Re: Google & Google Lucky Instant en vb.NET
« Respuesta #4 en: 25 Septiembre 2010, 08:01 am »

En el evento keyup del cuadro de busqueda realizamos todo...
Cada vez que se presiona una tecla se agrega a la direccion y se muestra el resultado en el webBrowser
Si esta marcado el check se le asigna a la url al final "&btnI=Voy%20a%20tener%20suerte" que es equivalente a dar click en el boton "voy a tener suerte" si se borra todo y el text queda vacio se abre el forillo xD


Código
  1. Public Class Form1
  2.  
  3.  
  4.    Private Sub txtSearch_KeyUp(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles txtSearch.KeyUp
  5.        Dim q As String
  6.        Dim l As String
  7.  
  8.        If chkLucky.Checked = True Then
  9.            l = "&btnI=Voy%20a%20tener%20suerte"
  10.        Else
  11.            l = ""
  12.        End If
  13.  
  14.        q = txtSearch.Text
  15.        q = Replace(q, " ", "+")
  16.  
  17.        If (q = "") Then
  18.            wbLucky.Navigate("http://foro.elhacker.net")
  19.        Else
  20.            wbLucky.Navigate("http://www.google.cl/search?q=" & q & l)
  21.        End If
  22.  
  23.    End Sub
  24. End Class

:¬¬ un pequeño problema, como todos los idiotas usan el webBrowser para hacer bots y haces una peticion por pulsacion google te puede reconocer como bot asi que no abusen ni se confien es solo para joder un rato y nada mas, no lo usen para cosas serias xD

Quizas se podria usar un timmer para no abusar de ls peticiones, algo que retrasase la peticion un par de milisegundos ;)
En línea

Páginas: [1] Ir Arriba Respuesta Imprimir 

Ir a:  

Mensajes similares
Asunto Iniciado por Respuestas Vistas Último mensaje
Ver el contenido de una página de pago que aparece en Google Instant Preview
Dudas Generales
coso 4 5,110 Último mensaje 31 Mayo 2011, 18:06 pm
por coso
lucky patcher android
Android
DaVinci4 0 2,337 Último mensaje 16 Junio 2017, 16:50 pm
por DaVinci4
WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines