用ASP实现对ORACLE数据库的操作(4)

电　　　　话：
< input type="text" name="phone" size="20" > < br > 
E-MAIL：< input type="text" name="email" size="20" > < br > 
< input type="submit"  value="确定" > 
< input type="reset"  value="取消" >< br > 
< /form > 
< /body > 
< /html >
---- 下面是用户输入界面： 
请输入你的信息
姓　　　　名：  
地　　　　址：  
电　　　　话：  
E-MAIL：  
     Insert.asp:
< HTML >
< BODY >
< %
'连接数据库
set orasession=createobject
("OracleInprocServer.XOraSession")
set oradatabase=orasession.
dbopendatabase("axp03","scott/tiger",0)
'把用户插入信息变成SQL语句
sql="insert into tsb1 values
(" &chr(39)&request("name")&chr(39) &","_
&chr(39)&request("ADDRESS")&chr(39)&","_
&chr(39) & request("phone")&chr(39) &","_
&chr(39)&request("EMAIL")&chr(39)&")"
'运行SQL插入语句
oradatabase.dbEXECUTESQL(sql)
'检查是否有违反完整性约束错误
IF ERR.NUMBER >0 THEN
response.write"< h4 >asp 错误控制 < /h4 >"
response.write"asp 错误来源:"&err.source &"< br >"
response.write"asp 错误代码:"&err.number&"< br >"
response.write"asp 错误说明:"&err.description&"< br >"
ELSE 
'插入完成，返回
response.write"插入完成，< a href=insert.htm  > 返回。。。< /a >"
end if
% >
< /body >
< /html >
---- 以上是本人在用ASP工具将原有的ORACLE数据库信息搬上互联网应用的一些体会，例子很简单，目的在于说明原理，本人在ASP程序中还使用了 STORED PROCEDURE，STORED FUNCTION、PACKAGE 等ORACLE特有的功能以加快速度，提高效率。希望能对大家有所启发，请来信互相交流。