我是第一次接触vb和db2数据库,哪位大佬帮忙改下代码吧
代码是
Dim constr As String
Dim sqlsr As String
Dim conn As New ADODB.Connection
constr = "Provider=IBMDADB2;Database=SAMPLE; Hostname=myServerAddress; Protocol=TCPIP;Port=50000; Uid=Administrator;Pwd=; "
Dim rs As New ADODB.Recordset
conn.Open(constr)
sqlsr = "SELECT DATE FEOM AA WHERE NUMBER=2"
rs = conn.Execute(sqlsr)
conn.Colse
conn = Nothing
一运行就报错System.Runtime.InteropServices.COMException:“未找到提供程序。该程序可能未正确安装。”
而且注册ibm.data.db2.dll不成功一直报错!
![图片说明](https://img-ask.csdn.net/upload/201811/20/1542703185_278343.jpeg)