📄 mobileup.asp

📁 admin/admin.asp是WAP的后台管理登陆页面
💻 ASP
字号:
<% @LANGUAGE="VBSCRIPT" CODEPAGE="65001" %>
<!--#include FILE="conn.asp"-->
<!--#include FILE="char.asp"-->
<%
cad=request("aid")
cbd=request("bid")
set rs = server.createobject("adodb.recordset")
sql="select * from aclass where id="&cad
rs.open sql,conn,1,1
if not rs.eof then
classname=rs("class")
end if
rs.close
set rs=nothing
set rs = server.createobject("adodb.recordset")
sql="select * from anclass where nclassid="&cbd
rs.open sql,conn,1,1
if not rs.eof then
nclassname=rs("nclass")
nclassup=rs("nclassup")
end if
rs.close
set rs=nothing
if nclassup=1 and session("nameup")<>"" then
%>
<%
sq1="select * from upset where id=1"
Set Rs1 = Server.CreateObject("Adodb.Recordset")
rs1.open sq1,conn,1,2
rsfilesize=rs1("filesize")
rsallowedfile=rs1("allowedfile")
rsforceup=rs1("forceup")
rs1.close
Set rs1=nothing
%>
<?xml version="1.0" encoding="utf-8"?>
<!DOCTYPE html PUBLIC "-//WAPFORUM//DTD XHTML Mobile 1.0//EN" "http://www.wapforum.org/DTD/xhtml-mobile10.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
<title>文件上传</title>
</head>
<body>
<p>
<form enctype='multipart/form-data' action ='mobileup2.asp' method='post' Accept-Charset='utf-8'/>
所属大类:<%=classname%>
<br/>所属子类:<%=nclassname%>
<br/>允许<%=rsallowedfile%>文件格式,最大为<%=rsfilesize%>KB(1KB=1024字节)
<br/>文件名称:<input type='text' name='title' title='文件名称'  value='' size='10' maxlength='20'/>
<br/>文件介绍:<input name='content' type='text' title='软件介绍' value='' size='10' maxlength='100'/>(100字以内)
<br/>上传文件:<input name='file1' type='file' title='请选择文件' size='10'/>
<br/><input type='submit' name='Submit' value='上　传'/>
<input type='reset' name='Submit2' value='重　设'/> 
<input name='classid' type='hidden' value='<%=cad%>'/>
<input name='nclassid' type='hidden' value='<%=cbd%>'/>
<input name='writer' type='hidden' value='<%=session("nameup")%>'/>
<input name='shouji' type='hidden' value='<%=session("shoujipno")%>'/>
<input name='articleon' type='hidden' value='2'/>
<br/>点击上传时,没有返回信息请不要关闭窗口。 
</form>
-------------
<br/><a href='step.asp?id=<%=cad%>'><%=classname%></a>  
<br/><a href='index.asp'>网站首页</a></p> 
</body>
</html>
<%
else
response.redirect "logo.asp"
end if
%>
⌨️ 快捷键说明

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