使用Http通道远程连接数据库技术说明.docx

1、使用Http通道远程连接数据库技术说明数据库 Http 远程连接技术说明7/28/2013本人通过半年的努力，开发完成了此项技术在当前流行的 web 浏览模式的情况下， 仍然需要对客户端的个性化体验以及大批 量数据的处理采用非 web 模式。数据库 Http 连接技术打包封装了 internet 数据库操 作的各项功能，采用多层防护保护数据库， 同时客户端兼容数据库局域网操作的 adodb 方式，可以满足 internet 大批量数据传送以及客户端个性化开发的要求。一、数据库 Http 远程连接技术实现功能：1. 用户能够像使用局域网数据库一样操作 internet 数据库。 （ 适用各类数据

2、库，如 mysql, mssql server ,access 等 ）2. 数据库在 internet 上是屏蔽的，他是通过 IIS 服务，采用特定的 Http 管道与用户 端建立连接。多道防护可以有效保障数据库的安全性。3.数据的发送接受采用分段技术， 以整体虚拟， 所需为实的方式满足用户的数据需求， 适应了 internet 通讯的复杂环境。4.用户的局域网操作和 internet 操作集成在一起，以同一个组件和同样的指令实现， 可以在 2 种操作之间随时切换。5. 服务端提供了 aspx 二次开发的接口。6. 现有的 C/S 结构软件，使用数据库 Http 连接模块，可以增加 inter

3、net 操作功能。二、与 web service 的关系 （数据库 Http 远程连接技术简称 Dbnet ）相同点 ：都是基于 net framework 以及 IIS 的架构，通过 http 通道实现数据通讯。 区别：1.Webservice以XML数据格式传送数据，具有通用标准，但数据的冗余度较大；Dbnet采用特定的数据结构，以 stream 的方法传送数据，数据较为精简。2.Web service 传送的是数据实体， Dbnet 在数据量大的时候可以采用数据对象的虚拟化来传送数据（即传送数据对象的部分数据，但用户看到的是整个数据对象） 。3.Webservice没有对数据库的操作功能

4、有专门的定制；Dbnet定制了数据库操作的各项功能，用户端可以直接调用，同时还兼容 adodb的局域网数据库的操作方法。4.客户端使用 Web service，引用的是 Web service对象，需进行编译；客户端使用 DBnet组件对象，引用的是网址，不需要编译。三、DBnet 组件的主要对象(数据库Http远程连接技术简称Dbnet)主要对象功能与描述Hpserver运行在服务器iis上，米用Http协议，为远程用户与本地数据 库建立起通讯连接。以aspx程序引用Hpserve对象，客户端访冋aspx页面，头现相 互通讯。DatabaseEx操作功能可类似于adodb.connectio

5、n使用在客户端。数据库连接对象，可以连接局域网数据库，也可 以与web服务上的aspx页面，从而访问in ternet数据库。RecordsetEx操作功能可类似于adodb.recordset,不能对数据集编辑。使用在客户端。以DatabaseEx对象查询数据库，得到 RecordsetEx记录集对象，数据集只读不能编辑。RecordsetByteOpt操作功能可类似于adodb.recordset，可以对数据集编辑。 使用在客户端。以DatabaseEx对象查询数据库，得到 RecordsetByteOpt记录集对象。可以对该记录集进行新增，修 改。处于in ternet 通讯时，对含有大

6、数据子段(image,bytes)的记录集需要采用小批量数据传送方式，用此对象获得。HpFields记录集所有字段的属性定义容器。HpExcepti on异常处理类，继续 S.webException 异常类HpServer 对象运行在服务器iis上，采用Http协议，为远程用户与本地数据库建立起通讯连接 以aspx程序引用Hpserve 对象，客户端访问aspx页面，实现相互通讯。属性属性名称类型描述BatchTraceTimeOut_millSecondinteger客户端在执行数据库事务中，服务器等待客户端的响应时间，超过 此数值，批处理事务失效(防止网络通讯产生异常)，默认2分钟。 单

7、位：毫秒。ConnectionstringString与数据库连接的字符串。字符串设置与ADODB. ConnectionString 设置类似。ConnectionADODB.Connection只读，返回 ADODB.Connection对象CompressedDatainteger与客户端internet通讯时，是否采用数据压缩，以便减少数据流量。 默认是不压缩。0 :不压缩；1 ：压缩。CommandTimeout_secondinteger数据库命令超时时间。单位：秒ConnectTimeout_secondinteger数据库连接超时时间。单位：秒CursorLocationTyp

8、eADODB.CursorLocationEnum枚举数据库记录集的位置类型。默认 CursorLocationEnum.adUseServerDefaultOneSendRecordCount_Comminteger对于普通记录集 ，单次向客户端发送的记录数量。最小 10DefaultOneSendRecordCount_Bytesinteger对于含字段(bytes(),image) 的大容量数据的记录集，单次向客户端发送的记录数量。最小 3DefaultRecordCacheSize_Comminteger打开普通记录集 ，一次读到内存中的记录数量DefaultRecordCacheSi

9、ze_Bytesinteger打开含字段(bytes(),image) 的大容量数据的记录集 ，一次读到内存中的记录数量InternetUserPortString1.与客户端通讯的接口号，客户端的 UserPort须与服务端的UserPort 一致，才能连接。2.接口号字符串最多12位，英文字母或者数字，只能在ASCII码 范畴内。IsClientLoginOkBoolean用户端的登录信息是否通过验证。默认：true ;不需要做自定义的验证。如果设定 false ;服务端可以调用事件ClientLogin ，开发自定义验证函数。确认 OK再把 IsClientLoginOk 设定 true

10、。IsEndTransBoolean数据库事务状态。False:事务在进行中；True:事物不在运行。IsShowErrToFileBoolean异常是否写入日志文件。默认 ：FalseIsShowErrMsgBoxBoolean异常是否弹出消息框。默认：False属性名称类型描述LinkDbTypeemDbLinkType枚举连接的数据库类型。emDbLinkType 枚举类：SqIServerUsing = 0 OdbcUsing = 1AccessUsing = 2 OracleUsing = 3MySqlUsing = 4LogFilePathString日志文件路径LogFileNa

11、meString日志文件名称StateADODB.ObjectStateEnum枚举当前与数据库联络的状态。i方法方法名称特征描述RunClientRequest功能启动客户端应答程序语法Function RunClientRequest(ByVal objRequest As System.Web.HttpRequest, ByVal objResponse AsSystem.Web.HttpResponse) As Boolean参数objRequest: 收到客户端信息的 HttpRequest对象 objResponse:向客户端发送信息的 HttpResponse对象返回True:执

12、行成功Flase:执行失败OpenConn功能使用已经设置的连接字符串，连接数据库。语法Function OpenConn () As Boolean参数返回1.True:数据库连接成功2.Flase:执行失败.CloseConn功能关闭数据库连接语法Function CloseConn() As Boolean参数返回1.True:数据库连接已经关闭2.Flase:执行失败.Register功能注册使用语法Sub Register(ByVal ThisRegister As Object)参数ThisRegister:注册对象返回事件事件名称特征描述ErrHappened功能程序执行异常，引

13、发异常处理事件函数Event ErrHappened(ByVal objException As Object, ByVal e As EventArgs)参数objException:继承 System.Exceptione:参数集返回ClientCommand功能服务器接收到的用户端自定义命令语法Event ClientCommand(ByVal CommandNameAs String, ByVal Parameter1 As String, ByValParameter2 As String, ByRef strReturnValue As String)参数CommandName接收

14、到的用户端自定义命令号Parameter1: 用户端自定义参数 1Parameter2: 用户端自定义参数 2strReturnValue: 服务端执行完事件，向用户端反馈的信息返回strReturnValue: 服务端执行完事件，向用户端反馈的信息ClientLogin功能当lsClientLoginOk=false, 用户登录是将引发此事件。服务器可根据接收到的用户登录信息开发自定义程序进行用户验证。验证成功，弓1用此事件，可以自定义用户登录验证，进一步保障服务端的数 据库安全。语法Event ClientLogin(ByVal UserNum As String, ByVal UserP

15、assword As String, ByRefisClientLoginOk As Boolean)参数UserNum:用户登录号UserPassword: 用户登录密码isClientLoginOk: 用户信息验证的结果返回isClientLoginOk: 用户信息验证的结果。返回 True: 程序自动设定 IsClientLoginOk=true ；返回 False:程序自动设定 IsClientLoginOk=false 。DataBaseEx 对象操作功能可类似于 adodb.connection 。使用在客户端。数据库连接对象，可以连接局域网数据库，也可以与web服务上的aspx

16、页面，从而访问in ternet数据库。属性类型描述ConnectionstringString与局域网数据库连接的字符串。字符串设置与 ADODB. ConnectionString 设置一样。 在internet 连接时，此项不起作用。ConnectionADODB.ConnectionADODB.Connection 对象。在internet 连接时， 返回nothing 。ConnectTimeout_secondinteger局域网数据库连接超时时间。单位：秒。 在internet 连接时，此项不起作用。CommandTimeout_secondinteger局域网数据库命令超时时间

17、。单位：秒。 在internet 连接时，此项不起作用。CursorLocationTypeADODB.CursorLocatio nEnum局域网数据库初始化记录集的游标类型。默认 adUseServer在internet 连接时，此项不起作用。DefaultRecordCacheSizeinteger打开记录集，一次读到内存中的数量 .1.局域网 CursorLocationType= adUseServer 时，此项有效。2.局域网CursorLocationType= adUseClient 时，记录全部读到用户端，此项不起作用。3.在internet 通讯时，此项不起作用。Inter

18、netUrlString连接的网页地址，在Internet连接时使用。 局域网通讯时，此项不起作用。InternetUserPortString1.与web通讯的接口号，客户端的 UserPort须与服务端的UserPort 一致，才能连接。2.接口号字符串最多12位，英文字母或者数字， 在ASCII码范畴 内，不允许有中文字符。3.采用internet的通讯方式时，需要设置此接口号。局域网通讯 时，此项不起作用。InternetSessionTimeOut_minuteinteger客户端响应的失效时间。如超过失效时间向服务端发送信息，服务 端将重新建立客户对象。失效时间不能大于服务端 se

19、ssion的失效 时间，在Internet连接时使用。局域网通讯时，此项不起作用。InternetRequestTimeOut_millsecondinteger请求发岀的最长响应时间，超岀退岀请求，单位：毫秒 局域网通讯时，此项不起作用。属性类型描述IsEndTransBoolean数据库批处理事务状态.False:事务在进行中；True :事物不在运行。IsShowErrMsgBoxboolean岀现异常时，是否弹岀消息提示画面。 多为程序开发调试时使用。默认：falseIsShowErrToFileBoolean异常是否写入文件默认:falseLinkCommucationTypeCom

20、mucationType枚举数据库通讯方式，选择采用局域网方式或者 internet 方式。CommucationType枚举类：LanCommucation = 0InternetCommucation = 1LinkDbTypeemDbLinkType枚举连接的数据库类型emDbLinkType枚举类：SqlServerUsing = 0OdbcUsing = 1AccessUsing = 2OracleUsing = 3MySqlUsing = 4LogFilePathString日志文件路径LogFileNameString日志文件名称Numberinteger自动产生的编号，每个连接

21、对象的编号不一样。StateADODB.ObjectStateEnum当前数据库操作状态。在internet 连接时，此项不起作用。方法方法名称特征描述BeginTrans功能开始事务，后续命令逐个执行语法Function BeginTrans(Optional ByVal isThrow As ThrowExp = ThrowExp.ThrowErr) As Boolean参数isThrowExp:可选，默认值(ThrowErr)，程序出现异常会抛出。返回1.True:事务开启成功2.参数isThrowExp= NoThrow，执行失败返回 Flase，异常信息可用函数 GetLasetEr

22、r获取。3.参数isThrowExp= ThrowErr，执行失败抛出异常类 HpException,不会返回执行结果。BeginTrans_lnternetSql功能开始事务，后续命令可以批次执行局域网连接时，等同 BeginTrans ； Internet连接时，后续命令可以批次执行，以减少与服务端 的通讯次数。方法名称特征描述语法Function BeginTrans_lnternetSql(Optional ByVai isThrow As ThrowExp = ThrowExp.ThrowErr)As Boolean参数isThrowExp:可选，默认值(ThrowErr)，程序出现

23、异常会抛出。返回1.True:事务开启成功2.参数isThrowExp= NoThrow，执行失败返回 Flase，异常信息可用函数 GetLasetErr获取。3.参数isThrowExp= ThrowErr，执行失败抛出异常类 HpException，不会返回执行结果。CloseConn功能断开数据库的通讯连接语法Function CloseConn(Optional ByVal isThrow As ThrowExp = ThrowExp.ThrowErr) As Boolean参数isThrowExp:可选，默认值(ThrowErr)，程序出现异常会抛出。返回1.True:连接关闭成功

24、2.参数isThrowExp= NoThrow，执行失败返回 Flase，异常信息可用函数 GetLasetErr获取。3.参数isThrowExp= ThrowErr，执行失败抛出异常类 HpException，不会返回执行结果。ConncetSQ功能使用传入的连接字符串，建立数据库通讯连接。 在internet连接时，此项不起作用。语法Function ConncetSQ(ByVal strConn As String, Optional ByVal isThrowExp As DBnet.ThrowExp =ThrowExp.ThrowErr) As Boolean参数l.strConn

25、: 连接字符串，方式类似于 Adodb.Connection. ConnectionStringisThrowExp:可选，默认值(ThrowErr)，程序出现异常会抛出。返回1.True: 连接成功2.参数isThrowExp= NoThrow，执行失败返回 Flase，异常信息可用函数 GetLasetErr获取。3.参数isThrowExp= ThrowErr，执行失败抛出异常类 HpException，不会返回执行结果。CommitTrans功能事务确认执行，完成后关闭事务。必须与 BeginTrans配套使用。语法Function CommitTrans(Optional ByVal

26、 isThrow As ThrowExp = ThrowExp.ThrowErr) As Boolean参数isThrowExp:可选，默认值(ThrowErr)，程序出现异常会抛出。返回1.True:事务执行完成2.参数isThrowExp= NoThrow，执行失败返回 Flase，异常信息可用函数 GetLasetErr获取。3.参数isThrowExp= ThrowErr，执行失败抛出异常类 HpException，不会返回执行结果。CommitTrans_lnternetSql功能事务全部执行，完成后关闭事务。必须与 BeginTrans_InternetSql 配套使用。语法Pub

27、lic Function CommitTrans_InternetSql(Optional ByVal isThrow As ThrowExp =ThrowExp.ThrowErr) As Boolean参数isThrowExp:可选，默认值(ThrowErr)，程序出现异常会抛出。返回1.True:事务命令全部通过验证并完成执行 .2.参数isThrowExp= NoThrow，执行失败返回 Flase，异常信息可用函数 GetLasetErr获取。3.参数isThrowExp= ThrowErr，执行失败抛出异常类 HpException，不会返回执行结果。Execute功能1.执行一条S

28、QL语句对数据库的操作，如 insert, update, delete语法Function Execute(ByVal strSql As String, Optional ByVal isThrow As ThrowExp =方法名称特征描述ThrowExp.ThrowErr) As Boolean参数isThrowExp:可选，默认值(ThrowErr)，程序出现异常会抛出。返回1.True:命令执行成功.2.参数isThrowExp= NoThrow，执行失败返回 Flase，异常信息可用函数 GetLasetErr获取。3.参数isThrowExp= ThrowErr，执行失败抛出异

29、常类 HpException，不会返回执行结果。Execute_Array重载功能1.同时处理多个SQL执行命令(单次最多4个sql文),2.在internet 操作时，多个SQL命令一起执行，可以减少通讯次数。语法Execute_Array(ByVal strSqlO As String, ByVal strSql1 As String, Optional ByVai strSql2As String = , Optional ByVal strSql3 As String = , Optional ByVal isThrow As ThrowExp =ThrowExp.ThrowErr)

30、As Boolean参数strSqlO: 一条 SQL语句strSqll: 一条 SQL语句strSql2: 可选，一条SQL语句strSql3: 可选，一条SQL语句isThrowExp:可选，默认值(ThrowErr)，程序出现异常会抛出。返回1.True:命令执行成功.2.参数isThrowExp= NoThrow，执行失败返回 Flase，异常信息可用函数 GetLasetErr获取。3.参数isThrowExp= ThrowErr，执行失败抛出异常类 HpException，不会返回执行结果。Execute_Array重载功能1.同时处理多个SQL执行命令(单次sql语句数量没有限制)2.在internet 操作时，多个SQL命令一起执行，可以减少通讯次数。语法Function Execute_Array(ByVal arrSql(