用Oracle存储过程和Oracle WebServer制作动态站点- DB2

当前位置: 首页 > 图文教程 > 数据库 > DB2 > 用Oracle存储过程和Oracle WebServer制作动态站点

技术文章搜索

关键字

DB2 中的用Oracle存储过程和Oracle WebServer制作动态站点

出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2009-10-31 浏览: 43 ::

收藏到网摘: n/a

数据访问-与数据库建立连接 SQL Server7.0 Web資料搜尋技巧

create or replace PROCEDURE xj_homepage   (cols IN owa_util.ident_arr)   IS
     col_counter INTEGER;      counter INTEGER;     ID CHAR(2);     CURSOR C1 IS
    select PRIVELEGE_TABLE     from previlege_range    where PRIVELEGE_ID = ID;
     cPRIVELEGE_TABLE C1%ROWTYPE;BEGIN    htp.htmlopen;    htp.headopen;
   htp.title(主页);    htp.headclose;    htp.bodyopen;    htp.line;
   htp.img(/ows-img/ows.gif);    htp.header(1, 主页);    htp.line;
   htp.paragraph;
   select count(*) into counter from user_define where USER_ID = cols(2) and USER_PASS = cols(3);
   if (counter > 0) then
    select PRIVELEGE_ID into ID from user_define where USER_ID = cols(2) and USER_PASS = cols(3);
    htp.print( 您的权限：|| ID);
    htp.formOpen(owa_util.get_owa_service_path|| xj_resurlts) ;
    htp.formhidden(COLS,dummy);
    htp.formSelectOpen(COLS,选择查询表：) ;       open C1;    loop
        fetch C1 into cPRIVELEGE_TABLE;        EXIT WHEN C1%NOTFOUND;
        htp.formSelectOption(cPRIVELEGE_TABLE.PRIVELEGE_TABLE);       end loop;
    close C1;       htp.formSelectClose;       htp.paragraph;
       htp.formsubmit(NULL,确认);    htp.formClose;   else
    htp.print( 您输入的标识符：|| cols(2));    htp.paragraph;
        htp.print( 您输入的口令：|| cols(3));        htp.paragraph;
    htp.print(用户标识符或口令错!请返回登录窗口。) ;    htp.paragraph;   end if;
      htp.anchor(http://www.sql.com.cn,sql 技术站点);       htp.line;
      htp.address((c)1998 豆腐制作);       htp.bodyclose;       htp.htmlclose;
END;  来自: ASP专区

数据访问-与数据库建立连接 SQL Server7.0 Web資料搜尋技巧

DB2 中的 用Oracle存储过程和Oracle WebServer制作动态站点

评论 (0) All

DB2 中的用Oracle存储过程和Oracle WebServer制作动态站点