Pb编写webservice数据库连接性能研究.docVIP

  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文档。上传文档
查看更多
Pb编写webservice数据库连接性能研究

?? Pb是很好的开发数据库应用的软件,pb8以前可以用其自带的Transport 对象实现三层结构,但pb8以后简单好用的只有easerver,但据说这是很贵的软件,就是盗版也不好找。Pb11可直接将nvo发布为webservice,这对pb熟手来说是一个很好的事情,可是,习惯了C/S结构开发的思路,用webservice,数据库连接会不会过于频繁?用pb内部的数据库连接方式有没有连接池? Webservice连接性能到底怎样?等等问题,是每个从C/S编程转向B/S编程或采取三层结构编程的人都会涉及到的。下面就以pb11写webservicepb8调用对其连接池及性能进行测试。 1、单客户端、不连接数据库、pb写的webservice的响应速度 测试方案: Pb11 webservice函数of_adder(),累加当前秒钟值 10000 次的结果。客户端pb8,在不同电脑上,调用1000次。 Webservice代码如下图。 测试结果: ???? 耗时25秒,无数据库连接会话。 2、单客户端、连接数据库、pb的webservice的响应速度 测试方案1: 函数f_connect()连接数据库,函数of_getdbhandle()返回当前连接数据库事务对象的句柄,客户端保持webservice连接(每次调用不重新初始化),webservice保持数据库连接不断开。客户端pb8,在不同电脑上,调用100次。 客户端代码如下: string ls_wsdl long i, j long nums setpointer(hourglass!) //连接系统库 SQLCA.DBMS = IN7 INFORMIX-7 SQLCA.Database = sysmaster SQLCA.UserId = informix SQLCA.DBPass = wf_sa_pwd() SQLCA.ServerName = @server1 SQLCA.AutoCommit = False SQLCA.DBParm = CommitOnDisconnect=No,DisableBind=1 connect using sqlca ; if sqlca.sqlcode 0 then messagebox(错误,连接系统库失败,stopsign!) return end if time t1,t2 t1 = now() st_times.text = //循环调用 for j = 1 to long(sle_cs.text) yield() if not isvalid(w_1) then exit st_nums.text = string(j) //未创建 webservice连接 则创建 ( ws为窗口实例变量 ) if not isvalid(ws) then ?? ws = Create oleobject ?? i = ws.ConnectToNewObject(MSSOAP.SoapClient30) ?? if i 0 then ??? destroy ws ??? messagebox(提示 ,请检查是否安装了SoapSDK3.0和XML4.0, exclamation!) ??? return ?? end if ?? ?? ws.ClientProperty(ServerHTTPRequest,true) ?? ?? ls_wsdl = profilestring(soap.ini, soap, url, ) ?? ws.mssoapinit(ls_wsdl) ?? ?? ws.ConnectorProperty(Timeout,180000) end if //webservice 方法中每次连接数据库且用完即断开 st_dbhandle.text = ws.of_getdbhandle() //webservice方法连接数据库时的dbhandle() //st_dbhandle.text = ws.of_adder() //从 sysmaster 库中查看 webservice 中每次连接是否都释放了,SessionID 是否保持一个 // myvpc 为webservice所在主机名(web服务器主机名) select count(*) into :nums from syssessions where hostname = myvpc using sqlca ; if not isvalid(w_1) then exit if sqlca.sqlcode =0 then ?? st_nums_dq.text = string(nums) //循环第j次时连接数据库的sid数 ?? if long(st_

文档评论(0)

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

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

1亿VIP精品文档

相关文档