Question

我的应用程序具有与DTS相同的功能（将数据从AS400传输到SQL Server）。我需要这个应用程序按照我制定的计划运行。如果我打开它，这个应用程序会正常运行，但如果我把它放在任务计划程序中，它总是显示错误：

错误[HY000] [IBM] [System i Access ODBC Driver]缺少系统名称需要连接。

这是我用来连接AS400的脚本。如果我正常运行它（不在调度程序中），它运行没有错误。有谁知道如何解决它？

Public Sub takeconnectionas400()
    _inifile.Baca("Config.ini", "AS400")
    system = _inifile.system
    uid = _inifile.uid
    pwd = _inifile.pwd
    dbq = _inifile.dbq
    db_as = "Driver={Client Access ODBC Driver (32-bit)};System=" & system & ";Uid=" & uid & ";Pwd=" & pwd & ";Dbq=" & dbq & ""
    conn_as = New OdbcConnection(db_as)
    Try
        If conn_as.State = ConnectionState.Closed Then
            conn_as.Open()
        End If
    Catch ex As Exception
        MsgBox(Err.Description, MsgBoxStyle.Critical, "Error")
    End Try
End Sub

Answer 1

你的程序没有找到你的ini文件，或者不包含你的连接信息。已经尝试将你的inifile放在exe的同一目录中，否则尝试直接将你的connexionstring写入你的程序进行测试。

在Windows任务计划程序中运行VB应用程序

1 个答案: