我正在编写一个脚本来查询该数据库的MSSQL DB和显示内容。但是,我收到错误参数错误类型并且超出Acaptable范围。请帮帮我..
以下是脚本:
sub GetProcesses
Set objConnection = CreateObject("ADODB.Connection")
Set objRecordSet = CreateObject("ADODB.Recordset")
objConnection.Open _
"Provider=SQLOLEDB.1;Data Source=.;" & _
"Integrated Security=SSPI;Initial Catalog=ILO_1;" & _
"User ID=sa;Password=Test@123;"
strSQL = "SELECT * FROM ILO WHERE DeviceName ='" & enteredText & "'"
objRecordSet.Open strsql, _
objConnection, adOpenStatic, adLockOptimistic
'objRecordSet.MoveFirst
Set rs = objRecordSet
WHILE rs.EOF <> TRUE
CI_w= rs("DeviceName")
ILOIP_w= rs("ILO IP")
Username_w= rs("User")
Password_w= rs("PASSWORD")
rs.movenext
END SUB
答案 0 :(得分:0)
VBScript不预先定义常量,如adOpenStatic,adLockOptimistic,....确保它们已正确定义。