shop_edit.asp

本源代码为大学生购物网的源代码,欢迎大家的下载,学习与交流

<TABLE cellSpacing=0 cellPadding=0 width=760 align=center border=0 class=page>
  <TBODY>
    <TR> <td><!--#include file="top.asp"-->
<!--#include file="inc/UserChk.asp"-->
<!--#include file="inc/msgbox.asp"-->
<!--#include file="inc/formchk.asp"-->
<!--#include file="Inc/shopselect.asp"-->
<!--#include file="Inc/getShopzu.asp"-->
<%
IF Trim(Request("Submit"))<>Empty Then
  Dim shop_name,shop_content,shop_address,shop_phone,zu
  shop_name=encodestr(request.Form("shop_name"))
 shop_address=encodestr(request.Form("shop_address"))
 shop_phone=encodestr(request.Form("shop_phone"))
  shop_content=HtmlEncode2(encodestr(request.Form("shop_content")))  
zu=encodestr(request.Form("zu"))
  set rs=server.CreateObject("adodb.recordset")
  strsql="select * from [user_info] where user_id="&session("user_id")&""
  rs.open strsql,conn,1,3  
  rs("shop_name")=shop_name
  rs("shop_address")=shop_address
  rs("shop_phone")=shop_phone
  rs("shop_content")=shop_content
  rs("zu")=zu
  rs.update
  rs.close
  set rs=nothing
  conn.close
  set conn=nothing
  call msgbox("修改成功","GoUrl","Shop_Edit.asp")
  response.End()
End IF

Dim StrSql,Rs
Set Rs=Server.CreateObject("adodb.recordset")
strsql="select * from [user_info] where user_id="&session("user_id")&""
rs.open strsql,conn,1,1
%>
<TABLE width=760 border=0 align=center cellSpacing=0 cellPadding=0>
  <TBODY>
    <TR> <td width=176 valign=top>
                          <!--#include file="center.asp"--></td>
      <td bgcolor="#dfdfdf" width="1"></td>
      <TD align="center" vAlign=top>
        <TABLE cellSpacing=0 cellPadding=0 width="550" border=0 class=page>
          <TBODY>
            <TR> 
              <TD><form name="form1" method="post" action="">
                  <table width="98%" border="0" align="center">
               
                <tr> 
                      <td width="98%" colspan="2"><img border="0" src="images/news.gif" width="15" height="15"> 店铺修改</td>
                    </tr>   
                
     <tr> 
                      <td align="right" width="16%">店铺名称：</td>
                      <td width="82%">
						<input name="shop_name" type="text" id="shop_name" size="30" maxlength="30" value="<%=rs("shop_name")%>"> 
                        <font color="#FF0000">* </font>不超过30个字符</td>
                    </tr>
               
                
                
  
                                  <tr> 
                      <td align="right" width="16%">店铺类别：</td>
                      <td width="82%">
						<select name="zu" id="zu">
		
			  <option value="<%=Rs("zu")%>" selected><%=GetshopZu(Rs("zu"))%></option>
  <%=ShopSelect()%>

          </select>&nbsp;<font color="#FF0000">* </font>请选择店铺类别</td>
                    </tr>
                    <tr> 
                      <td align="right" width="16%">店铺描述：</td>
                      <td width="82%">
						<textarea name="shop_content" cols="48"  rows="7" id="textarea"><%=rs("shop_content")%></textarea> 
                        <font color="#FF0000">*</font>不超过255个字符</td>
                    </tr>
                    <tr> 
                      <td align="right" width="16%" height="40">店铺地址：</td>
                      <td width="82%" height="40">
						<input name="shop_address" value="<%=rs("shop_address")%>" type="text" id="shop_address" size="40" maxlength="30"> 
                        <font color="#FF0000">*</font> 请写上你的宿舍楼和寝室号码</td>
                    </tr>
                    <tr> 
                      <td align="right" width="16%">联系电话：</td>
                      <td width="82%">
						<input name="shop_phone" type="text" id="shop_phone" size="30" value="<%=rs("shop_phone")%>"> 
                        <font color="#FF0000">*</font>多个请用，分开</td>
                    </tr>
    <tr> 
                      <td align="right" width="16%"></td>
                      <td width="82%"><input type="submit" name="Submit" class=input value="提交"></td>
                    </tr>


        
                  </table>
                </form></TD>
            </TR>
          </TBODY>
        </TABLE>
      </TD>
    </TR>
  </TBODY>
</TABLE>
<!--#include file="bottom.asp"-->
</TD>
    </TR>
  </TBODY>
</TABLE>
<%
conn.Close
Set conn=Nothing
%>