谁能干什么我这个代表什么

haihai1005

Set  cnn=createobject("adodb.connection")
Set  objrsa=createobject("adodb.recordset")
cnn.open "provide=local;userid=administrator;password=123456789;data source=Test"
objrsa.open "select   name ,pwd from users",cnn,2,2



objrsa.open "select   name ,pwd from users",cnn,2,2   那个 CNN后面跟的2, 2 到底是什么意思 ,小弟真的不明白了 还望高手知道,还有就是 怎么在数据库中添加数据sdlkfj1

rivermen

Set conn= createobject("ADODB.Connection")
Set res= createobject("ADODB.Recordset")


conn.Open dbstr
res.Open sql ,conn,2,2


res.MoveFirst
MsgBox "Name: "& res("name") & VbCrLf & "Age: " & res("age") & VbCrLf & "Tel: " & res("Tel"),,"www.51testing.com"
res.AddNew
res("name")="王五"
res("age")="34"
res("Tel")="33445566"
res.Update
res.close
Set res=Nothing
Set conn=Nothing

rivermen

res.Open sql ,conn,2,2
好像是锁定数据库，操作期间没有其他操作干扰

rivermen

conn="Provider=MSDASQL.1;Persist Security Info=False;Data Source=QT_Flight32"
sql="delete  from Orders where Customer_name='111'"
Set res=nothing

   OpenDB conn,sql,res

  '进行delete、update操作后，recordset对象是关闭的，即rs_news.Close不用写了
  CloseDB


'#################################################################
'#################################################################
' 连接数据库子程序
' 第一个参数：根据数据库的类型，设计连接字符串（参见udl文件）
' 第二个参数：连接数据库之后，进行查询的相应语句
' 第三个参数：查询记录返回到res
Sub OpenDB(conn,sql,res)
   Set cnn=CreateObject("adodb.connection")
   cnn.open conn
   Set res=CreateObject("adodb.recordset")
   res.open sql,cnn,1,1
   
End Sub


'#################################################################
'#################################################################
' 关闭数据库的连接
sub CloseDB
   Set res=nothing
        Set cnn=nothing
end sub

阅微草人

http://www.51testing.com/?45405/ ... e_itemid_11735.html
你看一下就明白了。