📄 saveqy.asp

📁 青岛分类信息网整合企业名录.供大家分享

💻 ASP

字号:

<!--#include file="upload_5xsoft.inc" -->
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>图片上传</title>
<style type="text/css">
<!-- 
td           { font-size: 12px; line-height: 17px }
body         { font-size: 12px; line-height: 17px }
p            { margin-top: 1; margin-bottom: 1 }
form         { margin-top: 1; margin-bottom: 1 }
a:link       { text-decoration: none; color: black }
a:visited    { text-decoration: none; color: black }
a:active     { text-decoration: none }
a:hover      { text-decoration: underline; color: red }
-->
</style>
</head>
<body leftmargin="0" topmargin="0" background="../images/bg.gif">
<table width="100%" height="100%" border="0" cellpadding="0" cellspacing="0">
  <tr>
    <td align="center">
<script language="Javascript">
function pic(smileface)
{
	window.opener.document.postart.dpic.value=smileface;
}
</script>
<%
Server.ScriptTimeout=1000
set upload=new upload_5xSoft
set file=upload.file("file1")
formPath="../upload/"
if file.filesize>0 then
fileExt=lcase(right(file.filename,3))
end if
randomize
ranNum=int(9000000*rnd)+10000
filename=formPath&year(now)&month(now)&day(now)&hour(now)&minute(now)&second(now)&ranNum&"."&fileExt
formPath1="upload/"
filename1=formPath1&year(now)&month(now)&day(now)&hour(now)&minute(now)&second(now)&ranNum&"."&fileExt
if file.FileSize>0 then 
file.SaveAs Server.mappath(FileName)
end if
response.write "图片上传成功！<br><br><a href=Javascript:pic('"&filename1&"');><font color=red>点击此处可以把图片地址写入数据库</font></a>"
%>
    </td>
  </tr>
</table>
</body>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -