vb数据库编程

[dtysam]

需求对象的具体使用方法和属性.
谢谢各位!

[饮水需思源]

dim ac_tmp as new adodb.connection
dim ar_tmp as new adodb.recordset

With ac '数据库连接
If .State = adStateOpen Then .Close
.ConnectionString = "driver=SQL Server;server=" & 计算机名或IP地址& ";uid=sa;pwd=;database=" & 数据库名称
.CommandTimeout = 120
.Open
End With

if ar_tmp.state=adstateopen then ar_tmp.close
'打开数据表
ar_tmp.open "select * from tablename ",ac_tmp,adopenkeyset,adlockreadonly
set mshflexgrid.datasource=ar_tmp
set ar_tmp=nothing '销毁对象
set ac_tmp=nothing

[dtysam]

有关ado对象中各对象的属性、方法

[klbt]

友情up

[dtysam]

用msdn获得