注册 登录  
 加关注
   显示下一条  |  关闭
温馨提示!由于新浪微博认证机制调整,您的新浪微博帐号绑定已过期,请重新绑定!立即重新绑定新浪微博》  |  关闭

任焱-廊坊师范学院信息技术提高班十期

改变是痛苦的,可是不改变就不会有改变!

 
 
 

日志

 
 

解析实例1  

2013-05-26 21:26:17|  分类: 默认分类 |  标签: |举报 |字号 订阅

  下载LOFTER 我的照片书  |

系统登录对话框是数据库管理系统的基本功能之一,用于提供系统用户登录身份验证功能,只有成功登录之后才能启动和使用系统,从而保证系统数据安全。

软件知识点:
默认按钮,取消按钮
ADO Connection 对象
ADO Recordset 对象
自定义函数过程

Dim objCn As New Connection, objRs As New Recordset, strCn As String
Dim strSQL As String
 建立数据库连接:
 objCn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.3.51;"  _
 "Data Source=" & "C:\Users\RY\Desktop\实例01.mdb"
objCn,Open
ADO Connection 对象用于创建一个到达某个数据源的开放连接。通过此连接,您可以对一个数据库进行访问和操作。
Connection 对象的 ConnectionString 属性:设定连接数据源的信息,包括 FlieName、Password、Userld、DataSource、 Provider 等参数。
Provider=Microsoft.Jet.OLEDB.3.51是ACCESS 97版本的驱动,如果ACCESS 2000的话就是Provider=Microsoft.Jet.OLEDB.4.0
Data Source:数据源——在数据源中存储了所有建立数据库连接的信息。就象通过指定文件名称可以在文件系统中找到文件一 样,通过提供正确的数据源名称,你可以找到相应的数据源连接

执行查询命令,获得用户登录口令:
strSQL = "SELECT 口令 FROM 系统用户 WHERE 用户名='" &_
UserName & "'"        'SQL查找语句
  Set objRs.ActiveConnection = objCn
objRs.Open (strSQL)
ADO Recordset 对象用于容纳一个来自数据库表的记录集。一个 Recordset 对象由记录和列(字段)组成。
在 ADO 中,此对象是最重要且最常用于对数据库的数据进行操作的对象。
使用 ActiveConnection属性打开指定RecordsetConnection对象。
Select fields From table [Where..]  查询语句
一开始我敲代码的时候也犯了一个错误:
strSQL = "SELECT 口令 FROM 系统用户 WHERE 用户名='" &  _
UserName & "'"
搞不清楚这里的单引号和双引号,到底是几个,到底是哪个和哪个对应,导致最后不管怎么调试都不能成功实现功能!

解析实例1 - 任焱 - 任焱-廊坊师范学院信息技术提高班十期
 
通过实例1的练习,回顾了默认按钮,取消按钮的知识,同时学习了Connection 对象和 Recordset 对象  实现了对数据库的连接

  评论这张
 
阅读(75)| 评论(21)
推荐 转载

历史上的今天

在LOFTER的更多文章

评论

<#--最新日志,群博日志--> <#--推荐日志--> <#--引用记录--> <#--博主推荐--> <#--随机阅读--> <#--首页推荐--> <#--历史上的今天--> <#--被推荐日志--> <#--上一篇,下一篇--> <#-- 热度 --> <#-- 网易新闻广告 --> <#--右边模块结构--> <#--评论模块结构--> <#--引用模块结构--> <#--博主发起的投票-->
 
 
 
 
 
 
 
 
 
 
 
 
 
 

页脚

网易公司版权所有 ©1997-2017