所以我有这段代码,我试图连接到 sql server 2005 中的 dsn。
Dim cn, cmd
set cn = createobject("ADODB.connection")
set cmd = createobject("ADODB.command")
cn.open ("dsn=LBILLBKP;UID=lbmkbkp;PWD=lbmkbkp")
cmd.activeconnection = cn
If Err.Number <> 0 Then
ErrLog "Export Script backup Err# 1 " & Err.Description, ErrFile, fso
MailMsg = "The " & Region & " ListBill Export process failed while taking Database backup. Check the server log files (Scrpt.log, Error.Log, ftp.log)"
MailRtn = SendMail(MailList, MailMsg, "0", "0")
If MailRtn <> "0" Then
ErrLog "Export Script backup Err# 2 " & MailRtn, ErrFile, fso
End If
fso = Empty
WScript.Quit
End If
set cmd = nothing
cn.close
set cn = nothing
但它抛出 3709 错误。我已经检查了与提到的 ID 的数据库的连接,还手动检查了 dsn,它应该进行数据库备份,并已成功完成备份。我已经从数据源 (ODBC) 检查了具有相同 ID 的 dsn,它工作正常。我还在代码中的每个语句之后添加了 wscript.echo("") 以检查哪个语句未执行,但似乎作业运行良好并且每个步骤都在执行。请建议我应该做什么。