vbs to exe

  • Thread starter Thread starter Pietro Pesce
  • Start date Start date
P

Pietro Pesce

i have this vbs


On Error Resume Next
dim WshShell,FSO




sUser="++++++"
sPass="+++++++"
sCmd="+++++++"
set WshShell = CreateObject("WScript.Shell")
set WshEnv = WshShell.Environment("Process")
WinPath = WshEnv("SystemRoot")&"\System32\runas.exe"
set FSO = CreateObject("Scripting.FileSystemObject")

if FSO.FileExists(winpath) then
'wscript.echo winpath & " " & "verified"
else
wscript.echo "!! ERROR !!" & VBCRLF & "Can't find or verify " &
winpath &"." & VBCRLF & "You must be running Windows 2000 for this
script to work."
set WshShell=Nothing
set WshEnv=Nothing

set FSO=Nothing
wscript.quit
end if

rc=WshShell.Run("runas /user:" & sUser & " " & CHR(34) & sCmd &
CHR(34), 2, FALSE)

Wscript.Sleep 30 'need to give time for window to open.
WshShell.AppActivate(WinPath) 'make sure we grab the right window to
send password to
WshShell.SendKeys sPass 'send the password to the waiting window.

set WshShell=Nothing

set WshEnv=Nothing
set FSO=Nothing

wscript.quit


i have convert this to exe...ok...but if i run will open i window and
wait i password for the command runas -.-" while if i run this
in .vbs: wscript xxxx.vbs it work...

why?


tnx, Pietro
 
i have convert this to exe...ok...but if i run will open i window and
wait i password for the command runas -.-" while if i run this
in .vbs: wscript xxxx.vbs it work...
Click to expand...

Sorry, but this sentence doesn't make since to me. I realize that
English probably isn't you're primary language, but could you please
try to clarify this sentence?

Thanks,

Seth Rowe
 
Sorry, but this sentence doesn't make since to me. I realize that
English probably isn't you're primary language, but could you please
try to clarify this sentence?

Thanks,

Seth Rowe
Click to expand...

mmmmmm
i dont speak good en ;)
this script .vbs work...
..exe no!

why?
 
mmmmmm
i dont speak good en ;)
this script .vbs work...
.exe no!

why?
Click to expand...

Okay, how does the exe not work? Is it throwing an exception (if so
please share the message) or is it just not working?

Thanks,

Seth Rowe
 
Okay, how does the exe not work? Is it throwing an exception (if so
please share the message) or is it just not working?

Thanks,

Seth Rowe- Nascondi testo tra virgolette -

- Mostra testo tra virgolette -
Click to expand...



because dont open the program cambio_ip.exe in administrative
mode.....when i run the exe i see the window that question me the
password for runas... if i run the script "wscript aaa.vbs" the
program work.....
 
because dont open the program cambio_ip.exe in administrative
mode.....when i run the exe i see the window that question me the
password for runas... if i run the script "wscript aaa.vbs" the
program work.....
Click to expand...

Post the code for the exe - I suspect you're not using impersonation
like we suggested in the other thread.

Thanks,

Seth Rowe
 
Post the code for the exe - I suspect you're not using impersonation
like we suggested in the other thread.

Thanks,

Seth Rowe- Nascondi testo tra virgolette -

- Mostra testo tra virgolette -
Click to expand...

the code is in the 1° post....i convert this vbs in a exe
 
Back
Top