服务器之家

服务器之家 > 正文

asp事务功能简单小应用

时间:2019-09-29 10:59     来源/作者:asp教程网

conn.begintrans '开启事务功能 
...中间是一些添加修改删除操作 
如果出现错误就取消 
conn.rollbacktrans '取消事务更改并结束事务 
如果没问题,就保存 
conn.CommitTrans '保存事务并结束事务

复制代码代码如下:


<%if not session("type")="3" then  
response.Redirect "../login.asp"   
else 
%> 
<!--#include file="../conn.asp" --> 
<LINK href="../css/home1.css" type=text/css rel=stylesheet> 
<%     
set rs=server.CreateObject("ADODB.recordset") 
sql = "select * from [sushe] where m_su='"& request.Form("su") &"'" 
rs.open sql,conn,1,1 
if rs.recordcount>0 then 
response.write("<p align='center'>"&request.QueryString("name")&":"& request.Form("su") &"已经入库,请添加其他"&request.QueryString("name")&"!") 
response.Write "<a href='xitong_set.asp' target='mainFrame'>继续添加</a></p>" 
rs.close 
set rs=nothing 
conn.close 
set conn=nothing 
else  
rs.close 
conn.begintrans '开启事务功能 
rs.open "sushe",conn,1,3 
rs.addnew '插入数据到users表 
rs("m_su")=request.Form("su") 
rs.update 
rs.close 
if err.number<>0 then 
conn.begintrans '开启事务功能 
...中间是一些添加修改删除操作 
如果出现错误就取消 
conn.rollbacktrans '取消事务更改并结束事务 
如果没问题,就保存 
conn.CommitTrans '保存事务并结束事务 
response.Write("<p align='center'>添加失败,请重新添加"&" "&" ")  
response.write "<a href='xitong_set.asp' target='mainFrame'>重新添加</a></p>" 
else 
conn.CommitTrans '保存事务并结束事务 
response.write"<SCRIPT language=JavaScript>alert('添加成功!');" 
response.write"setTimeout(parent.mainFrame.document.location='xitong_set.asp',0)" 
response.write"</SCRIPT>" 
end if  
end if 
%> 

<%end if%> 
<%response.End()%> 
 

 

 

 

标签:

相关文章

热门资讯

玄元剑仙肉身有什么用 玄元剑仙肉身境界等级划分
玄元剑仙肉身有什么用 玄元剑仙肉身境界等级划分 2019-06-21
华为nova5pro和p30pro哪个好 华为nova5pro和华为p30pro对比详情
华为nova5pro和p30pro哪个好 华为nova5pro和华为p30pro对比详情 2019-06-22
男生常说24816是什么意思?女生说13579是什么意思?
男生常说24816是什么意思?女生说13579是什么意思? 2019-09-17
抖音撒撒累累是什么歌 撒撒累累张艺兴歌曲名字
抖音撒撒累累是什么歌 撒撒累累张艺兴歌曲名字 2019-06-05
超A是什么意思 你好a表达的是什么
超A是什么意思 你好a表达的是什么 2019-06-06
返回顶部