数据库

位置:IT落伍者 >> 数据库 >> 浏览文章

使用ADO对象连接SQL Server数据库


发布日期:2019年07月22日
 
使用ADO对象连接SQL Server数据库

链接代码如下

Private Sub Command_Click()

Dim cn As Connection

Dim rs As Recordset

Dim str As String

Set cn = New ADODBConnection

str = Provider=SQLOLEDB;Persist Security Info=False;User ID=sa;Initial Catalog=RSDAGLXT;Data Source=

cnOpen str

Set rs = New ADODBRecordset

rsCursorType = adOpenKeyset

rsLockType = adLockOptimistic

rsOpen 人事档案信息表 cn

Set MSHFlexGridDataSource = rs

End Sub

上一篇:使用ODBC接口访问MySQL

下一篇:解决CSV字段数据带有双引号的问题