⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 mysave.asp

📁 购物系统(本版为正式商业版
💻 ASP
字号:
<!--
┌─9911.com.cn────────────┐
│  动感购物 WWW.9911.com.cn 版权所有  │
│  动感购物2005Vb  联系:web@snsn.net │
└───────────9911.com.cn──┘
-->
<!--#include file="../conn.asp"-->
<!--#include file="../webconfig.asp"-->
<!--#include file="../fuction.asp"-->
<%if info<>1 then
response.Write "<script language='javascript'>alert('对不起,页面调用错误!');history.go(-1);</script>"
response.End
end if
%>
<html>
<head>
<title><%=webname%>--供求信息</title>
<html>
<link rel="SHORTCUT ICON" href="/shortcut.ico">
<meta name="generator" content="snsn-shop">
<meta name=keywords content="<%=webgjz%>">
<meta name="description" content="<%=webmx%>">
<meta name="MSSmartTagsPreventParsing" content="TRUE">
<meta http-equiv="MSThemeCompatible" content="Yes">
<link href="/css.css" rel="stylesheet" type="text/css">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
</head>
<body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<!-- onMouseOver="window.status='【<%=webname%>】<%=weburl%> 如果您喜欢本站,别忘了把本站介绍给您的好友哦!:)';return true">-->
<!--#include file="../webtop.asp"-->
<table width="940" align="center" border="0" cellspacing="0" cellpadding="0">
  <tr>
    <td height="6" colspan="3"></td>
  </tr>
  <tr>
    <td width="17"><img src="/img/index_1.gif" width="15" height="16"></td>
    <td valign="bottom">您现在的位置是:<a href="<%=weburl%>"><%=webname%></a> -> <a href="index.asp">供求信息</a> -> <span class="b14">发布信息</span></td>
    <td valign="bottom"> </td>
  </tr>
  <tr>
    <td height="6" colspan="3"></td>
  </tr>
</table>
<table width="945" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
  <tr>
    <td width="200" valign="top"><!--#include file="info_left.asp"--> </td>
    <td  valign="top">
      <!--#include file="top.asp"-->
      <table width="520" border="0" align="center">
        <tr>
          <td>&nbsp;</td>
        </tr>
        <tr>
          <td width="100%">
            <p>&nbsp; </p>
            <form method="POST" action="save.asp?action=save">
              <%
					id=nosql(request("id"))
					if Not isChkInteger(request("id")) then
	%>
              <script language=javascript>
		alert("参数错误!");
		window.close();
	              </script>
              <%
	response.end
end if
set rs=server.CreateObject("adodb.recordset")
rs.open "select * from [shop_infomsg] where userid='"&checkFFSQLStr(session("username"))&"' and id="& id&" ",conn,1,1
%>
              <table width="650" border="0" align="center" cellpadding="1" cellspacing="2">
                <tr>
                  <td>选择分类:</td>
                  <td>
                    <select name="kin" size="1"  class="wenbenkuang" id="select">
                      <option value="xxx">请选择分类</option>
                      <%
set rs_s=server.createobject("adodb.recordset")
sql="select * From shop_infoid  order by infoid"
rs_s.open sql,conn,1,1
while not rs_s.eof
     if rs("kin")=rs_s("id") then
%>
                      <option value="<%=rs_s("id")%>" selected ><%=trim(rs_s("info"))%></option>
                      <%
     else
%>
                      <option value="<%=rs_s("id")%>" ><%=trim(rs_s("info"))%></option>
                      <%
     end if
    rs_s.movenext
wend
rs_s.close
set rs_s=nothing
%>
                    </select>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;选择供求:
              <input name="gq" type="radio" value="出售" <%if rs("gq")="出售" then%>checked<%else%><%end if%>>
              出售
              <input type="radio" name="gq" value="求购" <%if rs("gq")="求购" then%>checked<%else%><%end if%>>
              求购</td>
                </tr>
                <tr>
                  <td width="16%">主题:</td>
                  <td width="84%">
                    <input name="tit" type="text" class="wenbenkuang" id="tit2" value="<%=trim(rs("tit"))%>" size="44" maxlength="40">
              * </td>
                </tr>
                <tr>
                  <td width="16%">电子邮件:</td>
                  <td width="84%">
                    <input name="mal" type="text" class="wenbenkuang" id="mal2" value="<%=trim(rs("mal"))%>" size="44" maxlength="30">
              * </td>
                </tr>
                <tr>
                  <td width="16%">联系人:</td>
                  <td width="84%">
                    <input name="lxr" type="text" class="wenbenkuang" id="lxr2" value="<%=trim(rs("lxr"))%>" size="44" maxlength="30">
                    <input name=userid type=hidden value="<%=trim(rs("userid"))%>" >
                    <input name=id type=hidden value="<%=trim(rs("id"))%>" >
&nbsp;&nbsp;*&nbsp; </td>
                </tr>
                <tr>
                  <td>联系电话:</td>
                  <td width="84%"><input name="tel" type="text" class="wenbenkuang" id="tel2" value="<%=trim(rs("tel"))%>" size="44"maxlength="30">
              *</td>
                </tr>
                <tr>
                  <td width="16%">联系QQ:</td>
                  <td width="84%">
                    <input name="qq" type="text" class="wenbenkuang" id="qq2" value="<%=trim(rs("qq"))%>" size="44"maxlength="30">
                  </td>
                </tr>
                <tr>
                  <td>价格:</td>
                  <td width="84%"><input name="jg" type="text" class="wenbenkuang" id="jg2" value="<%=trim(rs("jg"))%>" size="44"maxlength="30">
              元 *</td>
                </tr>
                <tr>
                  <td width="16%">相关地址:</td>
                  <td width="84%" height="11"> http://
                      <input name="ysh" type="text" class="wenbenkuang" id="ysh" value="<%=trim(rs("ysh"))%>" size="36" maxlength="30">
              *</td>
                </tr>
                <tr>
                  <td width="16%" valign="top">内容:</td>
                  <td width="84%" valign="middle">
                    <textarea name="msg" cols="50" rows="6" class="wenbenkuang" id="textarea"><%=trim(rs("msg"))%></textarea>
                  </td>
                </tr>
                <tr>
                  <td width="16%">所在地区:</td>
                  <td width="84%">
                    <select name="whe" size="1"  class="wenbenkuang" id="select2" onChange=chsel()>
                      <option value="xxx" selected>请选择省份……</option>
                      <%
set rs_s=server.createobject("adodb.recordset")
sql="select * From shop_szSheng  order by shengorder"
rs_s.open sql,conn,1,1
while not rs_s.eof
%>
                      <option value="<%=rs_s("ShengName")%>" <%if rs("whe")=rs_s("ShengName") then%>selected<%else%><%end if%>><%=trim(rs_s("ShengName"))%></option>
                      <%
    rs_s.movenext
wend
rs_s.close
set rs_s=nothing
%>
                    </select>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 有效期限:
              <select  name="edt" size="1" class="wenbenkuang" id="select3">
                <option value="一天" <%if rs("edt")="一天" then%>selected<%else%><%end if%>>一天</option>
                <option value="二天" <%if rs("edt")="二天" then%>selected<%else%><%end if%>>二天</option>
                <option value="三天" <%if rs("edt")="三天" then%>selected<%else%><%end if%>>三天</option>
                <option value="四天" <%if rs("edt")="四天" then%>selected<%else%><%end if%>>四天</option>
                <option value="五天" <%if rs("edt")="五天" then%>selected<%else%><%end if%>>五天</option>
                <option value="六天" <%if rs("edt")="六天" then%>selected<%else%><%end if%>>六天</option>
                <option value="一个星期" <%if rs("edt")="一个星期" then%>selected<%else%><%end if%>>一个星期</option>
                <option value="半个月" <%if rs("edt")="半个月" then%>selected<%else%><%end if%>>半个月</option>
                <option value="一个月" <%if rs("edt")="一个月" then%>selected<%else%><%end if%>>一个月</option>
                <option value="二个月" <%if rs("edt")="二个月" then%>selected<%else%><%end if%>>二个月</option>
                <option value="一个季度" <%if rs("edt")="一个季度" then%>selected<%else%><%end if%>>一个季度</option>
                <option value="半年" <%if rs("edt")="半年" then%>selected<%else%><%end if%>>半年</option>
                <option value="一年" <%if rs("edt")="一年" then%>selected<%else%><%end if%>>一年</option>
                <option value="无期" <%if rs("edt")="无期" then%>selected<%else%><%end if%>>无期</option>
              </select>
                  </td>
                </tr>
                <tr>
                  <td></td>
                  <td></td>
                </tr>
                <tr>
                  <td width="16%" align="center" height="54">&nbsp;</td>
                  <td width="84%" height="54">
                    <input type="submit" value="马上发布" name="B1" class="go-wenbenkuang">
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
              <input type="reset" value="全部重填" name="B2" class="go-wenbenkuang">
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;</td>
                </tr>
              </table>
            </form>
            <p></p></td>
        </tr>
      </table></td>
  </tr>
</table>
<!--#include file="../copyright.asp"-->
</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -