Asp編輯圖片，接上面（ASP批量儲存和編輯圖片一文）
==============================================修改圖片
效果圖如下
拆分圖片
set res = conn.execute("select * from sys_gdimg where id="&sid&"")
if not res.eof then
pic2=res("img")
if pic2<>"" then
piclb=split(pic2,",")
end if
<%
'顯示圖片
for k = 0 to ubound(piclb)-1
%>
<a><img alt='點選刪除該圖片' style="cursor:pointer" onload='DownImage(this,90,90);' src='../UploadFiles/<%=piclb(k)%>'></a>
<%next%>
儲存圖片
'======================================儲存圖片
dim request2,formPath,formName,intCount,intTemp
set request2=new UpLoadClass
'設定檔案允許的附件型別為gif/jpg/rar/zip
request2.FileType="gif/jpg/bmp/jpeg"
'設定伺服器檔案儲存路徑
request2.SavePath="../UploadFiles/"
'設定字符集
request2.Charset="gb2312"
'開啟物件
request2.Open()
intCount=0
for intTemp=1 to Ubound(request2.FileItem)
formName=request2.FileItem(intTemp)
temp_str=temp_str&formPath&request2.form(formName)&","
if request2.form(formName&"_Err")=0 then intCount=intCount+1
next
temp_str2=temp_str
if temp_str="" then
img2=pic1
else
img2=pic1&temp_str2
end if
kid編輯是的引數
str="update table sys_gdimg set img='"&img2&"' where id="&kid&""
conn.execute(str)