从VBScript连接到Sybase时出错-内部客户端库错误

从VBScript连接到Sybase时出错-内部客户端库错误,vbscript,connection-string,sybase,Vbscript,Connection String,Sybase,我正在编写一个VBScript,该脚本连接到Sybase数据库,从表中读取一些数据并将其存储在变量中,然后连接到MS SQL server并将数据插入到具有先前存储的变量数据的表中 我不确定这是否是相关信息,但由于我只有一个用于连接Sybase ODBC的32位驱动程序,并且由于此VBScript在64位计算机上运行,因此我通过命令行运行它,但使用SysWoW64 cmd.exe并按如下方式运行: C:\Windows\SysWOW64>cscript C:\My\Directory\My

我正在编写一个VBScript,该脚本连接到Sybase数据库,从表中读取一些数据并将其存储在变量中,然后连接到MS SQL server并将数据插入到具有先前存储的变量数据的表中

我不确定这是否是相关信息,但由于我只有一个用于连接Sybase ODBC的32位驱动程序,并且由于此VBScript在64位计算机上运行,因此我通过命令行运行它,但使用SysWoW64 cmd.exe并按如下方式运行:

C:\Windows\SysWOW64>cscript C:\My\Directory\MyVBScript.vbs
我无法连接到Sybase数据库。我最初对连接字符串本身有一些问题,但似乎已经解决了

下面是我现在收到的错误消息,但我不知道如何通过此消息:

用于ODBC驱动程序的Microsoft OLE DB提供程序:[SYBASE][ODBC SYBASE] 驱动程序][Sybase]ct_connect():用户api层:内部客户端库 错误:HAFAILOVER:尝试连接到服务器


这是现在的脚本

Dim connStr, objConn

DataSource = "ICCM_PREVIEW"
ServerIP = "1.2.3.4"
Port = "1234" 
DBuser = "myUser" 
DBpwd = "myPassword" 
DBName = "myDatabase" 
Driver = "SYBASE ASE ODBC Driver"

connStr = ""
connStr = connStr &"Driver="& Driver &";"
connStr = connStr &"Data Source="& DataSource &";"
connStr = connStr &"Srvr="& ServerIP &","& Port &";"
connStr = connStr &"Database="& DBName &";"
connStr = connStr &"uid="& DBuser &";"
connStr = connStr &"pwd="& DBpwd &";"

Wscript.Echo connStr 

'Define object type
Set objConn = CreateObject("ADODB.Connection")

'Open Connection
objConn.open connStr

这里缺少什么?

参数“Srvr”不是有效的连接参数,需要“Port”键值对

以前

之后


摘自

使用连接参数图表

以下是DSN以外的连接参数列表 可提供给ASE ODBC驱动程序的参数

摘录自的用户指南


您是否在此处查看解决方案:?或此处:非常感谢您的帮助。我已经做了您建议的更改,现在我收到一个不同的错误。“信息不足,无法连接到数据源”我的连接字符串如下“Driver=SYBASE ASE ODBC Driver;data source=ICCM_PREVIEW;Server=1.2.3.41234;Database=myDatabase;UID=myUser;PWD=myPassword”;我注意到端口所需的键值对也丢失了。我将更新代码。非常感谢@WorkSmarter。不幸的是,出现了相同的错误消息。下面是新的连接字符串:“Driver=SYBASE ASE ODBC Driver;数据源=ICCM_PREVIEW;服务器=1.2.3.4;端口=1234;数据库=myDatabase;UID=myUser;PWD=myPas‌​Swarme;“@robotsushi在驱动程序值周围添加花括号,即{SYBASE ASE ODBC driver}。类似于这里交付的内容
connStr = connStr &"Srvr="& ServerIP &","& Port &";"
connStr = connStr &"Server="& ServerIP & ";"
connStr = connStr &"Port="& Port &";"