网络编程
位置:首页>> 网络编程>> 数据库>> 在ASP中使用Oracle数据库技巧(2)

在ASP中使用Oracle数据库技巧(2)

  发布时间:2008-05-17 11:47:00 

标签:Oracle,数据库,asp

编辑数据记录

我们将使用OraDynaset的方法实现对数据记录的编辑。

1)使用SQL语句创建OraDynaset对象。 

 <% 
     ’创建ID= fID的记录的OraDynaset对象。 
     Set OraDynaset = OraDatabase.CreateDynaset(_ 
     "select * from MYTABLE1 where ID= "& fID, cint(0)) 
     %> 

fID是想插入更更新的记录的ID值。

2)执行OraDynaset更新或添加数据记录。 

 <% 
     ’使用Edit方法更新ID=fID记录的域。 
    ’或使用AddNew插入一个新记录 
     OraDynaset.Edit 
     OraDynaset.Fields("Phone").Value = fPhone 
     OraDynaset.Update 
     ’ 删除创建的对话 
     Set OraSession = Nothing 
      %> 

删除数据记录   

如果已经真正地理解了我们在上面讨论的一些方法(Edit、Update和AddNew),也许有的读者已经知道该如何在Oracle数据库中删除记录了。
    

 <% 
     ’删除所有符合上面条件的记录 OraDynaset.Delete 
     %> 
     在Oracle8i中搜索和更新数据记录的代码 
     1)搜索 
     <% 
   ’RetriveRecProc.asp -使用ASP的Oracle Objects for OLE更新数据记录 
   %> 
   <% ’定义作为OLE对象的变量 
     Dim OraSession 
     Dim OraDatabase 
     Dim OraDynaset 
   
   ’创建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> 

0
投稿

猜你喜欢

手机版 网络编程 asp之家 www.aspxhome.com