使用vbsql对db库api编程
db库是sql server的本地api，sql server的visual basic库(vbsql)为visual basic程序员提供api。从一定意义上说，vbsql是连接visual basic程序到sql server的性能最好最直接的方式。vbsql包含以下三个文件：
vbsql.vbx 包含库函数，具有访问重要的消息和处理错误的能力
vbsql.bi 包括所有的常量和变量说明
vbsql.hlp windows帮助文件，使用vbsql的指南
使用vbsql时，必需将vbsql.bi加入到visual basic工程文件中，并确保vb程序运行时有vbsql.vbx文件。 一个典型的vbsql对话中，一般要用到以下这些函数。
函数功能
sqlallocenv
初始化odbc环境，返回环境句柄
sqlallocconnect
为连接句柄分配内存并返回连接句柄
sqlconnect
连接一个sql数据资源
sqldriverconnect
连接一个sql数据资源，允许驱动器向用户询问信息
sqlallocstmt
为语句句柄分配内存并返回语句句柄
sqlexecdirect
把sql语句送到服务器
sqlfetchadvances
到结果集的下一行(或第一行)
sqlgetdata
从结果集的特定的一列取回数据
sqlfreestmt
释放与语句句柄相关的资源
sqldisconnect
切断连接
sqlfreeconnect
释放与连接句柄相关的资源
sqlfreeenv
释放与环境句柄相关的资源
一般的db库api编程的过程是这样的：先通过调用sqlinit对db库进行初始化，再调用sqlconnection打开一个连接，然后就可做一些工作。
下一页的代码是一个初始化db库并登录到服务器的通用例程。
Photoshop教程 数据结构 五笔输入法专题 QQ病毒专题 共享上网专题 Google工具和服务专题 下面的代码是一个初始化db库并登录到服务器的通用例程。
private sub initializeapplication()
dblib-version=sqlinit()
if dblib_version=""then
msgbox"could not initialize dblib!exit application.",
mb_iconexclamation
end
end if
end sub
private function logintoserver() as integer
logintoserver=succeed
status%=sqlsetlogintime%(logintimeout)
if gisqlconn<>0 then
sqlclose(gisqlconn) ’关闭已打开的连接
gisqlconn=sqlopenconnection(gsservername,gsloginid,gspassword,
programname, programname)
if gisqlconn<>o then
liresult=sqluse(gisqlconn,"sales")
else
logintoserver=fail
end if
end function
性能比较
以上三种访问sql server的方法各有各的特点。daos方法是基于对象的，因而便于使用，但是它从visual basic到sql server的最慢的方式。odbc api和vbsql方法从本质上讲是基于程序的。odbc api方法通用性好，允许最强的互操作性，编程简单，但速度慢于vbsql方法。vbsql方法通过vbsql控件，提供了重要的sql server前端应用程序所需的灵活性、强大功能和良好性能。它具有真正的事件驱动及错误处理能力，完全支持异步处理、游标和计算列等。这些都是vbsql方法超出其它方法的优势，但其编程稍复杂。至于实际使用哪一种接口方式，在很大程度上依赖于用户的应用程序的具体情况而定。
责任编辑：小草
