VB登录代码的部分解释

VB登录代码的部分解释VB登录代码的部分解释 Dim conn As New ADODB.Connection '创建一新的ADODB.Connection(数据连接)对象 Dim rst As New ADODB.Recordset '创建一新的ADODB.Recordset(数据查询)对象 conn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=E:\testdb.mdb" '利用conn连接数据库: '驱动Microsoft.Jet....

VB登录代码的部分解释 Dim conn As New ADODB.Connection '创建一新的ADODB.Connection(数据连接)对象 Dim rst As New ADODB.Recordset '创建一新的ADODB.Recordset(数据查询)对象 conn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=E:\testdb.mdb" '利用conn连接数据库: '驱动Microsoft.Jet.OLEDB.4.0 '数据源E:\testdb.mdb conn.Open() '打开数据库 Dim str_sql As String '定义一个str_sql str_sql = "select * from userinfo" '给str_sql赋值，这应该是SQL查询语句吧。 rst.Open(str_sql, conn) '查询数据库在VB中使用ADO 在程序设计中,ADO不是作为可视化的控件来使用的,如果要在应用程序中使用ADO组件,需要在"工程"菜单下的"引用"项中选该组件!该组件名称为:"Mircrosoft ActiveX Data Object 2.0 Library" (注:可能有2.5 2.6 或者其他版本) 3->ADO数据访问过程概要使用ADO访问数据库类似于高速公路,首先,必须先修好公路,建立城市与城市间的连接,汽车才能在上面运行,ADO首先也需要建立程序与数据库间的连接,然后在这个连接上执行操作. 因此ADO提供了一个连接对象,该对象负责建立与数据库的连接,因此提供了一些属性以供设置,同时也提供了建立连接的方法与相应连接相关的事件! 连接建立之后,连接对像本身也提供了数据库执行操作的方法,但要更强有力的执行SQL的功能要由另一个命令对象来实现. 此外,一个非常重要的对象是记录集对像,因为在很多时候,需要执行数据库的查询,而查询的结果返回必须以某个容器来承载,就好比高速公路运送回来的货物需要建立一个物资仓库来进行货物的接收和储存. 还需要注意的是,要求程序与数据库之间断开连接. 连接对象,命令对象,和记录集对象分别对应ADO的Connection,Command,和Recordset三个对象 4->ADO Connection对象的属性方法和事件 1.连接对象(Connection)的主要属性属性名称属性说明 Provider 指定要进行连接的提供程序的名称,该属性标识要进行数据连接的数据库类型 CommandTimeOut 设置或者返回产生错误之前执行命令期间需等待的时间,单位为秒 ConnectionTimeOut 设置或者返回产生错误前建立连接期间所等待的时间,单位为秒 ConnectionString 设置建立到数据源的连接的信息,不同的信息单元以";"号分割 State 说明当前连接的状态信息主要属性说明: A.Provider 用 Provider 属性可以设置或返回连接提供者名称,也可以通过ConnectionString属性的内容或open方法的ConnectionString参数设置该属性例如: Con.Provider="Microsoft.Jet.OLEDB.3.51" Con.Provider="sqloledb" 分别表示access与Sql Server的连接支持! B.ConnectionString 例如,可以按以下方式分别设置SQL Server与Access的连接字符串信息 Con.ConnectionString="driver={SQL Server};server=SV1;uid=sa;pwd=;database=pubs" Con.ConnectionString="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\1.MDB ‘也可以直接用IP地址，如:192.168.12.21 " 请注意Access数据库与Sql Server数据库不同的连接方式,Access数据库需要指定具体的文件名,而Sql Server通过指定数据库名来访问连接方式可以还可以是数据源,例如,可以使用建立的数据源连接: Con.ConnectionString="DSN=ACCPSQL;server=SV1;uid=sa;pwd=;" C.State 该属性是只读的,不能进行设置,返回值为adStateClosed常数表示连接已关闭,返回值 adStateOpen常数表示连接是打开的附:Provider Parameters 参数提供程序参数字符串 Micrusoft Jet Microsoft.Jet.OLEDB.3.51 Oracle MSDAORA Microsoft ODBC Driver MSDASQL SQL Server SQLOLEDB Dim conn As ADODB.Connection Dim rs As ADODB.Recordset Set conn = New ADODB.Connection conn.Open Provider = "SQLOLEDB.1;Password=SQL Server密码;Persist Security Info=True;User ID=SQL Server用户名;Initial Catalog=数据库名;Data Source=服务器名或IP" Set rs = New ADODB.Recordset rs.CursorLocation = adUseClient rs.Open "select * from 你的表", conn, adOpenDynamic, adLockBatchOptimistic If Not (rs.BOF And rs.EOF) Then text1.Text = rs.Fields("字段1") ... End If Set rs = Nothing Set conn = Nothing

                    本文档为【VB登录代码的部分解释】，请使用软件OFFICE或WPS软件打开。作品中的文字与图均可以修改和编辑，
                    图片更改请在作品中右键图片并更换，文字修改请直接点击文字进行修改，也可以新增和删除文档中的内容。 
 该文档来自用户分享，如有侵权行为请发邮件ishare@vip.sina.com联系网站客服，我们会及时删除。

                    [版权声明] 本站所有资料为用户分享产生，若发现您的权利被侵害，请联系客服邮件isharekefu@iask.cn，我们尽快处理。

                    本作品所展示的图片、画像、字体、音乐的版权可能需版权方额外授权，请谨慎使用。

                    网站提供的党政主题相关内容(国旗、国徽、党徽..)目的在于配合国家政策宣传，仅限个人学习分享使用，禁止用于任何广告和商用目的。
                

下载需要：免费已有0 人下载

立即下载

VB登录代码的部分解释

你可能还喜欢