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

📄 addads_place.asp

📁 一个完全仿照阿里巴巴的网站管理系统 本软件没有版权问题
💻 ASP
字号:
<!--#include file=menu.asp -->
<table width="630" border="0" cellspacing="0" cellpadding="0" align="center">
<%if request("job")="" then%>
  <tr>
    <td height=20 align="center"><strong>选 择 类 别</strong></td>
  </tr>
  <tr>
    <td height=200 align="center"><form method="POST" action="Addads.asp">
<%set adsrs=server.createobject("adodb.recordset")
adssql="select * from SMT_price order by SMT_priceID"
adsrs.Open adssql,conn,1,1%>
<select name="price" size="1" onChange="window.open('Addads_place.asp?price='+this.options[this.selectedIndex].value,'_self')">
<option value="" <%if request("price")="" then%> selected<%end if%>>选择大类</option>
<%while not adsrs.EOF%>
<option<%if request("price")=adsrs("SMT_price") and request("price")<>"" then%> selected<%end if%> value="<%=adsrs("SMT_price")%>" name=price><%=adsrs("SMT_price")%></option>
<%adsrs.MoveNext
wend%>
</select>
<%if request("price")<>"" then%>
<select name="placeID" size="1">
<option value="" <%if request("placeID")="" then%> selected<%end if%>>选择小类</option>
<%set adsrs2=server.createobject("adodb.recordset")
adssql2="select * from SMT_place where SMT_price='"&request("price")&"' order by SMT_placeid"
adsrs2.open adssql2,conn,1,1
Do while not adsrs2.eof%>
<option<%if cstr(request("placeID"))=cstr(adsrs2("SMT_placeID")) and request("placeID")<>"" then%> selected<%end if%> value="<%=CStr(adsrs2("SMT_place"))%>" name=placeID><%=adsrs2("SMT_placename")%> (<%=adsrs2("SMT_jg")%>/<%=adsrs2("SMT_jgg")%>)</option>
<%adsrs2.MoveNext
Loop
adsrs2.close%>
<%else%><select name="placeID" size="1">
<option value="" selected>选择小类</option>
<%end if%>
</select>

<%if request("price")="" then%>
<input type="button" value=" 确 定 " name="cmdok" onClick="window.alert('请先选择广告种类!')">
<%else%>
<input type="submit" value=" 确 定 " name="cmdok">
<%end if
adsrs.close
set adsrs2=nothing
set adsrs=nothing%>
</form>
</td>
  </tr>
<%else%>
  <tr>
    <td height=200 align="center"><strong><font color=red>发 布 成 功</font></strong></td>
  </tr>
<%end if%>
</table>

⌨️ 快捷键说明

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