Create or replace procedure ScoreForm
As
Begin
Htp.headopen;
Htp.title ('Code Entry Form');
Htp.headclose;
Htp.bodyopen;
Htp.header (2,'Score Information Code Form');
Htp.p ('
');
Htp.formopen ('Score_into_webpage',cmethod=>'GET');
--打开ScoreForm表单。缺省情况下Score_into_webpage PL/SQL过程用GET
--方法调用。GET方法在URL里显示传递的参数。
Htp.tableopen ('border');
Htp.tablerowopen;
Htp.tabledata ('Enter Student Code');
Htp.tabledata (htf.formtext ('code_in',5,5));
--用一个文本框提示用户输入考号。文本框的名字必须与调用过程里的输入
--参数相同。
Htp.tablerowclose;
Htp.tablerowopen;
Htp.tablerowclose;
Htp.tablerowopen;
Htp.tabledata (htf.formSubmit);
Htp.tabledata (htf.formReset);
Htp.tablerowclose;
Htp.formclose;
Htp.bodyclose;
Htp.htmlclose;
End;

上述过程在客户端被调用后产生的HTML即可显示一动态表单接受用户输入的考号，然后传递给调用的过程score_into_webpage，从而到Oracle DBServer中查询出所需的数据，再通过该过程动态生成的HTML在Web浏览器中显示出来。

4、 结束语

作为一个大型数据库服务器，Oracle提供了一个面向网络的开发工具、应用服务器和数据库服务器的综合平台。本文利用其标准PL/SQL和内置程序包并结合WebServer讨论了基本的动态Web的开发和应用。