shop_img.asp

soft.studa.com大家一起加油啊,好痛苦啊,呵呵

<!--#include file="top.asp"-->
<% 
if session("user_id")="" then
response.write "<script language='javascript'>" & VbCRlf
response.write "alert('非法操作!');" & VbCrlf
response.write "history.go(-1);" & vbCrlf
response.write "</script>" & VbCRLF
else
set rs=server.createobject("adodb.recordset")
sql="select * from user_info where user_id="&session("user_id")&""
rs.open sql,conn,1,3
%>
<TABLE width=760 border=0 align=center cellpadding="4">
  <TBODY>
    <TR> 
      <TD vAlign=top  width=161><TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
          <TBODY>
            <TR> 
              <TD><IMG height=10 src="images/kuai01.gif" width=161></TD>
            </TR>
            <TR> 
              <TD> <TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
                  <TBODY>
                    <TR> 
                      <TD width=11 background=images/kuai04.gif>&nbsp;</TD>
                      <TD bgColor=#f8f8fa><table width="100%" border="0">
                          <tr> 
                            <td><IMG height=8 src="images/dot.gif" width=4> <a href="user.asp">店铺管理中心</a></td>
                          </tr>
                          <tr> 
                            <td><a href="user_edit.asp">&nbsp; 基本资料管理</a></td>
                          </tr>
                          <tr> 
                            <td><a href="shop_img.asp">&nbsp; 店铺图片管理</a></td>
                          </tr>
                          <tr> 
                            <td><a href="goods.asp">&nbsp; 商品管理</a></td>
                          </tr>
                          <tr> 
                            <td>&nbsp; <a href="help.asp" target="_blank">店铺帮助</a></td>
                          </tr>
                          <tr> 
                            <td>&nbsp; <a href="user_logout.asp">店长退出</a></td>
                          </tr>
                        </table></TD>
                      <TD width=11 background=images/kuai05.gif>&nbsp;</TD>
                    </TR>
                  </TBODY>
                </TABLE></TD>
            </TR>
            <TR> 
              <TD><IMG height=15 src="images/kuai02.gif" width=161></TD>
            </TR>
            <TR> 
              <TD> <TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
                  <TBODY>
                    <TR> 
                      <TD width=11 background=images/kuai04.gif>&nbsp;</TD>
                      <TD bgColor=#f8f8fa><table width="100%" border="0">
                          <tr> 
                            <td><IMG height=8 src="images/dot.gif" width=4> <strong></strong>本站新闻</td>
                          </tr>
                          <tr> 
                            <td><table width="100%" border="0" style="border-collapse: collapse">
                                <% 
Set news= conn.execute("select * from news order by news_id desc" ) 
do while not news.eof
%>
                                <tr> 
                                  <td height=18 >·<a href="news_info.asp?news_id=<%=news("news_id")%>" target="_blank"><%=news("news_title")%></a></td>
                                  <% i=i+1 
if i>=6 then exit do 
news.movenext 
loop 
news.close 
set news=nothing 
%>
                                </tr>
                              </table></td>
                          </tr>
                        </table></TD>
                      <TD width=11 background=images/kuai05.gif>&nbsp;</TD>
                    </TR>
                </TABLE></TD>
            </TR>
            <TR> 
              <TD bgColor=#dbdbdb><IMG height=10 src="images/kuai03.gif" width=161></TD>
            </TR>
            <TR> 
              <TD height=5 bgColor=#dbdbdb><IMG height=5 
            src="images/kuai14.gif" width=161></TD>
            </TR>
        </TABLE></TD>
      <TD align="center" vAlign=top> <TABLE cellSpacing=0 cellPadding=0 width="570" border=0>
          <TBODY>
            <TR> 
              <TD width=11 height=11><IMG height=11 src="images/kuai06.gif" 
            width=11></TD>
              <TD background=images/kuai10.gif><IMG height=11 
            src="images/kuai10.gif" width=1></TD>
              <TD width=11 height=11><IMG height=11 src="images/kuai07.gif" 
      width=11></TD>
            </TR>
          </TBODY>
        </TABLE>
        <TABLE cellSpacing=0 cellPadding=0 width="570" border=0>
          <TBODY>
            <TR> 
              <TD width=8 background=images/kuai12.gif>&nbsp;</TD>
              <TD bgColor=#d3e1fd height=21> <TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
                  <TBODY>
                    <TR> 
                      <TD align=middle width=25><IMG height=15 
                  src="images/y1.gif" width=13></TD>
                      <TD>店铺图片管理</TD>
                      <TD width=90>&nbsp;</TD>
                    </TR>
                  </TBODY>
                </TABLE></TD>
              <TD width=8 background=images/kuai11.gif>&nbsp;</TD>
            </TR>
            <TR> 
              <TD width=8 background=images/kuai12.gif>&nbsp;</TD>
              <TD><form action="shop_img_save.asp" method="POST" enctype="multipart/form-data" name=form id="form">
                  <table width="100%" height="166" border="0">
                    <tr>
                      <td align="center">&nbsp;</td>
                      <td>&nbsp;</td>
                    </tr>
                    <tr> 
                      <td align="right">上传图片：</td>
                      <td> &nbsp; 
                        <input type="file" name="cimg" size="20" value="浏览"> 
                        &nbsp; <input type="submit" value="上传" name="B1"  isshowprocessbar="True" >
                        (gif或jpg格式，50K一下！)</td>
                    </tr>
                    <tr> 
                      <td align="right">现有图片预览： 
                        <%
Randomize '初始代随机数种子
num1=rnd() '产生随机数num1
num1=int(26*num1)+65 '修改num1的范围以使其是A-Z范围的Ascii码，以防表单名出错
session("antry")="test"&chr(num1) '产生随机字符串
%> <input name="temp" type="hidden" id="temp3" value="<%=session("antry")%>"></td>
                      <td align="center"> 
                        <%if rs("shop_img")<>"" then %>
                        <img src="<%=rs("shop_img")%>" width="160" height="120"> 
                        <%else
               response.write "您还没有上传店铺图片！"
              end if%> </td>
                    </tr>
                  </table>
                </form></TD>
              <TD width=8 background=images/kuai11.gif>&nbsp;</TD>
            </TR>
          </TBODY>
        </TABLE>
        <TABLE cellSpacing=0 cellPadding=0 width="570" border=0>
          <TBODY>
            <TR> 
              <TD width=11 height=11><IMG height=11 src="images/kuai08.gif" 
            width=11></TD>
              <TD background=images/kuai13.gif><IMG height=11 
            src="images/kuai10.gif" width=1></TD>
              <TD width=11 height=11><IMG height=11 src="images/kuai09.gif" 
            width=11></TD>
            </TR>
          </TBODY>
        </TABLE>
        <br> </TD>
    </TR>
  </TBODY>
</TABLE>
<%end if%>
<!--#include file="bottom.asp"-->