dim conn as adodb.connection
dim rs as adodb.recordset
dim strSQL as string
Set Conn = New ADODB.Connection
Conn.Open "DSN=aaa;"
Conn.CursorLocation = adUseClient
strsSQL="select * from TableA"
rs.open strsql,conn,adOpenDynamic, adLockBatchOptimistic
保证你操作所有数据库
dim rs as adodb.recordset
dim strSQL as string
Set Conn = New ADODB.Connection
Conn.Open "DSN=aaa;"
Conn.CursorLocation = adUseClient
strsSQL="select * from TableA"
rs.open strsql,conn,adOpenDynamic, adLockBatchOptimistic
保证你操作所有数据库
解决方案 »
- 菜鸟求助大虾 关于用户类型未定义问题
- 一个简单的数组问题
- ********************vb有关介绍界面方面开发的电子书籍?********************
- 我写了一个递归列出一个目录下(包含子目录)所有文件的代码,但还有一点问题,谁能帮我改改?
- 可不可以在VB中创建存储过程呀
- VB調用SQL存儲過程。
- 请问怎样判断一个数组已经定义过!!
- 本人是菜鸟,请大虾帮我完成下列语句的宏?
- 请问vb中如何进行位操作?如移位,位异或等
- 关于ADO的参数问题:在ACCESS数据库中,有一个参数查询。如果在VB6中引用呢?
- 如何得到IE的SESSIONID?
- 关于datagrid的~!急`1
cnndb.open "dsn=aa;uid=uid;owd=password"
cnndb.excute "update tablename^"