在ASP中使用Oracle数据库(下)

'创造orasession东西

　　set orasession = createobject("oracleinprocserver.xorasession")

　　'经过翻开oracle数据库的一个贯穿创造oradatabase东西

　　'确定要运用本人的用户名和口令考察oracle数据库

　　set oradatabase = orasession.opendatabase("", "user/password", _

　　cint(0))

　　'创造oradynaset东西实行sql语句

　　set oradynaset = oradatabase.dbcreatedynaset(_

　　"select * from mytable1", cint(0))

　　＜html＞＜body＞

　　＜h3＞retrieve all records in mytable1 table ( in oracle)

　　using oo4o＜/h3＞

　　＜table border=1 id="table1"＞

　　＜%

　　do while(oradynaset.eof = false)

　　response.write("＜tr＞＜td＞")

　　response.write(oradynaset.fields("id")) response.write("＜/td＞＜td＞")

　　response.write(oradynaset.fields("username"))

　　response.write("＜/td＞＜td＞")

　　response.write(oradynaset.fields("phone"))

　　response.write("＜/td＞＜td＞")

　　response.write(oradynaset.fields("email"))

　　response.write("＜/td＞＜/tr＞")

　　oradynaset.movenext

　　loop

　　'简略orasession

　　set orasession = nothing

　　%＞

　　＜/table＞

　　 ＜a href="javascript:window.history.go(-1)"＞

　　back previous page＜/a＞ |

　　＜a href="index.html"＞ back home page＜/a＞

　　＜/body＞＜/html＞ 2）革新

　　＜　%

　　'updaterecproc.asp -运用asp的oracle objects for ole革新数据记载

　　%＞

　　＜　%

　　'设置动作ole东西的变量。

　　dim orasession

　　dim oradatabase

　　dim oradynaset

　　'从提交的表格中获得字段值

　　fid = request.form("id")

　　fusername = request.form("username")

　　fphone = request.form("phone")

　　femail = request.form("email")

　　'创造orasession东西

　　set orasession = createobject("oracleinprocserver.xorasession") '经过翻开oracle数据库的一个贯穿创造oradatabase东西

　　set oradatabase = orasession.opendatabase("", "user/password", _

　　cint(0))

　　 '创造id= fid的记载的oradynaset东西

　　set oradynaset = oradatabase.createdynaset(_

　　"select * from mytable1 where id= "& fid, cint(0))

　　'运用edit本领革新id=fid记载的字段

　　do while(oradynaset.eof = false)

　　oradynaset.edit

　　oradynaset.fields("username").value = fusername

　　oradynaset.fields("phone").value = fphone

　　oradynaset.update

　　oradynaset.movenext

　　loop

　　%＞

　　＜html＞＜body＞

　　＜h3＞update a record in mytable1 table (oracle) using oo4o＜/h3＞ the record (id=＜%=fid%＞) has been updated successfully!＜br＞

　　you can view the result ＜a href="retrieveallrec.asp"＞ here＜/a＞

　　＜p＞

　　＜　a href="javascript:window.history.go(-1)"＞ back previous page＜/a＞

　　&bnsp;&bnsp;

　　＜a href="javascript:window.history.go(-2)"＞ back home page＜/a＞

　　＜　%

　　'简略orasession东西

　　set orasession = nothing

　　%＞

　　＜/body＞＜/html＞　　　　至此，咱们仍旧计划了怎样在asp代码中运用oracle objects for ole来处置oracle数据库中的数据。　　　　运用保存进程　　　　咱们仍旧计划了怎样在asp中考察oracle数据库，一切的sql语句都不妨嵌入在asp网页中。即使在asp中运用保存进程，将更不妨更灵验地处置数据。我倡导读者群除在asp中嵌入sql语句外，还该当运用pl/sql保存进程。在oracle数据库中创造保存进程仍旧胜过了本作品的范畴，在这边就不复举行引见了。　　　　asp和oracle数据库是二种比拟时髦的本领，都有十分普遍的用户群，即使不妨有机地将二者贯串起来，将不妨给处事带来很多简单，蓄意这篇作品不妨起到举一反三的效率，使读者群不妨更好地探究将这二种本领贯串运用的道路。