save.asp

来自「汽车违法查询系统V0.1版本 1.直接解压上传空间就可使用！ 管理员adm」· ASP 代码 · 共 38 行

<!--#include file="conn.asp"-->
<%
dim xm
dim cl
dim cx
dim sj
dim dd
dim qk
dim czy
xm=request.form("xm")
cl=request.form("cl")
cx=request.form("cx")
sj=request.form("sj")
dd=request.form("dd")
qk=request.form("qk")
czy=request.form("czy")

id=request("id")
%>
<%
Set rs = Server.CreateObject("ADODB.Recordset")
sql = "SELECT * FROM 违法车辆 where id="&id
rs.Open sql,conn,3,2
rs("车主姓名")=xm
rs("违法车辆")=cl
rs("违法车型")=cx
rs("违法时间")=sj
rs("违法地点")=dd
rs("违法情况")=qk
rs("操作员")=czy
rs.update
rs.close

conn.close
set conn=nothing
response.write "<script>alert('数据修改成功.');location.replace('admin.asp')</script>"
%>