abrir url

Iniciado por jocker, 11 Mayo 2006, 00:02 AM

0 Miembros y 1 Visitante están viendo este tema.

jocker

ya se como abrir una url
pero yo me acuerdo que hay una forma sensilla sin la necesidad de una api, me pueden ayudar a saber cual era???

pandemonio

Hola. Inserta ek siguiente código (necesitarás unbotón)



Private Sub Command1_Click()
    Dim Web As Object
    Dim URL As String
   
        URL = "www.microsoft.com"
   
        Set Web = _
            CreateObject("InternetExplorer.Application")
   
    Web.Visible = True
    Web.navigate URL
End Sub



Nos vemos.

Robokop

Citar
Shell("explorer http://www.google.com", vbNormalFocus) 'Abre una web

jocker

gracias, ya esta¡¡¡

:-X :-X :-X :-X :-X :-X :-X :-X :-X :-X :-X