|
![]() |
名片设计 CorelDRAW Illustrator AuotoCAD Painter 其他软件 Photoshop Fireworks Flash |
|
由于我们要操作数据库,要使用到ADO,因此我们要引用Microsoft Activex Data Object 2.5 Library.(如下图) 现在我们开始写组件中的方式 1、 OpenDB方式 OpenDB方式的思路是建立与MS SQL SERVER7.0的连接,这可以使用SQLOLEDB Provider来实现。建立连接后就可以创建一个包含所有CD信息的记录集。根据以上分析我们写出如下代码。 Option Explicit Private Conn As ADODB.Connection Private RecordSetCD As ADODB.Recordset ’打开连接和结果集 Private Sub OpenDB() Set Conn = New ADODB.Connection Set RecordSetCD = New ADODB.Recordset Conn.Open "Provider=SQLOLEDB;DataSource=MUSE;Initial Catalog=Music;UserId=Wayne;Password=AbCdEfG" RecordSetCD.Open "SELECT * FROM CD", Conn End Sub 2、 CloseDB方式 由于连接数据库是相称昂贵的,所以在不需要使用数据库时,一定要记住关闭Recordset 和Connection对象,CloseDB就是完成这一操作。 Private Sub CloseDB() ’关闭结果集RecordSetCD If Not (RecordSetCD Is Nothing) Then If RecordSetCD.State = adStateOpen Then RecordSetCD.Close End If Set RecordSetCD = Nothing End If ’关闭连接Conn If Not (Conn Is Nothing) Then Conn.Close Set Conn = Nothing End If End Sub 返回类别: 教程 上一教程: ADO 存取数据库时如何分页显示 下一教程: 利用随机函数获取某一范围的整数及其应用 您可以阅读与"手把手教你使用VB来创建ASP组件(3)"相关的教程: · 手把手教你使用VB来创建ASP组件(1) · 手把手教你使用VB来创建ASP组件(4) · 手把手教你使用VB来创建ASP组件(6) · 手把手教你使用VB来创建ASP组件(4) · 手把手教你使用VB来创建ASP组件(6) |
![]() ![]() |
快精灵印艺坊 版权所有 |
首页![]() ![]() ![]() ![]() ![]() ![]() ![]() |