ASP调用Oracle存储过程


夏毅
  一、ASP动态网站开发技术

  随着人们对因特网认识的加深和IT技术的发展,一成不变的静态网页已经越来越满足不了信息交互和电子商务的需求,因此以数据库为核心开发能够实现信息交互和个性化服务的网页已经成为一种潮流。为了迎合动态交互式网页的开发趋势,出现了可以与后台数据库进行互动的Web开发技术,目前比较流行的一类是建立在微软Windows平台IIS基础上的ASP(Active Server Pages)技术。它是将VBscript、JavaScript等特定的脚本语言利用特殊的标记嵌入到HTML中,当Browser端提出请求时,Web服务器会使用相应的脚本解释引擎对脚本解释执行,完成数据库的查询、修改等任务,并把结果动态格式化成HTML形式送回到Browser请求端。

  Oracle数据库是目前国内外最常使用的数据库,随着Oracle 8i的发布,它又增添了对Java和对象的支持,大大方便了网络软件的开发。因此目前ASP应用程序的开发在很多场合需要与后台Oracle数据库打交道。下面,我们将以多个专题讨论组的应用为例,着重介绍ASP脚本是如何利用ADO组件的Command对象访问数据库的存储过程的。

  多专题讨论组用户提交的信息都统一存储在以下结构的数据库表中:

  CREATE TABLE messages(

  m_id NUMBER,

  m_forumName varchar2(30) NOT NULL,

  m_subject varchar2(30) NOT NULL,

  m_username varchar2(30) NOT NULL,

  m_email varchar2(70) NOT NULL,

  m_entrydate date default sysdate,

  m_message varchar2(200),

  m_ordernum number,

  m_reply number);

  其中各字段的含义如下:

  m_id:每条消息唯一识别的标识号;

  m_forumname:讨论专题名称;

  m_subject:消息主题;

  m_username:用户名;

  m_email:E-mail地址;

  m_entrydate:提交时间;

  m_message:消息内容;

  m_ordernum:顺序号;

  m_reply:是否为回答消息。

  二、ASP脚本调用Oracle数据库包中的存储过程

  1.建立数据库包

  假设现在数据库表中已经存有多个专题讨论的消息,如果想要在网页上分别显示各专题的名称及各专题的消息数目,首先在Oracle数据库中定义一个名为getForum的存储过程,放在名为forum_retrieve的包中。

  如果存储过程返回的结果是多行数据集,此过程必须放在一个包中。包是Oracle数据库的一种对象,它可以将数据类型、存储过程、函数、变量和常量封装在一起,类似于VB中的标准代码模块。包在结构上又分为包头和包体两部分分别存储的,因此这两部分也要分别建立,包头用来定义可被外部引用的元素;包体定义实际代码,即逻辑执行部分。

  此例的包头与包体分别定义如下:

  CREATE OR REPLACE PACKAGE forum_retrieve

  AS

  TYPE tforumname IS TABLE of messages.m_forumname %TYPE INDEX BY BINARY_INTEGER;

  TYPE tcount IS TABLE of NUMBER INDEX BY BINARY_INTEGER;

  PROCEDURE getForums

  (

  forumname OUT tforumname,

  theCount OUT tcount

  );

  以上是包头的定义,首先对tforumname和tcount这两个PL/SQL表类型进行声明,然后对外部调用到的存储过程进行声明。

  CREATE OR REPLACE PACKAGE BODY forum_retrieve

  AS

  PROCEDURE getForums

  (

  forumname OUT tforumname,

  theCount OUT tcount

  )

  AS

  CURSOR c1 IS

  SELECT m_forumname

  FROM messages

  GROUP by m_forumname

  ORDER by m_forumname;

  counter NUMBER DEFAULT 1;

  BEGIN

  FOR c IN c1 LOOP

  forumname(counter):=c.m_forumname;

  SELECT COUNT(*)

  into thecount(counter)

 
Copyright © 2008 qcode.org All Rights Reserved 编程开发 由朝夕网络维护