URL NO VB 6.0

FLAVIA 15/07/2010 15:34:27
#347454
preciso colocar em uma text comando para abrir uma url e conectar na internet.
Se se tiver alguem que queira ajudar.Eu agradeço.
[txt-color=#007100][ô]Com linha comentadas pra mim enterder[/txt-color]
gostaria de uma igual a do windows media player

[Ô]insira a URL ou caminho da internet,no seu computador
ou na rede para um arquivo que deseja executar[Ô]
JAMESBOND007 15/07/2010 15:37:46
#347456
Eu sei desta forma
[txt-color=#007100][ô]Primeiramente precisamos declarar a API[/txt-color]

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

[txt-color=#007100]
[ô]Em seguida chamamos a API a partir de um click de um botão[/txt-color]


Private Sub command1_Click()
Dim iret As Long
iret = ShellExecute(Me.hwnd, vbNullString, [Ô]http://www.vbmania.com.br[Ô], vbNullString, [Ô]c:\[Ô], SW_SHOWNORMAL)

End Sub
Tópico encerrado , respostas não são mais permitidas
Voltar