文章导航PC6首页软件下载单机游戏安卓资源苹果资源

pc软件新闻网络操作系统办公工具编程服务器软件评测

安卓新闻资讯应用教程刷机教程安卓游戏攻略tv资讯深度阅读综合安卓评测

苹果ios资讯苹果手机越狱备份教程美化教程ios软件教程mac教程

单机游戏角色扮演即时战略动作射击棋牌游戏体育竞技模拟经营其它游戏游戏工具

网游cf活动dnf活动lol周免英雄lol礼包

手游最新动态手游评测手游活动新游预告手游问答

您的位置:首页技术开发ASP教程 → 手把手教你使用VB来创建ASP组件3

手把手教你使用VB来创建ASP组件3

时间:2004/11/7 4:14:00来源:本站整理作者:蓝点我要评论(0)

由于我们要操作数据库,要使用到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






相关阅读 Mac访问Windows共享文件夹Windows 7正版系统验证方法windows 8.1系统版本号查看方法Windows 8.1系统电话激活时无法输入微软返回代码解决方法Windows 8如何调整屏幕分辨率windows8.1磁盘占用100%解决方法Mac双系统如何删除Boot Camp安装的Windows分区Apple教你如何在Mac 上运行 Windows

文章评论
发表评论

热门文章 没有查询到任何记录。

最新文章 《龙珠:超宇宙》 战斗E3 2014:瘆人僵尸《消 asp代码实现access数据导出到excel文件如何使用FSO读取Js文件内容并可以编辑修改对初学者有用的一些asp函数集学习ASP编程必会的代码

人气排行 asp代码实现access数据导出到excel文件asp不需要任何配置的伪静态实现如何使用FSO读取Js文件内容并可以编辑修改asp去除html标记和空格的代码Asp全选删除代码教大家网页伪静态知识及其2种实现方法Microsoft SQL Server 7.0安装问题(一)ASP.NET中的Code Behind技术4