资 源 简 介
VB 6 使用ODBC DSN连接SQL Server数据库,要想运行本实例,首先需要附加SQL数据库,然后配置ODBC,ODBC数据源名称是“RSDAGLXT”。将连接数据库的代码写在一个按钮事件中,当用户单击按钮后,开始使用DSN连接数据库。本示例主要是连接SQLSERVER,因此主代码文件代码比较少。连接后会从数据库中读取出数据,并绑定到MSHFlexGrid控件中显示,运行效果请见截图。主代码:
Dim cn As New ADODB.Connection
Dim rs As New ADODB.Recordset
cn.Open DSN=RSDAGLXT;Uid=sa;Pwd=
rs.Open 人事档案信息表, cn, adOpenKeyset, adLockOptimistic
Set MSHFlexGrid1.DataSource = rs
MSHFlexGrid1.ColWidth(0) = 100