扫一扫
分享文章到微信
扫一扫
关注官方公众号
至顶头条
方法3.使用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库并登录到服务器的通用例程。
下面的代码是一个初始化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方法超出其它方法的优势,但其编程稍复杂。至于实际使用哪一种接口方式,在很大程度上依赖于用户的应用程序的具体情况而定。
如果您非常迫切的想了解IT领域最新产品与技术信息,那么订阅至顶网技术邮件将是您的最佳途径之一。
现场直击|2021世界人工智能大会
直击5G创新地带,就在2021MWC上海
5G已至 转型当时——服务提供商如何把握转型的绝佳时机
寻找自己的Flag
华为开发者大会2020(Cloud)- 科技行者