向数据库中写入一条记录的问题

[qianyu9880]

我想向数据库中写入一条记录，用insert 语句， 但是不知道怎么用， 数据库该怎么打开？

[lihonggen0]

SQL数据库该怎么打开？


Dim CN As New adodb.Connection '定义数据库的连接存放数据和代码
Dim Rs As New adodb.Recordset
CN.ConnectionString = "Provider=sqloledb;Data Source=pmserver;Initial Catalog=northwind;User Id=sa;Password=sa;"
CN.Open
Rs.CursorLocation = adUseClient
Rs.Open "select * from employees", CN, adOpenDynamic, adLockBatchOptimistic
Set DataGrid1.DataSource = Rs

[lihonggen0]

CN.EXECUTE "insert into table1(id,name) values(1,'aaaa')"

[lihonggen0]

ACCESS数据库该怎么打开？

Dim adoCnn As New adodb.Connection
Dim adoCmm As New adodb.Command
Dim adoRec As New adodb.Recordset

adoCnn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\Program Files\Microsoft Visual Studio\VB98\NWIND.MDB;Persist Security Info=False"

adoCmm.ActiveConnection = adoCnn
adoCmm.CommandType = adCmdText
adoCmm.CommandText = "select * from employees"
Set adoRec = adoCmm.Execute

[qianyu9880]

我的数据库是oracle的 ，有一条记录的各个字段的值已知：amt1,amt2,amt3，想插入到数据库的表department中

Dim db As New ADODB.Connection
Dim rs As New ADODB.Recordset
db.ConnectionString = "Provider=MSDAORA.1;Password=ender;User ID=ender;Data Source=sbms_run;Persist Security Info=True"
db.Open db.ConnectionString
db.CursorLocation = adUseClient
这样定义好之后，是用rs.open "select * from department",db,adopendynamic,adlockoptimistic 打开还是在打开时就用insert 语句？如果这两种情况都可以， 下面的语句该怎么写？

[remanwang]

晕倒

[fujitsu]

if you use "add " and "update"?

why you must use "insert"?