amigos, se me ocurrió poder realizar algo para optimizar un programa que tengo, la idea es la siguiente, crear una especie de buscador en una pagina determinada.
Por ejemplo con el buscador de esta pagina, se me ocurrió hacer algo como esto usando la función ShellExecute para abrir paginas-
Private Sub Command1_Click()
res = ShellExecute(Me.hwnd, "Open", "http://wiki.elhacker.net/system/app/pages/customSearch?scope=cse-goog_1258298707613&q=; text1.Text;&search=", "", "", 1)
End Sub
http://wiki.elhacker.net/system/app/pages/customSearch?scope=cse-goog_1258298707613&q=auditorias+wifi&search=
Pero en la dirección no toma los valores del text1, si no que busca "; text1.Text;"
No logro hacerlo funcionar, se puede hacer de esta forma, o hay una manera mejor de hacerlo
Gracias amigos
Hola!
Prueba con este codigo:
Private Sub Command1_Click()
res = ShellExecute(Me.hwnd, "Open", "http://wiki.elhacker.net/system/app/pages/customSearch?scope=cse-goog_1258298707613&q=; " + text1.Text + ";&search=", "", "", 1)
End Sub
Saludos!
Cita de: MCKSys Argentina en 29 Agosto 2014, 18:53 PM
Hola!
Prueba con este codigo:
Private Sub Command1_Click()
res = ShellExecute(Me.hwnd, "Open", "http://wiki.elhacker.net/system/app/pages/customSearch?scope=cse-goog_1258298707613&q=; " + text1.Text + ";&search=", "", "", 1)
End Sub
Saludos!
Funciono mas que perfecto, no pensé que se podía
Muchas gracias