图4-13
以下是在商品维护表里进行操作以及修改成功后的ASP程序:
<%
dim strsql
set rs=server.createobject("adodb.recordset") strsql="select * from product" rs.open strsql,cn,3,3
if request.form("hidact")="submit" then %>
<!--include file="validate.asp"--> <%
if errormsg="" then while not rs.eof
if request.form("chk" & rs.fields("mpno"))="1" then
strsql="delete * from product where mpno=" & rs.fields("mpno") cn.execute strsql else
strsql="update product set"
strsql =strsql & vbcrlf & "mpnum=" & cint(request.form("txt" & rs.fields("mpno")))
strsql =strsql & vbcrlf & "where mpno="& rs.fields("mpno") cn.execute strsql end if
rs.movenext wend
response.write"<p align=""center"">修改成功 !</p>" end if end if
搜索“diyifanwen.net”或“第一范文网”即可找到本站免费阅读全部范文。收藏本站方便下次阅读,第一范文网,提供最新教学研究网上商城毕业论文(18)全文阅读和word下载服务。
相关推荐: