?? changejzh.asp
字號:
<!--#include file="cn.asp"-->
<%
id=request.QueryString("id")
if session("admin")="" then
response.Write "<script language=javascript>alert('非法用戶!');window.open('login.htm');</script>"
response.End()
cn.close
set cn=nothing
end if
jz=request.QueryString("jz")
select case jz
case 1
set rs=server.CreateObject("adodb.recordset")
sql="select * from jzh where id="&id
rs.open sql,cn,1,3
'rs("user")=trim(request.Form("user"))
rs("leibie")=trim(request.Form("leibie"))
rs("hx")=trim(request.Form("hx"))
rs("jiage")=trim(request.Form("jiage"))
rs("are")=trim(request.Form("are"))
rs("xname")=trim(request.Form("xname"))
rs("fengge")=trim(request.Form("fengge"))
rs("man1")=trim(request.Form("man1"))
rs("tel")=trim(request.Form("tel"))
rs("address")=trim(request.Form("address"))
rs("date")=trim(request.Form("date"))
rs.update
response.Write "<script language=javascript>alert('修改成功!');history.go(-1);</script>"
response.End()
rs.close
set rs=nothing
cn.close
set cn=nothing
case 2
set rs=server.CreateObject("adodb.recordset")
sql="delete from jzh where id="&id
rs.open sql,cn,1,3
response.Write "<script language=javascript>alert('操作成功!');window.location.replace('index.asp');</script>"
response.End()
rs.close
set rs=nothing
cn=nothing
set cn=nothing
end select
%>
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -