VB应用程序访问SQL Server方法探讨.docVIP

VB应用程序访问SQL Server方法探讨 　　Microsoft Visual Basic(简称VB)作为一种面向对象的可视化编程工具，具有简单易学的，灵活方便和易于扩充的特点。而且Microsoft为其提供了与SQL Server通信的API函数集及工具集。因此它越来越多地用作大型公司数据和客户机—服务器应用程序的前端。与后端的Microsoft SQL Server相结合，VB能够提供一个鲁棒的、高性能的客户机—服务器方案。 使用Visual Basic作为前端开发语言，与SQL Server接口有三种常用的方法，即： 1、数据访问对象/Jet 2、为ODBC API编程 3、使用SQL Server的Visual Basic库(VBSQL)为DB库API编程 　　本文将讨论这三种VB应用程序管理SQL Server数据的方法，并比较每种方法的性能和优缺点。  　　方法1.数据访问对象/JetVisual Basic支持Data Access Objects(DAOs)的子集。DAO的方法虽然不是性能最好的管理客户机—服务器之间的对话方式，但它确有许多优点。使用DAOs访问SQL Server的过程如下：应用程序准备好语句并送至Jet，Jet引擎(MASJT200.DLL)优化查询，载入驱动程序管理器并与之通讯，驱动程序管理器(ODBC.DLL)通地调用驱动器(SQLSRVR.DLL)的函数，实现连接到数据源，翻译并向SQL Server提交SQL语句且返回结果。下面是一个用DAOs访问SQL Server的VB实例。  Form Declarations Dim mydb As Database Dim mydynaset As Dynaset Private Sub Form_Load() Set mydb=OpenDatabase(,False,False,ODBC;DSN=Myserver;WSID=LCL;DATABASE=sales) Set mydynaset=mydb CreateDynaset(Select*from Customers) End Sub 　　上述例子是以非独占、非只读方式打开sales数据库，并检索Customers表中的所有字段。OpenDatabase函数的最后一个参数是ODBC连接字符串参数，它指明了Microsoft Access连接到SQL Server所需要知道的一些内容。其中“DSN”为数据源名，“WSID”为工作站名，“DATABASE”为所要访问的数据库名。 方法2.用ODBC API编程 ODBC(Open Database Connectivity)的思想是访问异种数据库的一种可移植的方式。与数据资源对话的公用函数组装在一个称为驱动程序管理器(ODBC.DLL)的动态连接中。应用程序调用驱动程序管理器中的函数，而驱动程序管理器反过来通过驱动器反过来通来驱动器(SQLSRVR.DLL)把它们送到服务器中。 　　用ODBC API编程，一般要用到以下一些函数。下面列出了常用的函数以及它们的功能。 函数 功能 SQLALLocEnv 初始化ODBC环境，返回环境句柄 SQLALLocConnect 为连接句柄分配内存并返回连接句柄 SQLConnect 连接一个SQL数据资源 SQLDriverConnect 连接一个SQL数据资源，允许驱动器向用户询问信息 SQLALLocStmt 为语句句柄分配内存并返回语句句柄 SQLExecDirect 把SQL语句送到服务器 SQLFetchAdvances 到结果集的下一行(或第一行) SQLGetData 从结果集的特定的一列取回数据 SQLFreeStmt 释放与语句句柄相关的资源 SQLDisconnect 切断连接 SQLFreeConnect 释放与连接句柄相关的资源 SQLFreeEnv 释放与环境句柄相关的资源 下面的代码使用上面一些函数先登录到一个服务器数据库，并为随后的工作设置了语句 句柄。 Global giHEnv As Long Global giHDB As Long Global giHStmt As Long Dim myResult As integer Dim myConnection As Srting Dim myBuff As String*256 Dim myBufflen As Integer If SQLAllocEnv(giHEnv)SQL_SUCCESS Then MsgBoxAllocation couldnt h