"
response.end '强制结束
end if
response.end '强制结束
end if
dim rs_ccong '自定义RS对象,高手都要自己定义方便程序阅读
set rs_ccong=server.createobject("adodb.recordset")
rs_ccong.open "select * from CcongData where CcongId="&CcongId,conn,1,3 '读写方式从表打开记录
rs_ccong("CcongContent")=CcongContent
rs_ccong.update
rs_ccong.close
set rs_ccong=nothing
response.Redirect("show.asp")
%>
备注:打开show.asp,点击“ID”就删除信息,点击“内容”就编辑信息。本程序匆匆已经测试没有任何BUG。注意,匆匆第一次写教程,难免有一些疏忽和手法老套,如果你有什么意见或者疑问请直接联系:QQ19807980 19807980@QQ.COM 匆匆都会为你解答。
本程序每一句话都会让你不断成长,基本上没有任何垃圾代码,并且程序使用语法都是一些常用的语法,只要你彻底消化了本程序,相信目前流行的:日记本,留言本程序啊,你也可以轻松写出。
| 对此文章发表了评论 |
