?? uploadsave.asp
字號:
<html>
<head>
<title>example</title>
<link href=../style.css rel=STYLESHEET type=text/css>
</head>
<body>
<%
if session("admin_name")="" then response.end
set rs=server.createobject("adodb.recordset")
%>
<!--#include FILE="upload_5xsoft.inc"-->
<%
set upload=new upload_5xsoft
set file=upload.file("file1")
if file.fileSize>0 then
'自動生成文件名
filename=date()
filename=filename&time()
filename=replace(filename,"-","")
filename=replace(filename,":","")
filename=replace(filename," ","")
filename=filename+"."
filenameend=file.filename
filenameend=split(filenameend,".")
if filenameend(1)="gif" or filenameend(1)="jpg" then
filename=filename&filenameend(1)
file.saveAs Server.mappath("../images/"&filename)
response.write filename
response.write "已成功上傳至你的服務器中，請使用如下地址添加圖片"
response.write "<br>"
response.write "<font color=red>"
response.write "http://你的服務器ip或者域名/本軟件的目錄/images/"&filename
response.write "</font>"
else
response.write "文件格式不對"
response.write "<a href=upload.asp>返回"
end if
set file=nothing
else
response.write "文件內容不能為空"
response.write "<a href=upload.asp>返回"
end if
set upload=nothing
response.write "<br>"
%></body>
</html>
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -