VB如何连接DB2数据库?

Question

在VB中,我把WORD中的数据取出来,放到DB2数据库,但是不知道VB怎么样和DB2连接,还有连接之后,怎么样打开一个表,以便插入数据??

Answer 1

我知道用ODBC,我是这样写的:
Public db As Database
Public conn As ADODB.Connection
Public rs As ADODB.Recordset
Set conn = CreateObject("ADODB.Connection")
conn.Open "DSN=CZ1;UID=;PWD="
Set rs = CreateObject("ADODB.Recordset")
rs.Open "RC"
其中RC为表名这样可不可以,CZ1是我建的数据源.
但是老是出错.
我是在VBA里用的!

Answer 2

rs.open "select * from rc", conn

Answer 3

http://www-900.ibm.com/developerWorks/cn/dmdd/library/techarticles/0206hasin/0206hasin.shtml

Answer 4

http://www-900.ibm.com/developerWorks/cn/dmdd/library/techarticles/0206hasin/0206hasin.shtml

Answer 5

来一个不用DSN的
conn.Open "driver={IBM DB2 ODBC DRIVER};DBALIAS=数据库在本地的名称;UID=db2admin;PWD=db2admin;LONGDATACOMPAT=1"

Answer 6

zhenglc(絮絮) --->
你这种我会,我不是查询.
我是想打开一个表,然后以下面的形式向数据库中添加数据
rs.AddNew
rs.Fields(2) = Documents(1).Tables(1).Cell(1, 2).Range.Text
rs.Fields(3) = Documents(1).Tables(1).Cell(1, 4).Range.Text
rs.Fields(4) = Documents(1).Tables(1).Cell(2, 2).Range.Text
rs.Fields(5) = Documents(1).Tables(1).Cell(2, 4).Range.Text
rs.Fields(6) = Documents(1).Tables(1).Cell(3, 2).Range.Text
ACCESS中直接有
rs=db.openrecordset("表名")
但是在DB2中,没有db,不知道用哪个语句?

Answer 7

我是想打开一个表,然后以下面的形式向数据库中添加数据
rs.AddNew
rs.Fields(2) = Documents(1).Tables(1).Cell(1, 2).Range.Text
rs.Fields(3) = Documents(1).Tables(1).Cell(1, 4).Range.Text
rs.Fields(4) = Documents(1).Tables(1).Cell(2, 2).Range.Text
rs.Fields(5) = Documents(1).Tables(1).Cell(2, 4).Range.Text
rs.Fields(6) = Documents(1).Tables(1).Cell(3, 2).Range.Textrs.open后可以.edit，.addnew，.delete

Answer 8

zhenglc(絮絮) :
我知道......
我要问的问题是,在DB2中如何打开数据库中的表...
不是查询语句.

Answer 9

Public db As Database
Public conn As ADODB.Connection
Public rs As ADODB.Recordset
Set conn = CreateObject("ADODB.Connection")
conn.Open "DSN=CZ1;UID=;PWD="
Set rs = CreateObject("ADODB.Recordset")
rs.Open "RC"

Answer 10

wingchi(一颗红心，两手准备) :
你干什么???

Answer 11

我给你的ibm的链接就是最清楚的

Answer 12

lihonggen0(李洪根,用.NET，标准答案来了) :
你发的链接之前我已经看过了。
但是我找不到我想要的！（我想是我太笨）
数据连接已经可以了。
至于数据库的查询，删除，修改，插入等。我也能够用SQL语句实现。
而我现在想做的是。
首先打开一个表。
然后用下面的语句来实现所需的功能。
rs.addnew
rs.delete
rs.edit
我现在就是不知道怎么打开一个数据库表。
ACCESS中直接有
rs=db.openrecordset("表名")
但是在DB2中,不知道用哪个语句?
请赐教！