ODBC连接信息从Windows XP到Windows 7的导出脚本?

时间:2011-03-28 21:02:43

标签: vbscript odbc export

查找从WinXP框导出到Windows 7框的ODBC连接信息脚本。

2 个答案:

答案 0 :(得分:0)

您可以从注册表导出ODBC设置并将其还原到其他计算机上。不知道是否有脚本可以做到,但它应该很容易。请注意,因为越来越多的Windows计算机是64位版本,并且32位和64位应用程序的注册表位置不同。看看:https://serverfault.com/questions/239002/registry-for-odbcad32-on-window-server-2003-64-bit/240112#240112

答案 1 :(得分:0)

注册表信息可能指向Windows 7 x64上不存在于同一位置的驱动程序DLL。例如,在XP上,驱动器可能位于“C:\ Program Files \”中,而在Win7 x64中,它位于“C:\ Program Files(x86)”下 - 只是想指向那些偶然发现它的人。 / p>

我把vbscript放在一起:

objShell.Run "reg export " & Chr(34) & "HKEY_LOCAL_MACHINE\SOFTWARE\ODBC" & Chr(34) & "SystemODBC64.reg",1,True
objShell.Run "reg export " & Chr(34) & "HKEY_CURRENT_USER\SOFTWARE\ODBC" & Chr(34) & "UserODBC64.reg",1,True

然后,更新脚本以合并到32位注册表中:

Set objOFile = objFSO.OpenTextFile("SystemODBC64.reg", ForReading, False, TristateTrue)
strSystemReg64Contents = objOFile.ReadAll

WScript.Echo "Formatting system ODBC to 32-bit"
strSystemReg64 = Replace(strSystemReg64Contents, "HKEY_LOCAL_MACHINE\Software","HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node",1,-1,1)

WScript.Echo "Creating System ODBC File"
objFSO.CreateTextFile("SystemODBC32.reg", True, True ).Write strSystemReg64

strUserReg64 = "UserODBC64.reg"
Set objOFile = objFSO.OpenTextFile(strUserReg64, ForReading, False, TristateTrue )
strUserReg64Contents = objOFile.ReadAll

WScript.Echo "Formatting user ODBC to 32-bit"
strUserReg64 = Replace(strUserReg64Contents, "HKEY_CURRENT_USER\Software","HKEY_CURRENT_USER\SOFTWARE\Wow6432Node",1,-1,1) 

WScript.Echo "Creating User ODBC File"
objFSO.CreateTextFile("UserODBC32.reg", True, True ).Write strUserReg64