VB通过ADO连接SQL数据的两种方法.doc

《VB通过ADO连接SQL数据的两种方法.doc》由会员上传分享，免费在线阅读，更多相关内容在工程资料-天天文库。

1、VB通过ADO连接SQL数据的两种方法VB使用ADO数据库可以分为有源数据库和无源数据库，即是否使用了DSN数据源，如下例：1、在连接数据库前首先要在VB菜单中“工程”-“引用”从中选择microsoftactiveXDataobjects2.6library和microsoftactiveXDataobjectsrecordset2.6两个组件，这是在连接数据前所必做的工作。2、接下来定义ADO的连接对象，如下所示：Setconn=NewADODB.ConnectionSetrs=NewADODB.Recordset第一种方法采用

2、的是无源的数据库连接方法conn.ConnectionString=Driver={sqlserver};server=JSZX3-11;uid=sa;pwd=;database=wzcconn.ConnectionTimeout=30conn.Openrs.Openselect用户名,密码fromloginwhere用户名='&Trim(Combo1.Text)&'And密码='&Trim(Text1.Text)&',conn,adOpenStatic,adLockReadOnly,adCmdTextIfrs.EOF=TrueAn

3、drs.BOFThenm=MsgBox(请重新登录,vbExclamation)Text1.Text=Text1.SetFocusElseForm1.HideEndIfrs.Close这是第二种方法连接数据库的方法，这一种方法是采用有源的方法与数据库连接的方法，代码如下所示：Setconn=NewADODB.ConnectionSetrs=NewADODB.Recordsetconn.ConnectionString=DSN=login;uid=sa;pwd=;conn.ConnectionTimeout=30conn.Openrs

4、.Openselect用户名fromlogin,conn,adOpenStatic,adLockReadOnly,adCmdTextDimiAsStringFort=0ToVal(rs.RecordCount)-1i=Trim(rs.Fields(用户名).Value)rs.MoveNextCombo1.AddItemiNexttrs.Close连接数据库的方法很多很多，只要各位去勇敢的偿试一下，就可以感觉数据库的方法并不是很难，本人以前也很想做这方法的工作，只是学识不深，未能完成胸中大志，如今对这些方法的多少有一些了解，特意为那些

5、初学者以供学习之用。本文关键字:VB技术教程   VB通过ADO连接SQL数据的两种方法