上傳|資料|資料庫 關於圖片上傳的例子在網上有很多文章和原代碼。但是每次上論壇瀏覽文章的時候都是看到很多網友對圖片上感測到頭疼和麻煩。其實這個問題也是曾經讓我感到頭疼。也看過了不少的文章和代碼。現在我寫的這篇文章是把我比較喜歡的一篇代碼和動網裡的高手對這篇代碼最佳化後再加上我增加一些代碼結合出來的！呵呵，其實這篇文章是沾了寫這篇代碼的人(稻香居士)和動網裡那些高手的光。:)
好了，不說廢話了。開始來搭建所需要的環境和資料結構！
先建立一個名字叫photo的檔案夾。(我在這裡就是把圖片上傳到這個檔案夾裡的。)建立一個名字叫database的資料庫。再接著建立一個名字叫sFile的表。表裡設計四個欄位分別是id(int),image(varchar),image1(varchar),image2(varchar)。我這裡用的資料庫是SQL。
相關的檔案
register.asp
<html>
<head>
<title>檔案</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
</head>
<body>
<form name="form1" method="post" action="save.asp">
<table width="50%" border="1" cellspacing="0" cellpadding="0" align="center">
<tr>
<td width="20%"><a href="#" OnClick="javascript:window.open('/reg_upload.asp',null,' left=40%,top=40%,height=250,width=470,status=yes,toolbar=no,menubar=no,resizable=yes,copyhistory=yes,scrollbars=yes,location=no,status=no,titlebar=no')">圖片上傳</a></td>
<td width="80%">
<input type="text" name="myface">
<input type="text" name="myface1">
<input type="text" name="myface2">
(此處使用者不必填圖片上傳後自動產生) </td>
</tr>
<tr>
<td colspan="2" align="center">
<input type="submit" name="Submit" value="提交">
<input type="reset" name="Submit2" value="重設">
</td>
</tr>
</table>
</form>
</body>
</html>
reg_upload.asp
<html>
<head>
<title></title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="css/style.css" type="text/css">
</head>
<body leftmargin="0" topmargin="0" >
<br>
<br>
<br>
<table width="90%" border="0" align="center" bgcolor="#000000" height="152" cellspacing="1">
<tr>
<td height="34" align="center" bgcolor="#FFFFFF"><font color="#FFFF33"><b><font size="4" color="#000000">選擇圖片</font></b></font></td>
</tr>
<tr>
<td bgcolor="#FFFFFF">
<form name="form" method="post" action="upfile.asp" enctype="multipart/form-data" >
<input type="hidden" name="filepath" value="photo">
<input type="hidden" name="act" value="upload">
<input type="file" name="file1" size="30"><br>
<input type="file" name="file2" size="30"><br>
<input type="file" name="file3" size="30">
<input type="submit" name="Submit" value="粘 貼" class="tl">
</form>
</td>
</tr>
</table>
</body>
</html>
upfile.asp
<!--#include FILE="upload.inc"-->
<html>
<head>
<title>檔案上傳</title>
</head>
<body>
<%
dim arr(3)
dim upload,file,formName,formPath,iCount,filename,fileExt,i
set upload=new upload_5xSoft ''建立上傳對象
formPath=upload.form("filepath")
''在目錄後加(/)
if right(formPath,1)<>"/" then formPath=formPath&"/"
iCount=0
i=0
for each formName in upload.file ''列出所有上傳了的檔案
set file=upload.file(formName) ''產生一個檔案對象
if file.filesize<0 then
response.write "<font size=2>請先選擇你要上傳的圖片 [ <a href=# onclick=history.go(-1)>重新上傳</a> ]</font>"
response.end
end if
if file.filesize>100000 then
response.write "<font size=2>圖片大小超過了限制 [ <a href=# onclick=h
