VSH Program (ODBC)

[eladpar]

hello, i was looking for a replacment for the Regirstry program when i found WSH (VSB file) i would like to know if this program works:

Example file (ODBC.vbs)

Dim oWshShell
Const cRegKey1 = "HKLM\Software\ODBC\ODBC.INI\LOGIN\"
Const cRegKey2 = "HKLM\Software\ODBC\ODBC.INI\ODBC Data Sources\"
Const cRegKey3 = "HKLM\Software\ODBC\ODBC.INI\MuOnline\"
Const cRegKey4 = "HKLM\Software\ODBC\ODBC.INI\MuOnlineJoinDB\"
Const cRegKey5 = "HKLM\Software\ODBC\ODBC.INI\MuRanking\"
Const cRegKey6 = "HKLM\Software\ODBC\ODBC.INI\MuEvent\"
Const cRegKey7 = "HKLM\Software\ODBC\ODBC.INI\USELOG\"
Const cRegKey8 = "HKLM\Software\ODBC\ODBC.INI\RMDB_CONNECTLOG\"
Const cRegKey9 = "HKLM\Software\ODBC\ODBC.INI\PC_MUONLINE\"
Const cRegKey10 = "HKLM\Software\ODBC\ODBC.INI\AccountDB\"
Const cRegKey11 = "HKLM\Software\ODBC\ODBC.INI\WPaymentDB\"

Set oWshShell = CreateObject("WScript.Shell")

oWshShell.RegWrite cRegKey1 & "Driver","C:\\WINDOWS\\system32\\SQLSRV32.dll"
oWshShell.RegWrite cRegKey1 & "Server","(local)"
oWshShell.RegWrite cRegKey1 & "Database","MuOnline"
oWshShell.RegWrite cRegKey1 & "LastUser","Administrator"


oWshShell.RegWrite cRegKey3 & "Driver","C:\\WINDOWS\\system32\\SQLSRV32.dll"
oWshShell.RegWrite cRegKey3 & "Server","(local)"
oWshShell.RegWrite cRegKey3 & "Database","MuOnline"
oWshShell.RegWrite cRegKey3 & "LastUser","Administrator"

oWshShell.RegWrite cRegKey4 & "Driver","C:\\WINDOWS\\system32\\SQLSRV32.dll"
oWshShell.RegWrite cRegKey4 & "Server","(local)"
oWshShell.RegWrite cRegKey4 & "Database","MuOnline"
oWshShell.RegWrite cRegKey4 & "LastUser","Administrator"

oWshShell.RegWrite cRegKey5 & "Driver","C:\\WINDOWS\\system32\\SQLSRV32.dll"
oWshShell.RegWrite cRegKey5 & "Server","(local)"
oWshShell.RegWrite cRegKey5 & "Database","MuRanking"
oWshShell.RegWrite cRegKey5 & "LastUser","Administrator"

oWshShell.RegWrite cRegKey6 & "Driver","C:\\WINDOWS\\system32\\SQLSRV32.dll"
oWshShell.RegWrite cRegKey6 & "Server","(local)"
oWshShell.RegWrite cRegKey6 & "Database","MuEvent"
oWshShell.RegWrite cRegKey6 & "LastUser","Administrator"


oWshShell.RegWrite cRegKey7 & "Driver","C:\\WINDOWS\\system32\\SQLSRV32.dll"
oWshShell.RegWrite cRegKey7 & "Server","(local)"
oWshShell.RegWrite cRegKey7 & "Database","MuLog"
oWshShell.RegWrite cRegKey7 & "LastUser","Administrator"

oWshShell.RegWrite cRegKey8 & "Driver","C:\\WINDOWS\\system32\\SQLSRV32.dll"
oWshShell.RegWrite cRegKey8 & "Server","(local)"
oWshShell.RegWrite cRegKey8 & "Database","MuConnectLog"
oWshShell.RegWrite cRegKey8 & "LastUser","administrator"


oWshShell.RegWrite cRegKey9 & "Driver","C:\\WINDOWS\\system32\\SQLSRV32.dll"
oWshShell.RegWrite cRegKey9 & "Server","(local)"
oWshShell.RegWrite cRegKey9 & "Database","MuOnline"
oWshShell.RegWrite cRegKey9 & "LastUser","administrator"

oWshShell.RegWrite cRegKey10 & "Driver","C:\\WINDOWS\\system32\\SQLSRV32.dll"
oWshShell.RegWrite cRegKey10 & "Server","(local)"
oWshShell.RegWrite cRegKey10 & "Database","MuOnline"
oWshShell.RegWrite cRegKey10 & "LastUser","administrator"

oWshShell.RegWrite cRegKey11 & "Driver","C:\\WINDOWS\\system32\\SQLSRV32.dll"
oWshShell.RegWrite cRegKey11 & "Server","(local)"
oWshShell.RegWrite cRegKey11 & "Database","MuOnline"
oWshShell.RegWrite cRegKey11 & "LastUser","administrator"

oWshShell.RegWrite cRegKey2 & "LOGIN","SQL Server"
oWshShell.RegWrite cRegKey2 & "MuOnline","SQL Server"
oWshShell.RegWrite cRegKey2 & "MuOnlineJoinDB","SQL Server"
oWshShell.RegWrite cRegKey2 & "MuRanking","SQL Server"
oWshShell.RegWrite cRegKey2 & "MuEvent","SQL Server"
oWshShell.RegWrite cRegKey2 & "USELOG","SQL Server"
oWshShell.RegWrite cRegKey2 & "RMDB_CONNECTLOG","SQL Server"
oWshShell.RegWrite cRegKey2 & "PC_MUONLINE","SQL Server"
oWshShell.RegWrite cRegKey2 & "AccountDB","SQL Server"
oWshShell.RegWrite cRegKey2 & "WPaymentDB","SQL Server"

WScript.echo "Sucsses "
set oWshShell = Nothing

this is for 1.00.66_Customized_Bug_Free_by_CzF files..

 

[eladpar]

some one?

 

[eladpar]

plz??