📄 shrevise1.asp
字号:
<%@ LANGUAGE="VBSCRIPT"%>
<%
id=request("ID")
pname=request("pname")
price=request("price")
des=request("desc")
email=request("email")
contact=request("contact")
response.write pname&"<br>"
response.write price&"<br>"
response.write des&"<br>"
response.write email&"<br>"
response.write contact&"<br>"
set conn=server.createObject("ADODB.Connection")
dbpath=server.mappath("market.mdb")
conn.open "driver={Microsoft Access Driver (*.mdb)};dbq="&dbpath
if request("submit12")<>"" then
sql="delete from buyinfo where ID="& id
conn.execute sql
else
sql="update buyinfo set pname='"&pname&"',price='"&price&"',des='"&des&"',email='"&email&"',contact='"&contact&"' where ID="& id
response.write sql
conn.execute sql
end if
set conn=nothing
%>
<html>
<head>
<title>Untitled Document</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
</head>
<body bgcolor="#FFFFFF">
<p> </p>
<p> </p>
</body>
</html>
<script language="JavaScript">
<!--
alert("OK!...修改成功!");
for(i=0;i<20;i++);
window.location.href="showinfo.asp";
//-->
</script>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -