<!-- #include file="../conn.asp" -->
<!--#include file="admin.asp"-->
<%call head
call saycardd("WAP2.0图片上传")
Response.Expires = -1
Response.AddHeader "Pragma", "no-cache"
Response.AddHeader "Cache-Control", "no-cache, must-revalidate"
%>
<%
dim lid
lid=TRim(Request("lid"))
	if not isnumeric(lid) then lid=""
dim nums
nums=request("nums")
if nums="" or IsnumerIc(nums)=False then
nums=1
else
if nums>20 then
nums=20
end if
end if
if saytk=1 then response.redirect"upfile.asp?sid="&sid&"&lid="&lid&"&saytk=2"
if lid<>"" then
%>
<form name="form2" method="post" action="upfile.asp?sid=<%=sid%>&amp;saytk=<%=saytk%>&amp;lid=<%=lid%>">
请设置上传数目(最多20条)：<br/>
<input name="nums" type="text" id="nums2" size="10">
<input type="submit" name="Submit" value="提交">
</form><br/>
<%
response.write("<form action='upload.asp?sid="&sid&"&amp;lid="&lid&"' enctype='multipart/form-data' method='post'>")
%>
        图片上传系统<br/>
		图片名称:<input name="name" type="text"/><br/>
        图片来源:<input name="laiy" type="text" value="<%=Request.ServerVariables("SERVER_NAME")%>"/><br/>
        <%for i=1 to nums %>
        选择图片<%=i%>:<input type="file" name="filefield1<%=i%>" size="15"/><br/> 
        <%next%>
        建议所上传图片名和目录组合是字母与数字.<br/>  
		<input type="submit" name="Submit2" value="上传"></form><br/>
<%
else%>
请不要非法传递参数！<br/>
<%end if%><br/>
<a href="piclist.asp?sid=<%=sid%>&amp;saytk=<%=saytk%>&amp;lid=<%=lid%>">[图片列表]</a><br/>
<a href='picdl.asp?sid=<%=sid%>&amp;saytk=<%=saytk%>'>[图片类别]</a><br/>
<a href="../index.asp?sid=<%=sid%>&amp;saytk=<%=saytk%>">[后台管理]</a>
<%call head1%>