如何连接DB2数据库(50分)

如何用DELPHI或VB6连接IBM的DB2数据库

在BDE中设置别名，或者用一个TDatabase直接访问

odbc

最基本的方法
1。服务器端装DB2 Server for NT 或OS/2,
2。客户端装Client 在客户机配置辅助中添加要连接的数据库，
3。在BDE中设置别名

请问是本地数据库还是远程数据库！

来晚了,告诉你vb的连法(如果是远程):
1.客户端装Client 在客户机配置辅助中添加要连接的数据库
2.使用ADO
3.设置ADO的connectionstring,一般为
Public Sub ConnectionStringX()

Dim cnn1 As ADODB.Connection
Dim cnn2 As ADODB.Connection
Dim cnn3 As ADODB.Connection
Dim cnn4 As ADODB.Connection

' 不使用数据源名 (DSN) 打开连接。
Set cnn1 = New ADODB.Connection
cnn1.ConnectionString = "driver={SQL Server};" & _
"server=bigsmile;uid=sa;pwd=pwd;database=pubs"
cnn1.ConnectionTimeout = 30
cnn1.Open

' 使用 DSN 和 ODBC 标记打开连接。
Set cnn2 = New ADODB.Connection
cnn2.ConnectionString = "DSN=Pubs;UID=sa;PWD=pwd;"
cnn2.Open

' 使用 DSN 和 OLE DB 标记打开连接。
Set cnn3 = New ADODB.Connection
cnn3.ConnectionString = "Data Source=Pubs;User ID=sa;Password=pwd;"
cnn3.Open

' 使用 DSN 和单个参数而非连接字符串打开连接。
Set cnn4 = New ADODB.Connection
cnn4.Open "Pubs", "sa", "pwd"

' 显示连接的状态。
MsgBox "cnn1 state: " & GetState(cnn1.State) & vbCr & _
"cnn2 state: " & GetState(cnn2.State) & vbCr & _
"cnn3 state: " & GetState(cnn3.State) & vbCr & _
"cnn4 state: " & GetState(cnn4.State)

cnn4.Close
cnn3.Close
cnn2.Close
cnn1.Close

End Sub

多人接受答案了。