editupfile.asp

Flash电子相册 v1.2 Build 1108完整版本下载

<DIV id=javascript>The Apple.com page you are viewing requires JavaScript to 
operate properly. Please turn on and reload the page. For more information, 
click <A 
href="#">here</A>.</DIV></NOSCRIPT><!-- START NAV BAR TABLE -->



<DIV id=tabs>
<TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
  <TBODY>
  <TR>
    <TD vAlign=top width="49%" background=ok7_files/7bgleft.gif>&nbsp;</TD>
    <TD vAlign=top align=middle width="2%">&nbsp;</TD>
    <TD vAlign=top width="49%" background=ok7_files/7bgr.gif>&nbsp;</TD>
  </TR></TBODY></TABLE>
</DIV>

<DIV id=tour>
<form name="form1" method="post" action="deleteimg.asp">

<TABLE cellSpacing=0 cellPadding=0 width="695" border=0>
  <TBODY>
  <TR>
    <TD valign="bottom" Align=left height=110 width="695" background=ok7_files/indextourtopfpo.jpg>&nbsp;&nbsp;
    <OBJECT classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000"
 codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=6,0,0,0"
 WIDTH="625" HEIGHT="45" id="026" ALIGN="">
 <PARAM NAME=movie VALUE="026.swf"> <PARAM NAME=quality VALUE=high> <PARAM NAME=wmode VALUE=transparent> <PARAM NAME=bgcolor VALUE=#FFFFFF> <EMBED src="026.swf" quality=high wmode=transparent bgcolor=#FFFFFF  WIDTH="625" HEIGHT="45" NAME="026" ALIGN=""
 TYPE="application/x-shockwave-flash" PLUGINSPAGE="http://www.macromedia.com/go/getflashplayer"></EMBED>
</OBJECT><br><br>
    
    </TD>
   
  </TR></TBODY></TABLE>
  






	<DIV class=padder>
	<P><STRONG>欢迎使用电子相册！</STRONG>　　<font color=red>→</font>
	<input type="button" onclick="openLayer('flyoutForm')" name="button222" value="上传相片" class="buttonface">　　
	<input type="submit" name="delpic" value="删除" class="buttonface">　　
	<input type=button name=admindir value=管理相册分类 class="buttonface" onClick="InsertFlash();return false;">
	<input type=button name=admindir2 value=预览 class="buttonface" onClick="windows.open('')">	
	<input type=button name=admindir3 value=重设密码 class="buttonface" onClick="InsertPWD();return false;">
	</P>
      <TABLE cellSpacing=1 cellPadding=3 width="655" bgColor=#e6e6e6 
        border=0>
        <TR>
          <TD width=158 bgColor=#ffffff height=184 valign="top">


        <!--相册目录显示程序段 开始-->
    
    

	<DIV id=nav>
	
	

  <%	ccbegin = InStr(ROWids,"&now_dir=")
	ccEND = InStr(ROWids,"&ordner=")
	now_dir = mid(ROWids,ccbegin+9,ccEND-ccbegin-9)
	dirss=Request.QueryString("dirss")
	if len(dirss)>0 then
		now_dir=dirss
	end if


	ccEND = ccEND+8
	ccCOUNT = mid(ROWids,ccEND)
	
	MyString = Split(ccCOUNT, "|", -1, 1)
	LenOfArray=UBound(MyString)-Lbound(MyString) 
  	
  
   for i=0 to LenOfArray
	product_namexh=trim(MyString(i))
	MyString2 = Split(product_namexh, "`", -1, 1)
	product_no=MyString2(0)
	xh=MyString2(1)
	
	 %>
	 <%if xh<>now_dir then%>
 <a href=editupfile.asp?dirss=<%=xh%>><%=product_no%></a>
     <%else%>
<a id="ma" href=editupfile.asp?dirss=<%=xh%>><b><%=product_no%></b></a>
	 <%end if%>
	 <%next%>
  </DIV>
      
<!--相册目录显示程序段  结束-->

            　</TD>
          <TD width=475 bgColor=#ffffff height=184>
            
            
          
        <%

		cc = LoadFile("bilder/"&now_dir&"/bilder.txt")
		if len(cc)>22 then
	
		%>

									<table width="100%" border="0" cellspacing="0" cellpadding="4">
		
		        <input name="now_dir" type="hidden" class="buttonface" id="now_dir" value="<%=now_dir%>" size="30">

										<tr>
		<%
						
						ccEND = InStr(cc,"&fotos=")+7
						
						ccCOUNT = mid(cc,ccEND)
	
						MyString3 = Split(ccCOUNT, "|", -1, 1)
						LenOfArray=UBound(MyString3)-Lbound(MyString3)
						jjjj=0
						iiii=0
						for i=LenOfArray to 0 step -1
							jjjj=jjjj+1
							iiii=iiii+1
							product_namexh=trim(MyString3(i))
							MyString4 = Split(product_namexh, "`", -1, 1)
							product_no=MyString4(0)
							xh=MyString4(1)
							%>
									
										
									<td align="center" width="100"><a href="bilder/<%=now_dir&"/"&xh%>" target="_blank"><img src="bilder/<%=now_dir&"/"&xh%>" width="80" height="80" border="0"></a><br>
									<br>
									<input type="checkbox" name="mapid" value="<%=i%>">
                    【<a href="#" onClick="MM_openBrWindow('showupfile.asp?tid=<%=now_dir%>&xh=<%=i%>&names=<%=server.URLEncode(product_no)%>&fname=<%=xh%>','','scrollbars=yes,width=480,height=550')" title="点击修改文件[<%=now_dir&"/"&xh%>]"><%=product_no%></a>】<br>
                    <br>
                  </td>

							<%
							if jjjj=3 then
								response.write "</tr><tr>"
								jjjj=0
							end if


						next 
						%>

								</tr>

								<tr align="right"><td></td></tr>
								 
								</table>
				<%else
					response.write "目前没有任何作品！"
		end if


%>
       
								
            
            </TD>
        </TR>
        <TR>
          <TD vAlign=top width="643" bgColor=#ffffff colspan=2>
          
          
     

   
          
          
                     </TD></TR></TABLE>
    <p> </form>
    </p>

	</DIV>


	<img src="ok7_files/indextourbottomfpo.gif" alt="bottom" width="695" height="20" border="0" class="tourbottom">

</div>

<DIV id=breadcrumb></DIV><DIV id=footer></DIV>
<P class=sosumi>Copyright &copy;  2005 21365.net, Inc. All rights reserved.</P><!-- END INCLUDED FOOTER -->


    

<!--UP BEGIN-->
<script LANGUAGE=javascript>
<!--
function mysub()
{
	if (formUP.map.value != "" && formUP.mapname.value != "" && formUP.shuoming.value != "")
	{
		closeLayer('flyoutForm');
		esave.style.visibility="visible";

		formUP.submit();
	}
	else
	{alert('请选择要上传的图片,并填写图片名称和说明!')
	return false;}
}

//-->
</script>

<DIV class="flyoutFormStyle" id="flyoutForm">
<table id="table32" style="BORDER-COLLAPSE: collapse" bordercolor="Orange" cellspacing="0" cellpadding="0" width="317" border="0">
<tr>
<td width="310" colspan="2" rowspan="2">
<table id="table33" style="BORDER-COLLAPSE: collapse" bordercolor="Orange" cellspacing="0" cellpadding="2" width="310" bgcolor="#ffffff" border="1">
<tr>
<td align="left" width="247" bgcolor="Orange">
<B>相片上传：</B>
</td>

<td align="right" bgcolor="Orange">
<a href=# onclick="closeLayer('flyoutForm')"><img src="close.gif" alt="关闭" width="12" height="12" border="0" align="right"></a>
</td>
</tr>
            <tr><td colspan="2" width=747>
            <!--up start-->
              <TABLE cellSpacing=0 cellPadding=0 width="280" border=0>
            <form action="upimage.asp" method="post" enctype="multipart/form-data" name="formUP" onsubmit="return mysub()">     
              <TBODY>
              <TR>
                <TD vAlign=top width=276 bgColor=#ffffff 
                height=18>
                
            
                  <p>选择图片：<input name="map" type="file" class="buttonface" id="map" size="20"></p>
                  图片名称：<input name="mapname" type="text" class="buttonface" id="mapname" size="20" maxlength="50">　*必填
                  <p>图片分类： <select name="mapfl" id="mapfl">   
                      <% for i=0 to LenOfArraydir   
	product_namexh=trim(MyString(i))   
	MyString2 = Split(product_namexh, "`", -1, 1)   
	product_no=MyString2(0)   
	xh=MyString2(1)   
	   
	 %>   
	 <%if xh=now_dir   then%>   
                      <option selected value="<%=xh%>"><%=product_no%></option>   
	 <% else %>   
                      <option  value="<%=xh%>"><%=product_no%></option>   
	 <% end if%>   
					  <% next %>   
                    </select>    
                       
                    <input type=button name=Submit value=管理分类 class="buttonface" onClick="InsertFlash();return false;">   
                       
                  &nbsp;</p>
                  说明：<textarea name="shuoming" cols="22" rows="5" id="shuoming"></textarea>　<br><br>
                  　　　　
                  <input name="Submit2" type="submit" class="buttonface" id="Submit2" value="确定">　　　　
                  <input name="Submit2" type="button" class="buttonface" onclick="closeLayer('flyoutForm')" value="取消"><br><br>
                 
                  
                </TD>
              </TR>
              
              </TBODY></form>
              </TABLE>
            
            
            <!--up end-->
            </td></tr>
            
</table>
</td>
<td width="3" height="5"></td>
</tr>
<tr>
<td width="3" bgcolor="#cccccc" height="181">　</td>
</tr>
<tr>
<td width="3" height="5">
<img height="1" src width="1"></td>
<td width="305" bgcolor="#cccccc" height="5">
<img height="1" src width="1"></td>
<td width="3" bgcolor="#cccccc" height="5">
<img height="1" src width="1"></td>
</tr>
</table>
</div>
<!--UP END-->

 
 
 
<div id="esave" style="filter:alpha(opacity=80); position:absolute; top:160; left:40; z-index:10; visibility:hidden"><TABLE WIDTH=90% BORDER=0 CELLSPACING=0 CELLPADDING=0 align="center"><TR><td width=40%></td>
	<TD bgcolor=#104A7B width="15%"> 
	<TABLE WIDTH=100% height=22 BORDER=0 CELLSPACING=2 CELLPADDING=0>
	<TR> 
	<td bgcolor=#eeeeee align=center>正在上传中,请稍候...</td>
	</tr>
	</table>
	</td>
	<td width=40%> </td>
	</tr></table></div>
	
	 
</BODY></HTML>