09VB+SQL应用.pptVIP

  1. 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
  2. 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  3. 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
  4. 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
  5. 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们
  6. 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
  7. 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
09VBSQL应用

数据库应用程序结构 数据库访问技术 应用程序连接SQL2000 Visual Basic JAVA平台 .NET平台 数据库应用程序结构 分类(依其数据处理及存取方式 ) C/S (客户机/服务器) B/S (浏览器/服务器) 三层结构 C/S (客户机/服务器) 软件系统体系结构,通过将任务合理分配到Client端和Server端,降低了系统的通讯开销 C/S体系结构的数据库应用,由两部分组成,即客户应用程序和数据库服务器程序 B/S (浏览器/服务器) 用户界面完全通过WWW浏览器实现,一部分事务逻辑在前端实现,但是主要事务逻辑在服务器端实现 三层结构 实质 是在客户端与数据库之间加入了一个逻辑上的“中间层”,也叫组件层 逻辑三层划分(应用程序) 用户界面层 业务逻辑层 数据服务层 一个典型的三层客户机/服务器结构 数据库访问技术 ODBC/JDBC OLE DB ADO ADO.NET 数据库访问技术 ODBC 开放式数据库互联 (Open Database Connectivity) 微软推出的一种工业标准 常用的SQL SERVER、ORACAL、INFORMIX和ACCESS 均提供了提供了ODBC接口或ODBC支持 ODBC的体系结构图 数据库访问技术 JDBC 数据库连接(Java DataBase Connectivity) 一种可用于执行SQL语句的Java API(Application Programming Interface,应用程序编程接口),为开发人员提供了一种标准的应用程序设计接口 JDBC开发Java数据库应用程序的工作原理 数据库访问技术 OLE DB(对象链接和嵌入数据库) 核心内容就是要求为以上这些各种各样的数据存储都提供一种相同的访问接口,使得数据的使用者(应用程序)可以使用同样的方法访问各种数据,而不用考虑数据的具体存储地点、格式或类型 数据库访问技术 ADO ADO是OLE DB的消费者,与OLE DB 提供者一起协同工作 数据库访问技术 ADO.NET 提供对 Microsoft SQL Server 等数据源以及通过 OLE DB 和 XML 公开的数据源的一致访问 数据共享使用者应用程序可以使用 ADO.NET 来连接到这些数据源,并检索、操作和更新数据 ADO.NET结构图 数据源配置 数据源配置 数据源配置 数据源配置 数据源配置 数据源配置 数据源配置 数据源配置 数据源配置 SQL配置 SQL配置 SQL配置 ?如果命令按行返回,则将行存储在缓存(Recordset对象)中。 ?可选择创建缓存视图,以便能对数据进行排序、筛选和定位。 ?通过添加、删除或更改行和列编辑数据(Recordset)。 ?在适当情况下,使用缓存中的更改内容来更新数据源(Recordset)。 ?在使用事务之后,可以接受或拒绝在事务期间所做的更改以及结束事务。 如何使用存储过程 例如:为 empinfo创建一个类empinfo Public emp_id as long Public emp_name as string Public sex as string Public title as string Public id_card as string Public wage as single Public dep_id as integer Public sub init() Emp_id=0 Emp_name=“” Title=“” Sex=“” Id_card=“” Wage=0 Dep_id=-1 End sun Public sub delete(byval tmpempid as long) …… End sub public function getname(byval tmpempid as long) as string …… End function ……… (1)连接数据库函数Connect() ‘连接到数据库 private sub connect() ‘如果连接标记为真,则返回。否则出错 If isconnect=true then Exit Endif Set cnn=new adodb.connection Cnn.connectionstring=cnn Cnn.open If cnn.stateadstateopen then Msgbox “数据库连接失败” End if Isconnect=true End sub (2)断开连接数据库函数Disconnect() Private sub disconnect() Dim rc

文档评论(0)

xy88118 + 关注
实名认证
文档贡献者

该用户很懒,什么也没介绍

1亿VIP精品文档

相关文档