How do I run programs serially using vbscript? 3

[xitu]

I want to run p1.exe, then p2.exe and p3.exe

The following code execute p1.exe, p2.exe, p3.exe

Set objShell = CreateObject("WScript.Shell")
objShell.Run "C:\p1.exe"
objShell.Run "C:\p2.exe"
objShell.Run "C:\p3.exe"

Can anyone help, please?
Thanks,

 

[Jerz]

To make one wait on the last, you need ,1,true as follows

Set objShell = CreateObject("WScript.Shell")
objShell.Run ("C:\p1.exe",1,true)
objShell.Run ("C:\p2.exe",1,true)
objShell.Run ("C:\p3.exe",1,true)

 

[tsuji]

Without paraenthese would be much better.
[tt]
objShell.Run "C:\p1.exe",1,true[/tt]
etc...

- tsuji

 

[xitu]

It worked great. Thanks.

Is there anyway I can configure the ODBC driver by vbscript?

 

[mrmovie]

i found this.

set wsh = wscript.createObject( "WScript.Shell" )
const ODBC = "HKLM\SOFTWARE\ODBC\ODBC.INI\"


sub createODBC( sName, sServer, sDesc, sDatabase, sUser )
dim ODBCS
ODBCS = ODBC & sName & "\"
wsh.regWrite ODBC, sName
wsh.regWrite ODBC & "ODBC Data Sources\" & sName, "SQL Server"
wsh.regWrite ODBCS & "Driver", "C:\WINNT\System32\sqlsrv32.dll"
wsh.regWrite ODBCS & "Description", sDesc
wsh.regWrite ODBCS & "Server", sServer
wsh.regWrite ODBCS & "Database", sDatabase
wsh.regWrite ODBCS & "LastUser", sUser
wsh.regWrite ODBCS & "UseProcForPrepare", "0"
end sub

 

[xitu]

Thanks. It worked perfect except I could not write the User Name. Does anyone know?

Thanks,

'-----------------------------------------------------
set WshShell = wscript.createObject( "WScript.Shell" )
const ODBC = "HKLM\SOFTWARE\ODBC\ODBC.INI\"

sName = "Name"
sServer = "Server"
sDesc = "Description"
sUser = "UserName"


dim ODBCS
ODBCS = ODBC & sName & "\"
WshShell.regWrite ODBC, sName
WshShell.regWrite ODBC & "ODBC Data Sources\" & sName, "Microsoft ODBC for Oracle"
WshShell.regWrite ODBCS & "Driver", "C:\WINNT\System32\sqlsrv32.dll"
WshShell.regWrite ODBCS & "Description", sDesc
WshShell.regWrite ODBCS & "User Name", sUser ' Does not work
WshShell.regWrite ODBCS & "Server", sServer