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

DB2
在Linux虚拟机上安装 DB2 9
DB2 9励精图强 Viper 2续写传奇
DB2返回SQLCODE -818 错误
DB2未来版“Viper 2” ：为IT敏捷加速
解析：DB2 无限活动日志策略的实用技巧
SQL Server和MySQL的安全性分析
DB2数据库归档日志的管理方案
实例解析IBM DB2的数据复制、迁移方法
备份恢复DB2数据库步骤
DB2 9部署定制的安全性插件
DB2 Web 服务提供者的安全性
DB2无限活动日志策略从介绍到实用技巧
实现对 DB2 UDB 的低层访问控制
DB2数据库安全涉及的问题
关于DB2 数据库授权的研究
DB2 数据库身份验证基础
监控 DB2 活动之捕获事件监控数据
使用重定向恢复克隆 DB2 数据库
监控 DB2 活动之捕获快照数据
DB2 数据库特权授予的方法和技巧

No. « 2 3 4 5 »

技术文章搜索

关键字

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

出处:互联网   整理: 软晨网（RuanChen.com）   发布: 2009-10-31   浏览: 49 ::
收藏到网摘: n/a

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专区