标题: 远程数据库的访问
ljjk5
元帅
Rank: 1


荣誉会员奖章
UID 46706
精华 1
积分 99426
帖子 49690
威望 554
金币 48489
热心 505
阅读权限 100
注册 2007-2-25
状态 离线
远程数据库的访问

  远程数据对象(RDO)是VB 5.0中基于ODBC API的对象模型,它短小、快捷、强健,可以访问任何32位ODBC数据源,如SQL Server和Oracle数据库,是访问远程数据库的更新更高级的工具。

  使用RDO的一般方法如下。

  先声明变量:Public con As rdoConnection, res As rdoResultset

  然后初始化rdoEngine,设置用户和口令等缺省参数;

  With rdoEngine

  .rdoDefaultUser = "sa"      '用户为 sa

  .rdoDefaultPassword = "pass"   '口令为 pass

  .rdoDefaultCursorDriver = rdUseServer

  .rdoDefaultLoginTimeout = 15

  End With

  再连接到要访问的远程数据库(可使用DSN Connection和DSN-Less Connection)。

  使用DSNC onnection举例(连接服务器SERVER上的数据库hotel):

  Set con = rdoEnvironments(0)

  .OpenConnection ("hotel", rdDriverNoPrompt, False)

  使用DSN-Less Connection 举例(连接服务器SERVER上的数据库hotel):

  Set con = rdoEnvironments(0)

  .OpenConnection ("", rdDriverNoPrompt, False, "driver={SQL Server}; server= _ SERVER; database=hotel")

  建立连接后,既可使用OpenResultset方法执行查询并处理结果集,又可使用Execute方法执行包括数据定义和数据操作在内的动作查询。 例 如:

  Set res = con.OpenResultset ("SELECT * FROM menu", rdOpenStatic)

  con.Execute "CREATE VIEW menu_view AS SELECT代码,菜名FROM menu",rdExecDirect

  RDO最强大和最重要的特性之一是:它可以查询和处理由存储过程返回的结果,无论它有多么复杂。

  除RDO外,还可使用RDC访问远程数据库。

顶部
[广告] 免费域名(Free Subdomain) 免费空间(Free hosting) PR查询(Google Pagerank)



当前时区 GMT+8, 现在时间是 2008-10-12 13:16
信产部ICP备案:京ICP备05066424号 北京市公安局网监备案:1101050648号

Powered by Discuz! 5.5.0
清除 Cookies - 联系我们 - 网友俱乐部 - Archiver - WAP