主要分为四步:
1.创建数据库
2.设计窗体
3。建立ADO引用
4.编写功能代码
ADO Connection:连接对象,用于创建数据连接,在使用其他对象之前必须先建立数据源连接,然后在连接对象上创建和使用其他对象。
ADO Recordset :记录集对象,保存从数据源获得的记录集。在本例中从数据库中获得用户名和口令,从而进行验证。
建立数据库连接代码:
objcn.ConnectionString="Provider=Microsoft.Jet.OLEDB.4.0;" & "DataSource="& App.Path & "\实例1.mdb"
objcn.Open
'执行查询命令,获得用户登录口令
strsql = "SELECT 口令 FROM 系统用户 WHERE 用户名='"&username & "'"
Set objrs.ActiveConnection = objcn
objrs.Open (strsql)
关闭数据库连接释放对象
objcn.Close
Set objrs = Nothing
Set objcn = Nothing