Visual Basic - Abrir Internet explorer

Life is soft - evento anual de software empresarial
 
Vista:

Abrir Internet explorer

Publicado por Héctor Nasarre (8 intervenciones) el 29/10/2002 18:33:15
Hola,esto es muy sencillo, pero soy nuevo y no encuentro la solución.
Quiero abrir el Internet explorer en una URL determianda. He probado a declarar un objeto como Webbroser y Webrowser_V1, y mediante el "navigate" o el "navigate2" pasarle la URL y abrirlo. también, como diuce el libor q tengo declararlo como SHDocWv.IntermnetExplorer. Pero no funciona. Muchas gracias de antenmano a todos.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Abrir Internet explorer

Publicado por Jaime Enriquez (1 intervención) el 29/10/2002 18:43:58
Este es el código que podras utilizar para habrir el explorador en una URL especifica :

Dim Web As Object
Set Web = CreateObject("InternetExplorer.Application")
Web.Visible = True
Web.navigate "www.lawebdelprogramador.com"

Si funciona
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Abrir Internet explorer

Publicado por Alvaro Marín (574 intervenciones) el 30/10/2002 10:00:59
Ahí va el código que debes usar:

Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String,
ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long

Private Sub Form_Load()
Dim Navegador As Long
Navegador = ShellExecute(Form1.hwnd, "open", "http://www.ambsoftware.com", "", "", 1)
End Sub

Un saludo
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Abrir Internet explorer

Publicado por Héctor Nasarre (8 intervenciones) el 31/10/2002 18:55:33
Muchas gracias a todos por las molestias, sobre todo a Jaime (Funiona a la primera).
Enjoy the life
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar