SHELL NO VISTA/SEVEN PARA RODAR COMO ADM
Preciso chamar um executável que acessa a interent, no vista/seven, se for chamado por shell direto, o acesso dele a net é negado... alguém sabe como chamar de forma que aparece aquela pergunta do UAC se é para rodar como administrado?
Tenta a API ShellExecute, ela oferece algumas opções de configuração, que o Shell não oferece.
Posta o código que você está usando aqui, para que possamos verificar e poder te ajudar da melhor forma possÃvel.
Um exemplo de uso da ShellExecute segue abaixo:
Posta o código que você está usando aqui, para que possamos verificar e poder te ajudar da melhor forma possÃvel.
Um exemplo de uso da ShellExecute segue abaixo:
Private Declare Function ShellExecute Lib [Ô]Shell32[Ô] 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 Declare Function GetDesktopWindow Lib [Ô]user32[Ô] Alias [Ô]GetDesktopWindow[Ô] () As Long
Function StartDoc (DocName As String) As Long
[Ô]Na variável DocName você substitui pelo caminho do Executável
Dim Scr_hDC As Long
Scr_hDC = GetDesktopWindow ()
[ô] change [Ô]Open[Ô] to [Ô]Explore[Ô] to bring up file explorer
StartDoc = ShellExecute (Scr_hDC, [Ô]Open[Ô], DocName, [Ô][Ô], [Ô]C:\[Ô], 1)
End Function
Tópico encerrado , respostas não são mais permitidas