upfile.asp
来自「中国114网搜索系统 版 本： 文件大小：580 KB 软件语言：简体中文 授」· ASP 代码 · 共 43 行
ASP
43 行
<!-- #include file=../database.asp -->
<%
Set rs = Server.CreateObject("ADODB.Recordset")
sql="select * from ourusers where username='supervisor'"
rs.open sql,conn,1,1
if not rs.eof then
if trim(rs("pass"))<>trim(session("pass")) then
response.write "<br>错误的密码!"
'rs.close
'set rs=nothing%>
<script>top.location='../login.asp';</script>
<%
'response.write "rspass:"&rs("pass")
'response.write "sesseionpass:"&session("pass")
conn.close
set conn=nothing
response.end
else
rs.close
set rs=nothing
conn.close
set conn=nothing
end if
else
response.write "错误:用户不存在!"
rs.close
set rs=nothing
conn.close
set conn=nothing
response.end
end if
%>
<body topmargin=0 leftmargin=0 bgcolor=ccbbaa>
<!--
<form method=POST action=upfile2.asp name=ff enctype=multipart/form-data>
上传网址文件
<input type=file name=photo><input type=button value=开始上传 name=send>
</form>
-->
<form name="form1" enctype="multipart/form-data" action="upfile2.asp" method="post">
<input type="file" name="photo">
<input type="submit" name="Submit" value="上传">
</form>⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?