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

📄 filesave.asp

📁 一个ASP做的政府网站的全站程序
💻 ASP
字号:
<%@ Language=VBScript %>
<!--#include file="connect.asp"-->
<!--#include file="articlechar.inc"-->

<%
if session("adminok")="" then
  response.redirect "login.asp"
end if
%>

<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title></title>
<link rel="stylesheet" type="text/css" href="../yuhuan.css">
<% 
Set obj = Server.CreateObject("LyfUpload.UploadFile")

filename="filename"
path=Server.MapPath(obj.request("directory")) & "\"	

result=obj.SaveFile(filename, path, false) '保存文件到服务器

	if result="3" then
   		Response.Write "Error!"
		Response.End
	end if
%>

</head>
<body leftmargin="0" topmargin="0">

    <table width="100%" border="0" cellspacing="1" cellpadding="0">
      <tr> 
        <td bgcolor="#000000"> 
          <table border="0" width="100%" cellspacing="1" cellpadding="0" bordercolorlight="#000000"
bordercolordark="#FFFFFF" class="9v">
            <tr> 
              
          <td width="100%" bgcolor="#ffcc66" align="center" class=p2 height="18"> 
            <font color="mintcream"> </font>文件上传 ----日期:<%=Formatdatetime(now(),vbshortdate)%>&nbsp;时间:<%=Formatdatetime(now(),vbshorttime)%>----</td>
            </tr>
            <tr> 
              <td width="100%" align="right" class=9v bgcolor="#FFFFcc" height="18"><a href="javascript:self.close()">『关闭窗口』</a></td>
            </tr>
        <form name="file1" method="post" action="filesave.asp" enctype="multipart/form-data" >
          <tr> 
            <td width="100%" align="center" class=9v bgcolor="#FFE6B0" height="18"> 
              文件已经成功上传...</td>
          </tr>
          <tr> 
            <td width="100%" bgcolor="#FFFFcc" height="100"><table width="100%" border="0" cellspacing="0" cellpadding="0" class=9v>
                <tr> 
                  <td width="36">&nbsp;</td>
                  <td bgcolor="#FFffcc">目录: 
                    <input name="directory" type="text" class=thin value="../photoes" size="31"> 
                    <br> <br>
                    文件: 
                    <input type="file" name="filename" size="21" class=9v> </td>
                </tr>
              </table> </td>
          </tr>
          <tr> 
            <td width="100%" bgcolor="#FFE6B0" align="center" height="27"> 
              <input type="reset" name="Reset" value="重选" class=button>
              &nbsp;&nbsp; 
              <input type="submit" name="Submit" value="上传" class=button>
            </td>
          </tr>
        </form>
          </table>
        </td>
      </tr>
    </table>
    </body>
</html>

⌨️ 快捷键说明

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