call an exe as administrator from inside a pgm

[jorjio]

Hi,
We use Fivewin 7.01 for Harbour with xhb which I think it is 2009 01. Anyhow, I am opening an executable from inside my program with shellexecute which returns no error but the executable has no results . On two or three computers the application works but not on my computer which has vista. Winexec does not work either although it does not return error. If I run my application as Administrator the call to the executable has effect. So, I need a function or a parameter that opens the executable as administrator from inside the program. Thank you in advance.

[anserkk]

oShell:= CreateObject("Shell.Application")
oShell:ShellExecute ("E:\demo\batchScript.cmd", "", "", "runas", 1)

[Baxajaun]

Dear anserkk,

this code

Code: Select all  Expand view

   oShell := CreateObject("Shell.Application")
   oShell:ShellExecute ("C:\Windows\System32\msg.exe","BAXAJAUN 'Hola Mundo !!!'", "", "runas", 1)
 

isn't ok for us



Thanks in advance !

Best regards

[Baxajaun]

Hi !

Fixed it ! Is a permission problema, if copy msg.exe to application directory, shellexecute() function run msg.exe

Thanks in advance !

Best regards,