📄 adinfo2.asp
字号:
<!--#include file="conn.asp"-->
<!--#include file="adminset.asp"-->
<%if session("admin")="" then
response.Write "<script language='javascript'>alert('网络超时或您还没有登陆！');window.location.href='login.asp';</script>"
response.End
end if
if session("flag")>1 then
response.Write "<div align=center><font size=80 color=red><b>您没有此项目管理权限！</b></font></div>"
response.End
end if
if qx12<>1 then
response.Write "<div align=center><font size=80 color=red><b>您没有此项目管理权限！</b></font></div>"
response.End
end if
%>
<html>
<head>
<title>Untitled Document</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="../css.css" rel="stylesheet" type="text/css">
<style type="text/css">
<!--
.style2 { color: #000000;
font-weight: bold;
}
body {
margin-left: 0px;
margin-top: 0px;
margin-right: 0px;
margin-bottom: 0px;
}
-->
</style>
</head>
<body>
<table width="100%" border="0" cellpadding="0" cellspacing="0" background="images/right_top2.gif">
<tr>
<td width="1%"> </td>
<td width="99%"><table width="100%" border="0" cellspacing="0" cellpadding="5">
<tr>
<td width="30%" style="font-size:14px;color:#ffffff"> <span class="style2">添加供求信息</span></td>
<td width="70%" align="right"> </td>
</tr>
</table></td>
</tr>
</table>
<form method="POST" action="saveinfo1.asp?action=save">
<p>
<%
id=request("id")
set rs=server.CreateObject("adodb.recordset")
rs.open "select * from [shop_infomsg] where id="&id&" ",conn,1,1
%>
</p>
<p> </p>
<table width="90%" border="0" align="center" cellpadding="3" cellspacing="1" bgcolor="#9DB2D4">
<tr bgcolor="#F0F3F8">
<td>选择分类：</td>
<td>
<select name="kin" size="1" class="wenbenkuang" id="kin">
<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>
选择供求：
<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 bgcolor="#F0F3F8">
<td width="16%">主题：</td>
<td width="84%">
<input name="tit" type="text" class="wenbenkuang" id="tit" value="<%=trim(rs("tit"))%>" size="44" maxlength="40">
* </td>
</tr>
<tr bgcolor="#F0F3F8">
<td width="16%">电子邮件：</td>
<td width="84%">
<input name="mal" type="text" class="wenbenkuang" id="mal" value="<%=trim(rs("mal"))%>" size="44" maxlength="30">
* </td>
</tr>
<tr bgcolor="#F0F3F8">
<td width="16%">联系人：</td>
<td width="84%">
<input name="lxr" type="text" class="wenbenkuang" id="lxr" value="<%=trim(rs("lxr"))%>" size="20" maxlength="30">
<input name=userid type=hidden value="<%=trim(rs("userid"))%>" >
<input name=id type=hidden value="<%=trim(rs("id"))%>" >
* </td>
</tr>
<tr bgcolor="#F0F3F8">
<td>联系电话：</td>
<td width="84%"><input name="tel" type="text" class="wenbenkuang" id="tel" value="<%=trim(rs("tel"))%>" size="19"maxlength="30">
*</td>
</tr>
<tr bgcolor="#F0F3F8">
<td width="16%">联系QQ：</td>
<td width="84%">
<input name="qq" type="text" class="wenbenkuang" id="qq" value="<%=trim(rs("qq"))%>" size="14"maxlength="30"> </td>
</tr>
<tr bgcolor="#F0F3F8">
<td>价格：</td>
<td width="84%"><input name="jg" type="text" class="wenbenkuang" id="jg" value="<%=trim(rs("jg"))%>" size="14"maxlength="30">
元 *</td>
</tr>
<tr bgcolor="#F0F3F8">
<td width="16%">相关地址：</td>
<td width="84%" height="11"> http://
<input name="ysh" type="text" class="wenbenkuang" id="ysh" value="<%=trim(rs("ysh"))%>" size="30" maxlength="30">
*</td>
</tr>
<tr bgcolor="#F0F3F8">
<td width="16%" valign="top">内容：</td>
<td width="84%" valign="middle">
<textarea name="msg" cols="80" rows="6" class="wenbenkuang" id="msg"><%=trim(rs("msg"))%></textarea> </td>
</tr>
<tr bgcolor="#F0F3F8">
<td width="16%">所在地区：</td>
<td width="84%">
<select name="whe" size="1" class="wenbenkuang" id="whe" 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>
有效期限：
<select name="edt" size="1" class="wenbenkuang" id="edt">
<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 bgcolor="#F0F3F8">
<td></td>
<td></td>
</tr>
<tr bgcolor="#F0F3F8">
<td width="16%" align="center" bgcolor="#F0F3F8"> </td>
<td width="84%" bgcolor="#F0F3F8">
<input type="submit" value="马上发布" name="B1">
<input type="reset" value="全部重填" name="B2" class="go-wenbenkuang">
</td>
</tr>
</table>
</form>
<br>
<!--#include file="copyright.asp"-->
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -