📄 reed.asp

📁 仿世纪建站源码

💻 ASP

字号:

<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<%response.buffer=true%>
<%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="config.inc"-->
<!--#include file="ubb.inc"-->
<wml>
<head>
<meta http-equiv="Cache-Control" content="max-age=0"/>
<meta http-equiv="Cache-Control" content="no-cache"/>
<meta http-equiv="Expires" content="Mon, 1 Jan 1990 00:00:00 GMT"/>
</head>
<card id="id" title="修改投票主题">
<p>
<!--#include file="admin2.inc"-->
<%=now()%><br/>
<%
dim objgbrr,ssql
  set objgbrr=Server.CreateObject("ADODB.Recordset")
  ssql="select * from m where cstr(id)=1"
  objgbrr.open ssql,myc,1,1
if not objgbrr.eof then 
dim name
name=objgbrr("name")
%>
投票主题内容:<br/>
<input name="newname<%=minute(now)%><%=second(now)%>" maxlength="200" value="<%=ubb(name)%>"/><br/>
<anchor title="确定">[确定提交]
<go href="reedcl.asp?myid=<%=myid%>&amp;id=<%=id%>&amp;idss=<%=idss%>" method="post" accept-charset='utf-8'>
<postfield name="newname" value="$(newname<%=minute(now)%><%=second(now)%>)"/>
</go>
</anchor>

<br/>-----------<br/>
<a href="../admin2.asp?myid=<%=myid%>&amp;idss=<%=idss%>">[管理页面]</a><br/>
<!--#include file="bb.asp"-->
<!--#include file="cc.asp"-->
<%
end if
  else
response.write"非法数据!!<br/><a href='http://66hc.net/wap'>第六感</a>"
end if
myc.close
set myc=nothing
%>
</p>
</card>
</wml>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -