急！急！急！急！怎样连接db2数据库

Question

Dim myConnect As String 
        myConnect="..........."
        Dim myCnn As oledbconnection
        myCnn=New OleDb.OleDbConnection(myConnect)
        Dim myCmd As oledbcommand
        myCmd=New OleDb.OleDbCommand(mySql, myCnn)
        myCnn.Open()
        myReader = myCmd.ExecuteReader()
        Do While myReader.Read
                Pwd = myReader("OP_LOGINCODE")
        Loop

Answer 1

DB2能不能设ODBC那，用ODBC作连接吧

Answer 2

怎么用ODBC连接啊，问楼上的兄弟啊，呵呵。
我想连接Informix数据库，可也就是不行啊。