VB访问SQL SERVER数据库的几种方法Word文档下载推荐.docx
- 文档编号:14850340
- 上传时间:2022-10-25
- 格式:DOCX
- 页数:9
- 大小:22.01KB
VB访问SQL SERVER数据库的几种方法Word文档下载推荐.docx
《VB访问SQL SERVER数据库的几种方法Word文档下载推荐.docx》由会员分享,可在线阅读,更多相关《VB访问SQL SERVER数据库的几种方法Word文档下载推荐.docx(9页珍藏版)》请在冰豆网上搜索。
③使用SQLServer的VisualBasic库(VBSQL)为DB库的API编程;
④RDO远程数据对象(RemoteDataObjects);
⑤ADO数据对象(ActiveDataObjects)。
1、数据访问对象/Jet
VB支持DataAccessObjects(DAOs)的子集。
DAO的方法虽然不是性能最好的管理客户机—服务器之间的对话方式,但它的确有许多优点。
DAO/Jet是为了实现从VB访问Access数据库而开发的程序接口对象。
使用DAOs访问SQLServer的过程如下:
应用程序准备好语句并送至Jet,Jet引擎(MASJT200.DLL)优化查询,载入驱动程序管理器并与之通讯,驱动程序管理器(ODBC.DLL)通过调用驱动器(SQLSRVR.DLL)的函数,实现连接到数据源,翻译并向SQLServer提交SQL语句且返回结果。
下面是一个用DAOs访问SQLServer的VB实例。
注释:
FormDeclarations
DimmydbAsDatabase
DimmydynasetAsDynaset
PrivateSubForm_Load()
Setmydb=OpenDatabase("
"
False,False,"
ODBC;
DSN=Myserver;
WSID=LCL;
DATABASE=sales"
)
Setmydynaset=mydbCreateDynaset("
Select*fromCustomers"
EndSub
上述例子是以非独占、非只读方式打开sales数据库,并检索Customers表中的所有字段。
OpenDatabase函数的最后一个参数是ODBC连接字符串参数,它指明了MicrosoftAccess连接到SQLServer所需知道的一些内容。
其中“DSN”为数据源名,“WSID”为工作站名,“DATABASE”为所要访问的数据库名。
2、利用ODBCAPI编程
ODBC(OpenDatabaseConnectivity)的思想是访问异种数据库的一种可移植的方式。
与数据资源对话的公用函数组装在一个称为驱动程序管理器(ODBC.DLL)的动态连接中。
应用程序调用驱动程序管理器中的函数,而驱动程序管理器反过来通过驱动器(SQLSRVR.DLL)把它们送到服务器中。
下面的代码使用上面一些函数先登录到一个服务器数据库,并为随后的工作设置了语句句柄。
GlobalgiHEnvAsLong
GlobalgiHDBAsLong
GlobalgiHStmtAsLong
DimmyResultAsinteger
DimmyConnectionAsSrting
DimmyBuffAsString*256
DimmyBufflenAsInteger
IfSQLAllocEnv(giHEnv)<
>
SQL_SUCCESSThen
MsgBox"
Allocationcouldn’thappen!
EndIf
IfSQLAllocConnect(giHEnv,giHDB)<
MsgBox"
SQLServercouldn’tconnect!
myConnection="
DSN=myServer;
UID=LCL;
PWD=;
APP=ODBCTest;
DATABASE=sales"
myResult=SQLDriverConnect
(giHDB,Test,form1.hWnd,myConnection.len(myConnection),
myBuff,256,myBufflen,SQL_DRIVER_COMPLETE_REQUIED)
myResult=SQLAllocStmt(giHDS,giHStmt)
myResult=SQLFreeStmt(giHStmt,SQL_COLSE)
rsSQL="
Select*fromCustomersWhereCity="
Hunan"
myResult=SQLExecDirect(giHStmt,rsSQL,Len(rsSQL))
3、使用VBSQL对DB库API编程
DB库是SQLServer的本地API,SQLServer的VisualBasic库(VBSQL)为VisualBasic程序员提供API。
从一定意义上说,VBSQL是连接VisualBasic程序到SQLServer的性能最好最直接的方式。
VBSQL包含以下三个文件:
VBSQL.VBX:
包含库函数,具有访问重要的消息和处理错误的能力;
VBSQL.BI:
包括所有的常量和变量说明;
VBSQL.HLP:
Windows帮助文件,使用VBSQL的指南;
使用VBSQL时,必须将VBSQL.BI加入到VisualBasic工程文件中,并确保VB程序运行时有VBSQL.VBX文件。
一般的DB库API编程的过程是这样的:
先通过调用SqlInit对DB库进行初始化,再调用SqlConnection打开一个连接,然后就可做一些工作。
下面的代码是一个初始化DB库并登录到服务器的通用例程。
PrivateSubInitializeApplication()
DBLIB_VERSION=SqlInit()
IfDBLIB_VERSION="
Then
MsgBox"
CouldnotinitializeDBLIB!
Exitapplication."
MB_ICONEXCLAMATION
EndIf
EndSub
PrivateFunctionLoginToServer()Asinteger
loginToServer=SUCCEED
Status%=SqlSetloginTime%(loginTimeOut)
IfgiSqlConn<
0Then
SqlClose(giSqlConn)注释:
关闭已打开的连接
giSqlConn=SqlOpenConnection(gsServerName,
gsLoginID,gsPassword,ProgramName,ProgramName)
liresuit=SqlUse(giSqlConn,"
Sales"
Else
LogintoServer=FAIL
EndFunction
4、RDO远程数据对象(RemoteDataObjects)
要讨论RDO,就必然要谈到DAO。
RDO是从DAO派生出来的,但两者很大的不同在于其数据库模式。
DAO是针对[记录(Records)]和[字段(Fields)],而RDO是作为[行(Rows)]和[列(Columns)]来处理。
也就是说DAO是ISAM模式,RDO是关系模式。
此外DAO是访问Access的Jet引擎(Jet是ISAM)的接口,而RDO则是访问ODBC的接口。
可见,RDO是综合了DAO/Jet、VBSQL/DBLib以及ODBC的优点的对象(Object)。
需要强调的是,RDO是包裹着ODBCAPI的一层薄薄的外壳,被设计成在后台(服务器端)有数据库存在的前提下运行,同时也是针对SQLServer和Oracle而特别设计的。
RDO的优势在于它完全被集成在VB之中。
此外,直接访问SQLServer存储过程、完全支持T-SQL、T-SQL调试集成在开发环境中、VisualDatabaseTools的集成化等,也是RDO的长处。
在RDO的对象和集合中,有很多对数据库的状态和设定进行操作的属性(Property),以及对数据库进行操作的方法(Method)。
利用这些,从RDO2.0起就可以开发事件驱动的数据库应用程序。
RDO对象与VB中其他对象的概念相同。
与VB用的ActiveX控件(以往称为CustomControl或OCX、VBX)相似的是,RDO也带有属性和方法;
但同Spread、InputMan等普遍应用的ActiveX控件不同的是,RDO没有自己的用户界面,因而可以和VB标准的Timer控件归为同一类。
当然也可以将RDO看作调用ODBCAPI函数,进而对后台数据库操作加以控制的对象。
在RDO的属性和方法中,包含了对单个的ODBCAPI函数以及一连串API函数的调用。
①rdoEngine对象
最初调用RDO对象以及RDC(远程数据控件)时,自动生成rdoEngine对象的附带事件(incident)。
rdoEngine用于对RDO全局属性的参数、选项进行设置,是在RDO的阶层结构内处于最上层的对象,包含了所有的其他对象。
rdoEngine对象与DAO/Jet不同,虽然被多个应用程序共享,但体现rdoEngine对象的设定值的属性却并不共用,而是在各自的应用程序的程序界面中对其分别加以设定。
这些设定值对其他使用RDO以及RDC的应用程序没有任何影响。
rdoEngine不是集合的要素,而是重新定义的对象,rdoEngine对象不能被追加作成对象属性的初值。
②rdoEnvironment对象
RDO对象在自动创建rdoEngine对象时,将rdoEnviroment对象的初始值生成并保存为rdoEnviroments(0)。
一般情况下,应用程序中不必追加rdoEnvironment对象,大多只需对已有的rdoEnviroments(0)进行操作就可以了。
只有在支持一个以上事务(Transaction),需要将用户名和口令信息分别处理的情况下,利用rdoCreateEnvironment方法将特定的用户名和口令值做成新的rdoEnvironment对象。
在这个方法中可以指定固有名、用户名和口令,如果所指定的值与rdoEnvironments集合的已经存在的成员名称相同,会
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- VB访问SQL SERVER数据库的几种方法 VB 访问 SQL SERVER 数据库 方法