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

📄 view.asp

📁 wap系统程序源码 用户名密码:admin
💻 ASP
字号:
<% @LANGUAGE="VBSCRIPT" CODEPAGE="65001" %>
<%Response.ContentType = "text/vnd.wap.wml; charset=utf-8"%>
<?xml version="1.0" encoding="utf-8"?>
<!DOCTYPE wml PUBLIC "-//WAPFORUM//DTD WML 1.1//EN" "http://www.wapforum.org/DTD/wml_1.1.xml"> 
<!--#include file="conn.inc"-->
<%
dim id
cz=request("cz")
cw=request("cw")
pagegg=request.QueryString("pagegg")
if pagegg="" then pagegg="1"
id=usb(request.QueryString("id"))
set npp=Server.CreateObject("ADODB.Recordset")
rspl="select * from 66hc_xx where id="&id
npp.open rspl,conn
if not npp.eof then

sql="update [66hc_xx] set k=k+1 Where id="&id
  conn.Execute(sql)%>
<wml>
<head><meta http-equiv='Cache-Control' content='no-cache'/>
</head>
<card title="<%=npp("name")%>">
<p>
名称<%=ubb(npp("name"))%><br/>
<img src='<%=ubb(npp("pic"))%>' alt=''/><br/>
介绍<%=ubb(npp("txt"))%><br/>
价格<%=ubb(npp("jg"))%><br/>
店主<%=ubb(npp("fid"))%><br/>
联系<%=ubb(npp("lx"))%><br/>

<a href='list.asp?xid=<%=npp("xid")%>&amp;id=<%=npp("lid")%>'>回到上级</a><br/>
<a href="/index.asp">易购商城</a>
<%
end if
npp.close
set npp=nothing
conn.close
set conn=nothing
%>
</p>
</card>
</wml>                   

⌨️ 快捷键说明

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