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

Run VB Application in Windows Task Scheduler

我有一个功能与 DTS 相同的应用程序(将数据从 AS400 传输到 SQL 服务器)。根据我制定的时间表,我需要此应用程序 运行。这个应用程序 运行 如果我打开它正常,但是如果我把它放在任务计划程序中,它总是显示错误:

ERROR [HY000][IBM][System i Access ODBC Driver]Missing system name needed for connection.

这是我用来连接 AS400 的脚本。如果我 运行 它正常(不在调度程序中),它 运行s 没有错误。有人知道怎么解决吗?

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

您的程序没有找到您的 ini 文件,或者 ini 文件不包含您的连接信息。已经尝试将您的 ini 文件放在与您的 exe 相同的目录中,否则尝试将您的连接字符串直接写入您的程序以进行测试。