您好,欢迎访问三七文档
当前位置:首页 > 商业/管理/HR > 项目/工程管理 > ADODB编码连接字实用例子打印
1ADODB编码连接字的实例VB中,关于SQL数据库的连接是比较复杂的,但也有一个可以参考的学习思路,方法如下。1、建立数据库链接在工具条中,有一个“数据视图窗口”的工具,用它可以建立各种数据库的链接。建立链接的过程:点击“数据视图窗口”,出现“数据视图”窗体,点击选中“数据链接”,按右键,点击“添加数据链接”,出现“数据链接属性”窗口,有四个菜单:“提供程序”、“连接”、“高级”、“所有”。选中“提供程序”菜单,这里有许多用于链接的驱动程序,选中“MicrosoftOLEDBProviderforSQLServer”,点击“下一步”。“MicrosoftOLEDBProviderforSQLServer”是真正的SQL数据库连接字用的驱动程序。当选中“MicrosoftOLEDBProviderforSQLServer”,点击“下一步”,则自动进入“连接”窗体界面。这个“连接”窗体界面的内容,随前面选取的驱动程序而定。因为前面选择的是“MicrosoftOLEDBProviderforSQLServer”,所以,“连接”窗体的主要内容就是直接访问SQL数据库的相关内容的设置,如下:在“…….服务器名称”一栏中怎么选择呢?如SQL数据库服务器安装时是选择当地默认的实例,即以本地计算机名代替的服务器,则此处应填写的内容是:(local),或者是:本地的计算机名。估计,非本地的则可填写:服务器的IP地址或服务器名称。在“输入登录服务器的信息”一栏中怎么选择呢?当选择“使用指定的用户名和密码”一项时,用户名与密码是在SQL服务器安装时选定的内容(值)。若不用密码及用户名登入,则连接字的密码应代之为:IntegrateSecurity=SSPI,表示用“WindowsNT集成安全设置”之意。但实际的ADODB的连接字是不能用这个NT打开的。在“服务器上选择数据库”一栏中怎么选择呢?当前面两项内容选择正确后,此处的内容是存在可选的,选中即可。最后“测试连接”,显示成功。则在“数据视图”窗体的“数据链接”中将出现“Datelink1”,表示建立了以“Datelink1”为名的第1个数据库链接。当然也可以建立多个,名字将分别为“Datelink2”、“Datelink3”……2、从已建立的数据库链接的属性中找连接字。当选中“数据视图”窗体的“数据链接”,出现“Datelink1”,并选中“Datelink1”,按右键出现弹出菜单,选中“属性”,点击,并可看见这个链接所用到的名字“Name”,“Name”对应的值,就是连接字的主要内容。只是缺少“Password=”与“.ConnectionTimeout=”,因此只要把这两向补齐,就是一个完整可用的ADODB的连接字,而且也适用于ADODC控件的字连接,即ConnectionString,但不需要双引号“”而已。注意:在前面“数据链接属性”窗口的四个菜单“提供程序”、“连接”、“高级”、“所有”中,前面只重点介绍了“提供程序”与“连接”两项,实际上,“高级”就有ConnectionTimeout属性的选择项。而“提供程序”、“连接”、“高级”三项的选择结果,都在“所有”项中集中显示出来,而且“所有”项中,还有前三项不具有的其它的内容,因此,要注意察看与应用。2用上述方法得到的参考实例如下:PrivateSubCommand1_Click()Me.Caption=ADODB编程Me.ClsDimconAsADODB.Connection注:ADODC控件用的申明,不用ADODB,也不用Adodc。DimrsAsNewADODB.RecordsetSetcon=NewADODB.Connectioncon.ConnectionString=Provider=SQLOLEDB.1;PersistSecurityInfo=False;UserID=sa;InitialCatalog=数据库名;DataSure=(local);Password=密码值(注:无时不选此项);UseProcedureforpreplare=1;AutoTranslate=True;PacketSize=4096;WorkstationID=(local)(注:或是局域网的机器名);UseEncryptionforDate=False;TagWithcolumncollationwhenPossible=Falsecon.Openrs.OpenSelect*from数据库内的数据表或视图名,conMe.AutoRedraw=Truers.MoveFirstDimptrAsIntegerForptr=0To20Printrs.Fields(ptr).Name,注:Name表示是表格的列名。NextptrWhileNotrs.EOF()Print3Forptr=0To20Printrs.Fields(ptr).Value,注:Value表示是表格的数值。Nextptrrs.MoveNextWendEndSub其它内容:1、ADODC控件(简称ADO控件)相关知识ADODC控件------部件:MicrosoftADODateControl6.0(OLEDB)DataGrid控件------部件:MicrosoftDataGridControl6.0(OLEDB)DateCombo、DataList控件------部件:MicrosoftDataListControl(OLEDB)代码编程:----引用对象库:MicrosoftActiveXDataObjeect2.5Library2、ADODB完全代码相关知识ADODC控件代码与ADODB连接字代码的申明是不同的。DimconAsconnection此变量con是准备用作ODBC的DSN类型的连接。DimconAsADODB.connection此变量con是用于SQL数据库的字连接。3、Refresh:刷新,Show:显示,Print:输出,Open:打开Cls或Close:关闭,Load:加载,Set:设置,Me:当前窗体Execute:执行指定的内容。如:Setrecordset=connection.Execute(,)4、DataGrid颜色:背景颜色,BackColor;字体颜色,ForeColor格线颜色,RowDividerStyle。
本文标题:ADODB编码连接字实用例子打印
链接地址:https://www.777doc.com/doc-2896212 .html