求助：关于连接句柄问题
各位大侠：
现在是这样的情况，打包好的程序已经成功安装在部分机器上且运行正常。但个别机器安装成功后，无法运行，报“无法获得连接句柄，ODBC api执行错误”--看红字部分。我查了下，具体程序是：
Private Sub Connect()
Dim TmpStat As Long

If IsConnect = True Then
Exit Sub
End If

If SQLAllocEnv(Henv) Then
MsgBox "无法初始化ODBC环境！", , "ODBC API执行错误"
End If

If SQLAllocConnect(Henv, Hdbc) Then
MsgBox "无法连接ODBC！", , "ODBC API执行错误"
End If

TmpStat = SQLConnect(Hdbc, DSN, Len(DSN), DB_USER_NAME, Lench(DB_USER_NAME), DB_PASSWORD, Len(DB_PASSWORD))

If TmpStat <> SQL_SUCCESS And TmpStat <> SQL_SUCCESS_WITH_INFO Then
MsgBox "无法获得连接句柄！", , "ODBC API执行错误" IsConnect = True
Disconnect
End
End If

IsConnect = True

End Sub

从上面程序看，连接ODBC成功，只是无法获得连接句柄，不知道怎么回事。另外，我在这台机器上用控制面板里的ODBC连接也成功了，测试通讯成功；CLICONFG客户端也设置了。

恳求各位大侠啊，到底是怎么回事啊

[解决办法]
这个跟程序没有关系的。是部分的电脑有问题，之前也遇到过这样的情况，不管怎么设置还是不行，硬是装了系统才可以的。