<!-- #include file="../conn.asp" -->
<!--#include file="admin.asp"-->
<%call head
call saycardd("批量地址采集图片")
Response.Expires = -1
Response.AddHeader "Pragma", "no-cache"
Response.AddHeader "Cache-Control", "no-cache, must-revalidate"
%>
<%if saytk=1 then response.redirect"picget.asp?sid="&sid&"&lid="&lid&"&saytk=2"
dim lid,idc,TP
lid=TRim(Request("lid"))
idc=TRim(Request("idc"))
TP=TRim(Request("TP"))
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
%>
<form name="form2" method="post" action="picget.asp?sid=<%=sid%>&amp;lid=<%=lid%>&amp;TP=<%=TP%>">
请设置采集数目(最多20条)：<br/>
<input name="nums" type="text" id="nums2" size="10">
<input type="submit" name="Submit" value="提交">
</form><br/>
<%
response.write("<form action='picload.asp?sid="&sid&"' enctype='multipart/form-data' method='post'>")
if TP="" then
set rs1=server.createobject("adodb.recordset")
	sql1="select * from wjlist Where type=1"
	rs1.open sql1,conn,1,1
%>
选择导入到的类别:
<select name="lid" value="<%=lid%>">
<option value=''>选择类别</option>   
<% do while not rs1.eof
%> <option value='<%=rs1("lid")%>'><%=rs1("name")%></option>   
<%  rs1.movenext
        loop
    rs1.close
    set rs1=nothing
response.write"</select><br/>"
end if
%>
        图片采集系统<br/>
        <%if TP="" then%>
		图片名称:<input name="name" type="text"/><br/>
        图片来源:<input name="laiy" type="text" value="<%=Request.ServerVariables("SERVER_NAME")%>"/><br/>
        <%end if%>
        <%for i=1 to nums %>
        图片地址<%=i%>:<input type="text" name="file<%=i%>"/><br/> 
        <%next%>
        <input type="hidden" name="TP" value="<%=TP%>"/>
        <input type="hidden" name="idc" value="<%=idc%>"/>
        <input type="hidden" name="nums" value="<%=nums%>"/>
		<input type="submit" name="Submit2" value="采集上传"></form><br/>
<br/>
<%if lid<>"" then%>
<a href="piclist.asp?sid=<%=sid%>&amp;lid=<%=lid%>">[图片列表]</a><br/>
<%end if%>
<a href='picdl.asp?sid=<%=sid%>'>[图片类别]</a><br/>
<a href="../index.asp?sid=<%=sid%>">[后台管理]</a>
<%call head1%>