Como simular un CTRL+E y +C
Hola, necesito saber como simular las teclas de función Ctrl+E y CTRL+C o Como obtener todo el texto del navegador de internet WebBrowser y pegarlo en una caja de texto...
Aquien pueda ayudarme se lo agradecere eternamente, por que de esto depende mi trabajo!!. Plis...
Aquien pueda ayudarme se lo agradecere eternamente, por que de esto depende mi trabajo!!. Plis...
yo tambien ando buscando algo parecido, y tmb me urge...mira, he intentado mandar el foco al webbrowser y ahi simular un ctrl e...pero no funciona de nada...a ver si tu puedes hacerlo funcionar...
la instruccion seria sendkeys"^C", para el control C, similarmente para el ctrl E, saludos
la instruccion seria sendkeys"^C", para el control C, similarmente para el ctrl E, saludos
Otra forma: coloca un control web y un text1 multilinea, y un command1
Private Sub Command1_Click()
WebBrowser1.SetFocus
WebBrowser1.ExecWB OLECMDID_SELECTALL, OLECMDEXECOPT_DODEFAULT, 0, 0
WebBrowser1.ExecWB OLECMDID_COPY, OLECMDEXECOPT_DODEFAULT, 0, 0
Text1 = Clipboard.GetText
End Sub
Private Sub Form_Load()
WebBrowser1.Navigate "www.google.com.ar"
End Sub
salu2
www.recursosvisualbasic.com.ar
Private Sub Command1_Click()
WebBrowser1.SetFocus
WebBrowser1.ExecWB OLECMDID_SELECTALL, OLECMDEXECOPT_DODEFAULT, 0, 0
WebBrowser1.ExecWB OLECMDID_COPY, OLECMDEXECOPT_DODEFAULT, 0, 0
Text1 = Clipboard.GetText
End Sub
Private Sub Form_Load()
WebBrowser1.Navigate "www.google.com.ar"
End Sub
salu2
www.recursosvisualbasic.com.ar
