Oracle Web应用开发之Apache架设与PL/SQL页面设计

　　Oracle有多种方法在网页上显示数据库中的数据，如JSP或XML编程。在Oracle8i/9i中应用开发人员可以自由使用Java或PL/SQL，把PL/SQL代码嵌入网页中实现业务逻辑的页面就是PSP页面。
　　
　　
　　PSP页面及其运行环境Apache mod_plsql模块
　　
　　
　　Oracle 数据库中的Oracle HTTP Server组件就是Apache服务器，在Oracle8i/9i中接受PL/SQL调用的Web组件就是Apache的mod_plsql模块，该模块为Oracle数据库产品，在Oracle9iAS中的Oracle Portal中同样包含，本文不介绍Oracle9iAS中的Web服务。mod_plsql模块模块提供了在Apache、Oracle Portal和数据库之间的严密的综合性和安全性，并改善交互作用和经Web请求调用的程序的执行情况。
　　
　　Portal开发工具箱（Portal Development Kit，PDK）的两个主要特点是完全用PL/SQL实现的PDK -PL/SQL和用Java实现调用接口的PDK-Java。它们都能访问Web资源或数据库服务器，两者都能调用Java程序，如果Java程序被导入数据库中，可以从PL/SQL调用它们。下面是构成全部Portal环境的组件列表：
　　
　　1．Oracle Database Aerver
　　
　　2．HTP/HTF包和工具（PL/SQL Web Toolkit）
　　
　　3．Portal procedures（Portal进程）
　　
　　4．Portal Schema（数据库表）
　　
　　5．Oracle 9iAS Application Server（及Logon Server）
　　
　　6．Apache HTTP Server
　　
　　7．Mod_PLSQL Apache Plug-in
　　
　　8．Portalets
　　
　　9．External images（外部图象）
　　
　　10．建立应用程序需要的Tables和数据
　　
　　Oracle 9iAS Application Server和Apache HTTP Server是结构中的底层部分，它们成为开发中的最重要的部分之一。Listener和Mod_PLSQL网关是配对的，Listener自身是个完整的Apache HTTP Server，它的作用是管理HTTP样式请求的进程。Mod_PLSQL网关负责交换数据进出数据库。Mod_PLSQL网关包括为了和Net8交流的全部必要信息。Oracle把Apache HTTP Server和Mod_PLSQL网关都作为Oracle9iAS和数据库安装的一部分进行安装。
　　
　　下面说明当在浏览器浏览网址http://localhost/pls/simpledad/show时（结果如图1所示）服务器的响应过程。
　　
　　　
　　图1
　　
　　
　　Apache监听器是一个HTTP服务，处理所有通过请求端口（默认端口为80）的请求，请求首先路由到本地主机。因为请求字符串中包含"pls"，即虚拟目录，该字符串（表示请求的实际字符串是可配置的，此处为默认配置）的定义在$ORACLE_HOME\apache\modplsql\cfg\plsql.conf文件中，Apache根据这一文件识别出"pls"是一个PL/SQL请求并且把执行任务传递给PL/SQL模块（mod_plsql）。mod_plsql随后查看网址字符串的剩下部分。"simpledad"是数据库访问描述符（Database Access Descriptor，DAD），它给出关于mod_plsql怎样被连接到数据库中去执行请求的信息，可以配置多个DAD，它包含用户名、密码、认证方式、路径别名等信息。“show”为mod_plsql执行的PL/SQL过程，如果在URL的最后没有指定过程名，则mod_plsql会查找默认的过程名，此默认过程名也可在DAD中设置。过程运行并发送结果（使用PL/SQL Web Toolkit生成的）到HTTP缓冲区中，当过程执行完后，HTTP缓冲区的内容通过mod_plsql和Apache返回到浏览器。过程可以直接使用PL/SQL Web Toolkit编程，也可以通过loadpsp命令行工具把PSP页面加载到数据库中生成过程，浏览PSP页面只需在URL中以过程名结尾即可，不需扩展名“.psp”。
　　
　　需要注意的是，在Portal体系中，可以由文件夹和文档来管理用于显示在浏览器中的图象和多媒体，而本文在仅安装Oracle数据库时，图片等多媒体类型的文件必须存放在“$ORACLE_HOME\apache\modplsql\cfg\images\”路径下，并且在PSP页面中调用时使用路径“admin_/images/”。
　　
　　PL/SQL语言已经长时间作为Oracle数据库和开发环境的基础，Oracle本身是使用PL/SQL建立的，并且Oracle已经建立了从PL/SQL过程直接访问HTML的方法，但太依赖于PL/SQL代码会使后来的可能不熟悉PL/SQL代码的开发者难于维护应用程序。使用PL/SQL页面表示层的优势之一是实现了表示层与业务逻辑的分离，业务逻辑以存储过程的形式存储在数据库中，优势之二是PL/SQL页面页面的运行取决于对数据库过程的调用，独立于应用服务器，在数据库缓存服务器支持下运行性能好。
　　
　　
　　配置Apache的mod_plsql模块
　　
　　
　　设置Apache Web 服务器中的mod_plsql模块来接收浏览器对数据库中的存储过程的调用。Oracle HTTP Server组件已经包含在Oracle9.0.1服务器中，使用缺省的端口和主机参数，配置文件$ORACLE_HOME\apache\apache\conf\httpd.conf不用修改。需要为Apache Web 服务器设置DAD，步骤如下：
　　
　　1．浏览网址http://202.99.18.136，也是本机地址或Apache服务器的主机地址．如图２所示。
　　　
　　
　　
　　图2
　　
　　
　　2．打开组件mod_plsql的链接，如图3所示。
　　　
　　图3
　　
　　
　　3．点击"网关数据库访问描述符设置"，如图4所示。可以将新的数据库访问描述符添加到现有列表。此处配置的信息包括：用户名、口令、连接字符串、文档上载路径和过程、需要进行 long raw 上载的文件扩展名、路径别名和相关过程，以及确认连接的信息。本例中修改SIMPLEDAD，如图5所示。
　　　
　　图4
　　4．在SIMPLEDAD的编辑页面中，修改Oracle 用户名为cf，Oracle 口令为cf，Oracle 连接字符串为db:1521:o90，如果网关在所连接的数据库以外的其他Oracle主目录中运行，则需要TNS连接字符串。此外，也可使用以下格式的组合字符串来替代TNS连接字符串，即::。是运行数据库的主机名，是TNS监听程序监听的端口号，是数据库例程的Oracle SID名称。为了获取最佳性能，请保持网关的数据库连接池处于打开状态。网关使用"文档访问信息"向与此数据库访问描述符关联的数据库上载或下载文档。默认情况下所有文档都将以BLOB类型上载。通过在Long Raw字段中指定以逗号分隔的文件扩展名，可以覆盖此默认设置。此字段的"*"值将使所有文档以Long Raw 数据类型上载。"文档访问过程"指定用于访问文档的虚拟路径。"文档访问过程"字段指定网关处理文档请求所调用的过程。此处都使用缺省值。如果通过此网关连接的应用程序支持将绝对路径映射到关键字，可以指定关键子，本例中此处为空。设置完该页面后返回上级页面。
　　　
　　图5
　　
　　
　　5．下面设置全局网关。在如图3所示的网关配置菜单中选择"网关全局设置"，如图6所示，将第5步中编辑修改的数据库访问描述符SIMPLEDAD作为默认全局网关的DAD。
　　　
　　图6
　　
　　
　　
　　编写存储过程和网页代码
　　
　　
　　本实例的数据库对象都在cf/cf操作模式下。数据库环境为Oracle9.0.1，带有Oracle HTTP Server安装（已自动安装mod_plsql模块），未安装Oracle9iAS及其任何组件。
　　
　　1．建立表student并插入7条记录。
　　
　　CREATE TABLE student
　　 (ID　NUMBER(5,0) NOT NULL
　　 ,NAME　VARCHAR2(15) NOT NULL
　　 ,DOB　DATE
　　 ,GENDER　VARCHAR2(2) DEFAULT '男'
　　 ,CLASSYR　NUMBER(4,0) DEFAULT 2002 NOT NULL
　　 ,MAJOR　VARCHAR2(25)
　　 ,EMAIL　VARCHAR2(50)
　　 ,PHOTO　VARCHAR2(100)
　　 );
　　alter session set nls_date_format = 'dd-mon-yyyy';
　　alter session set nls_date_language = 'AMERICAN';
　　insert into student values ( 1001,'赵鹏','14-JUL-1975','男',2001,'History',
　　'1001@NetUniversity.org','u1001.gif')
　　/
　　insert into student values ( 1002,'刘宇','08-OCT-1975','女',2001,'Science',
　　'1002@NetUniversity.org','u1002.gif')
　　/
　　…………
　　
　　
　　
　　2．以帐户cf/cf建立存储过程show_student。
　　
　　create or replace procedure show_student
　　(p_id　　　　 in out student.id%TYPE
　　,p_name　　　　　out student.name%TYPE
　　,p_dob　　　　　 out student.dob%TYPE
　　,p_gender　　　　out student.gender%TYPE
　　,p_classyr　　　 out student.classyr%TYPE
　　,p_major　　　　 out student.major%TYPE
　　,p_email　　　　 out student.email%TYPE
　　,p_photo　　　　 out student.photo%TYPE
　　)
　　IS
　　CURSOR get_student(p_id in student.id%TYPE DEFAULT 1001) IS
　　SELECT * FROM student
　　WHERE id = NVL(p_id,1001);
　　student_row student%ROWTYPE;
　　BEGIN
　　IF p_id<1001 THEN
　　　 p_id:=1001;　　
　　END IF;
　　IF p_id>1007 THEN
　　　 p_id:=1007;
　　END IF;
　　OPEN　get_student(p_id);
　　FETCH get_student INTO student_row;
　　CLOSE get_student;
　　p_name　　　　　:= student_row.name;
　　p_dob　　　　　 := student_row.dob;
　　p_gender　　　　:= student_row.gender;
　　

查看本文来源