pb11webservice开发分布式三层应用.docVIP

pb 11+webservice幵发分布式三层应用 一、WEBSERVICE服务端的开发 1、 新建立一个workspace工作区 先择FILE菜单下的NEW,新建一个工作区。 点击后出现下 He Torkspace He Torkspace EH 在文件名处输入工作区的名称，假设我们的工作区名为 webserver，单击保存按钮。这样工作区就建立成功了。 2、建立一个.net web service 应用 点击FILE菜单下的NEW 选中.net web service点击ok按钮 点击next按钮 Back ……j Cancel 点击next按钮 Specify Project and Library Enter the names you want to use for the new project^ library and target. Project name: webservice Library: D: \webser vice 开发讲,\webser vice. pbl Target: D: \webser vice 开发讲,\webser vice. pbt Back Next Cancel 这里我们不修改pbl库名，当然你可以按你的意思修改库名，点击next按钮, 一直点next按钮直到出现 这里需要注意一点，如果你当前的IIS端口，不是默认的80，那么在localhost后面要加上 ，假设你的端口号是81的话。 再点击一次next直到finish按钮。 3、连接数据库 Hiaai我们先来建立一个数据库的连接以为后期的webservice服务提供一个连接。 打开系统生成的n_webservice对像 Hiaai vebaervci 090 0raclc9i (9.0.1) (r.zcsi] PowerBuilder Rte Fdt |rw!vt QwiQn Bin Tcok WwJoh Hrtp ?If l：rjfj.^bciSia 吻吻I K ?圈廳 t? a ?If l W (D:n^5?r.r.?*FlcyW)r webservice (D:\websef vicea M v/chscrvxft-od M Q v?eb5oiceU3 p_webiefvte W (D:n^5?r.r.?*FlcyW) r webservice (D:\websef vice a M v/chscrvxft-od M Q v?eb5oice U3 p_webiefvte 比 6 n.wb5rve w n_web?ervice ? (reb?ervice (D:\，cbjrervice升发pbl inherited fro? nonvisualobject - (Isrer Object ? (fc fX Scup: constructor^orn.M^bscrvccreturns onj SE3| WP1 E3^ n_v*jUervw Acce? v comOttlo- () ro?xrn M?g (fxn_ccrrtfuclcr) Event Vame IB5J JouUcl y r-b?^s， TbfOvS： Extern EvweiD ZZ Profile EAS Deno DB U110 SQLCA.DBHS - ODBC” SQLCA.AutoConnit 3 f-alse SQLCA.DDParn - ?ConnectStrlng-*DSH-rAS Deno DO U110;UID-dba;PWO-sql?? Vm* Prtviwr )4scrsp OefaUt 在里面写上 // Profile EAS Demo DB V110 SQLCA.DBMS = ODBC” SQLCA.AutoCommit = False SQLCA.DBParm = ,ConnectString=,DSN=EAS Demo DB VI lO;UID=dba;PWD=sqlH, 我是拷贝了，安装PBll默汄的安装的ASA数裾库，这里你可以修改成你的数裾库连接参 数。 数据库建立完成后，我们再建立一个ue_retrieve的方法用来提取数据库数据 ?e Wt 加 h Insert Q??cn Ip 曲 Won t^p:ntj.gi(El圇中，i 0 ?圓鱸@ 9 eviw?h ?e Wt 加 h Insert Q??cn Ip 曲 Won t^p :ntj.gi(El圇中，i 0 ?圓鱸@ 9 eviw?h ux - U C| X ：SC|@Q|^^^|a 吻铃％太龙(b ? Il ￡ w 4i S 3 \ 5 3scr:p. C n_Tebif?cvxc? ? (T?bsezvice (D:\vebtfervxtf\v