4 replies to this topic

[Jhonathas.net]

Pessoal estou tentando abrir um arquivo de txt pelo vb e um html, tipo clico num botar ele abre o txt no notpad memso e o html no ie,,

estou fazxendo assim



Public Declare Function Abre_Documento 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


Call Abre_Documento(0, vbNullString, App.Path & "\readme.txt", vbNullString, vbNullString, 0)



mas ta dando um erro que tenho q referencviar alguma coisa,,, oq devo usar ??

[felipecm]

Pessoal estou tentando abrir um arquivo de txt pelo vb e um html, tipo clico num botar ele abre o txt no notpad memso e o html no ie,,

estou fazxendo assim



Public Declare Function Abre_Documento 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


Call Abre_Documento(0, vbNullString, App.Path & "\readme.txt", vbNullString, vbNullString, 0)



mas ta dando um erro que tenho q referencviar alguma coisa,,, oq devo usar ??

Para abrir progrmas e arquivos:

Abre_Documento Me.hwnd, "open", App.Path & "\readme.txt", vbNullString, vbNullString, 1 

Para abrir html no navegador, troka "Open" por VbNullString.
O shell tem varias ações, da uma pesquisada..tem open, print, find, play..

t+

[Jhonathas.net]

mas a duvida é oq tenho que referenciar ? lá em project > references, oq devo marcar pro shell funcionar ??

[felipecm]

mas a duvida é oq tenho que referenciar ?  lá em project > references, oq devo marcar pro shell funcionar ??

Nada cara, vc tá acessando uma API, joga ela num módulo e executa ela num evento que vai funcionar. E na hora de invocar a function, num usa os parenteses pq vc não precisa recuperar o valor de retorno.

Edição feita por: hdz*, 18/12/2004, 11:20.

[Jhonathas.net]

Valewwwww funcionou