err.clear response.write"< h4 >ORACLE OLE 错误控制< /h4 >" response.write"ORACLE 错误代码: "&OraSession.LastServerErr&"< br >"
response.write"ORACLE 错误说明: "&OraSession.LastServerErrText&"< br >" else
'查询
sql="select * from tsb1"
set oradynaset=oradatabase.dbcreatedynaset(sql,0)
response.write"< h3 >result< /h3 >"
response.write"< table border=5 >< tr >"
for i=0 to oradynaset.fields.count-1
response.write"< td >"
response.write oradynaset.fields(i).name & " " response.write"< /td >" next response.write"< /tr >" do until oradynaset.eof response.write"< tr >" for i=0 to oradynaset.fields.count-1 response.write"< td >" response.write oradynaset.fields(i).value response.write"< /td >" next response.write"< /tr >" oradynaset.dbmovenext loop response.write"< /table >"
'关闭数据库
oradatabase.close set orasession=nothing end if % > < /body > < /html >
---- 下面是程序的查询结果图面: 通讯录
NAME ADDRESS PHONE EMAIL 张玲 马鞍山市湖北路5号 0555-2887765 zhangl@mial.magang.com.cn 林向 马鞍山市湖南路9号 0555-2223856 lingx@mail.magang.com.cn 邓国虹 采矿路子4幢504号 0555-2474748 denggh@263.net 李城 青岛海洋大学7幢507 0464-32456678 licheng@263.net 王国在 采矿小区7幢807号 0555-3445454 wang@mail.amgang.com.cn 丁刚 红旗南路17幢405号 0555-2883721 dingg@mail.magang.com.cn 全在保 江西路子7幢607号 0554-4566777 quzab@mial.ccac.com
---- (2)插入自己的信息:用ASP将用户在浏览器上提供的数据插入到数据库通讯录表(TSB1)中,由ORACLE数据库有一套完整性约束机制,所以插入过程不光是简单地把数据插入到表中,还要做完整性约束的检查,不合要求的数据拒绝插入,如果在程序中不考虑处理,运行时,就会因数据库服务器报错而中断程序。而ASP中的ERR对象可以报出错误来源、错误代码、错误说明等,并能把程序引向错误处理。
---- 以下是程序,一个是insert.htm, 是一个输入界面,供用户输入自己的信息,一个是insert.asp,负责将用户输入信息插入数据库,并进行错误检查。
Insert.htm: < html > < head > < meta http-equiv="Content-Language" content="zh-cn" > < meta http-equiv="Content-Type" content="text/html; charset=gb2312" > < meta name="GENERATOR" content= "Microsoft FrontPage 4.0" > < meta name="ProgId" content= "FrontPage.Editor.Document" > < title >请留下你的信息< /title > < /head > < body > < p align="center" >请输入你的信息< /p > < form method="post" action="insert.asp" > 姓 名: < input type="text" name="name" size="8" > < br >
上一页 [1] [2] [3] 下一页 |
|