📄 show.asp
字号:
<%
'*****简体中文版 by 资源搜罗站 [http://www.99ss.net]*****
datano=request("datano")
Set conn=Server.CreateObject("ADODB.Connection")
param = "driver={Microsoft Access Driver (*.mdb)}"
conn.Open param & ";dbq=" & Server.MapPath("cd.mdb")
Set rs=Server.CreateObject("ADODB.Recordset")
sqlstr="select * from DATA where datano='" & datano & "'"
rs.open sqlstr,conn,3,2
rs("hits")=rs("hits")+1
rs.update
areana=rs("areana")
datana=rs("datana")
ordprice=rs("ordprice")
content=rs("content")
rs.close
conn.close
%>
<HTML>
<HEAD>
<TITLE>CD内容解说</TITLE>
<link REL="stylesheet" HREF="style.css" TYPE="text/css">
</head>
<body bgcolor=ffffff marginheight=3 marginwidth=0 leftmargin=0 topmargin=3 bgproperties=fixed>
<center>
<img src=img/chome.jpg width=298 height=88><br><br>
<table border=0 width=90%>
<tr><td><P Class=text2><%=content%></P></TD></TR>
</table><br>
<table border=0 bgcolor=006600><tr><td><font size=3 color=ffff00><%=areana%> <%=datana%> 售价:<%=ordprice%>元</font></td></tr></table>
<FORM METHOD=POST ACTION=order.asp>
<input TYPE=HIDDEN NAME=mytype VALUE=insert>
<input TYPE=HIDDEN NAME=areana VALUE="<%=areana%>">
<input TYPE=HIDDEN NAME=datano VALUE="<%=datano%>">
<input TYPE=HIDDEN NAME=datana VALUE="<%=datana%>">
<input TYPE=HIDDEN NAME=ordprice VALUE="<%=ordprice%>">
<input TYPE=SUBMIT VALUE=放入购物袋></td></form><br><br>
</center>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -