⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 attribute.asp

📁 asp+access开发的网上购物程序
💻 ASP
字号:
<%@ codepage ="936" %><!--#include file="../../conn/dbconn2.asp" --><html><head><meta http-equiv="Content-Type" content="text/html; charset=gb2312"><title>商业机会审核</title><LINK href="../Style.css" rel=stylesheet type=text/css></head><%IF request("action")="save" Thencall save()Elsecall main()End Ifsub main()if not isEmpty(request("id")) theninfo_id=request("id")elseinfo_id=1end ifSet rs= Server.CreateObject("ADODB.Recordset") sql="select * from spzs where id="&info_id&""rs.open sql,conn,1,1%><CENTER><FORM action=attribute.asp method=post name=form1><INPUT name=action type=hidden value="save"><INPUT name=info_id type=hidden value="<%=info_id%>"><TABLE align=center border=0 cellPadding=3 cellSpacing=0 width="98%"><TBODY><TR><TD align=left><INPUT <%if rs("flag")=0 then response.write "checked"%> name=flag type=radio value=0> 等待审核 </TD><TD><INPUT <%if rs("flag")=1 then response.write "checked"%> name=flag type=radio value=1> 已经审核</TD></TR><TR><TD height="40" align="center" colspan=2><INPUT type=submit value='确&nbsp;&nbsp;定' name=Submit2>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<input type="button" value="返&nbsp;&nbsp;回" name="B4" onclick="javascript:window.close();"></TD></TR></TBODY></TABLE></form><%end subsub save()set rs=server.createobject("adodb.recordset")sql="select * from spzs where id="&request("info_id")&""rs.open sql,conn,3,3rs("flag")=request("flag")rs.updateresponse.write "<br><center>"+"操作成功,请<a href=javascript:window.close();><font color=#ff000>关闭窗口</font></a>进行其他操作。"end subrs.closeset rs=nothingconn.closeset conn=nothing%></body></html>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -