急求VB ado控件连接SQL数据库的方法,全代码!

急求VB ado控件连接SQL数据库的方法,全代码!,第1张

adodc1connectionstring="Driver={SQL Server};Server=服务器IP地址;uid=数据库用户名;pwd=数据库密码;database=数据库名称"

adodc1recordsource="简单查询SQL语句" '//注意,不能是 *** 作查询, *** 作查询由数据集合来完成

adodc1refresh

set mshflexgrid1datasource=adodc1

strConn = "Provider=SQLOLEDB1;Integrated Security=SSPI;Persist Security Info=False;User ID=sa;Initial Catalog=kaoqing;Data Source=JANSON"

不知上句的字符串内容是否正确。sql数据库的连接代码我没有,给ACCESS数据库的连接代码供参考:

strConn = "Provider=MicrosoftJetOLEDB40;Data Source=" & AppPath & "\hxrkglmdb;Persist Security Info=False"

你的其它代码经调试未发现问题,正确运用了ADODB数据对象。但从你的叙述中看,你另外使用了ADODC数据控件,是否是该功件的属性设置有问题。

补充:

1)ADODC数据控件作连接字符串正确后,如未指定数据表,运行会报错,你可删除该控件,运行你的代码不会有问题。

如果你是新建数据工程,VB会自行加载ADO数据对象。如果你是新建EXE工程,则应由工程菜单选引用选项,在其窗口选MICROSOFT ACTIVEX DATA OBJECTS 20 LIBRARY加钩即可。不过建议按新建数据工程简单。

2)我用以下代码调试你的主要代码,仅按新建EXE工程,则应由工程菜单选引用选项,在其窗口选MICROSOFT ACTIVEX DATA OBJECTS 20 LIBRARY加钩,并添加DATAGRID部件,无问题,在VB6调试:

Private Sub Form_Load()

Dim strConn As String

Dim pubConn As New ADODBConnection

Dim rsTable As New ADODBRecordset

Dim strSQL As String

'strConn = "Provider=SQLOLEDB1;Integrated Security=SSPI;Persist Security Info=False;User ID=sa;Initial Catalog=kaoqing;Data Source=JANSON"

strConn = "Provider=MicrosoftJetOLEDB40;Data Source=" & AppPath & "\hxrkglmdb;Persist Security Info=False"

pubConnOpen strConn

rsTableCursorLocation = adUseClient

strSQL = "select from mdlk_sj"

'strSQL = "select from attdcardrec"

rsTableOpen strSQL, pubConn, adOpenDynamic, adLockOptimistic

Set DataGrid1DataSource = rsTable

End Sub

能方便的 *** 作数据记录, 但如果不需要界面,仅需要实现连接数据库,然后做些删除,更新,添加的功能,则使用ADO对象较好。 使用 ADO Data 控件 ADO Data 控件使用 Microsoft ActiveX 数据对象(ADO) 来快速建立数据绑定的控件和数据提供者之间的连接。数据绑定控件是任何具有“数据源”属性的控件。数据提供者可以是任何符合 OLEDB 规范的数据源。使用 Visual Basic 的类模块也可以很方便地创建子集的数据提供者。 尽管可以在应用程序中直接使用 ActiveX 数据对象,但 ADO Data 控件有作为一个图形控件的优势(具有“向前”和“向后”按钮),以及一个易于使用的界面,使您可以用最少的代码创建数据库应用程序。 图 74 ADO Data 控件 在 Visual Basic 的“工具箱”中不少控件都可以作为数据绑定的控件,包括复选框、组合框、图像、标签、列表框、框、以及文本框控件等。此外,Visual Basic 还包括了若干种数据绑定的 ActiveX 控件,诸如 DataGrid、DataCombo、Chart、以及 DataList 控件等。用户也可以创建自己的数据绑定的 ActiveX 控件,或从其他开发商购买控件。 Visual Basic以前的版本提供了内在的 Data 控件和 Remote Data 控件 (RDC) 来进行数据访问。这两种控件仍包括在 Visual Basic 中,以提供向后兼容。不过,因为 ADO 的适应性更广,因此建议用户使用 ADO Data 控件来创建新的数据库应用程序。 详细信息 关于数据绑定的控件的完整列表位于“绑定到 ADO Data 控件的控件”中。要了解如何使用这些内在的Data 控件或 Remote Data 控件,请参阅“使用 Data 控件”或“使用 Remote Data 控件”。关于创建数据提供者的详细信息,请参阅“创建数据识别类”。 可能的用法 连接一个本地数据库或远程数据库。 打开一个指定的数据库表,或定义一个基于结构化查询语言 (SQL) 的查询、或存储过程、或该数据库中的表的视图的记录集合。 将数据字段的数值传递给数据绑定的控件,可以在这些控件中显示或更改这些数值。 添加新的记录,或根据对显示在绑定的控件中的数据的任何更改来更新一个数据库。 要创建一个客户、或前端数据库应用程序,应在窗体中添加 ADO Data 控件,以及其它所需要的任何 Visual Basic 控件。可以根据您的需要在窗体中放置多个 ADO Data 控件。不过,请注意,这种控件是一种相当“昂贵”的创建连接的方法,应在第一个控件至少有两个连接,且以后的每个控件至少多一个连接时使用。 用最少的代码创建一个前端数据库应用程序 通过在设计时设置一些属性,可以用最少的代码来创建一个数据库应用程序。如果正在使用OLE DB 数据源,则相应的Microsoft 数据链接名称(Data Link Name)(MDL) 必须是在您的机器上创建的。请参阅“创建 Northwind 的OLE DB Data Link”,以获得一个循序渐进的示例。 要创建一个简单的前端数据库应用程序 窗体上放置一个 ADO Data 控件。(该图标的工具提示为 "ADODC"。) 如果该控件不在“工具箱”中,请按 CTRL+T 键,显示“部件”对话框。在这个“部件”对话框中,单击“Microsoft ADO Data Control”。在“工具箱”中,单击选定“ADO 数据控件”。然后按 F4 键显示“属性”窗口。

以上就是关于急求VB ado控件连接SQL数据库的方法,全代码!全部的内容,包括:急求VB ado控件连接SQL数据库的方法,全代码!、用vb连接sql数据库时总是提示:ADODC:没有指定记录源[ADO]:没有为命令对象设置命令、VB窗体怎么用ADO控件或者DATAGrid控件连接Access数据库等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!

欢迎分享,转载请注明来源:内存溢出

原文地址: http://outofmemory.cn/sjk/9464118.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2023-04-28
下一篇 2023-04-28

发表评论

登录后才能评论

评论列表(0条)

保存