editad.asp

一个综合类整站

       } 
    }            
              </script>
      <select name="city_one" size="1" id="select2" >
    <option value="<%=rs("city_oneid")%>" selected><%=rs("city_one")%></option>
   </select>
      <select name="city_two" id="city_two" onChange="changelocation4(document.postart.city_two.options[document.postart.city_two.selectedIndex].value,document.postart.city_one.options[document.postart.city_one.selectedIndex].value)">
    <option value="" selected>选择城市</option>
	<%if session("twoid")<>0 then
	set rsi=conn.execute("select * from china_city where id="&session("oneid")&" and twoid="&session("twoid")&" and threeid=0")
  %><option value="<%=rsi("twoid")%>" <%if rsi("twoid")=rs("city_twoid") then%>selected<%end if%>><%=rsi("city")%></option>
<%rsi.close
set rsi = nothing
else
set rsi=conn.execute("select * from china_city where id="&session("oneid")&" and twoid>0 and threeid=0")
if rsi.eof or rsi.bof then
response.write "<option value=''>没有分类</option>"
else
do until rsi.eof%>
  <option value="<%=rsi("twoid")%>" <%if rsi("twoid")=rs("city_twoid") then%>selected<%end if%>><%=rsi("city")%></option>
 <%rsi.movenext
    loop
	%>
	<%end if
rsi.close
set rsi = nothing
end if
%>
	
	</select>
	     <select name="city_three" id="city_three">
		 <option value="" selected>选择城市</option>
		     <%if session("threeid")<>0 then
	set rsi=conn.execute("select * from china_city where id="&session("oneid")&" and twoid="&session("twoid")&" and threeid="&session("threeid")&"")
response.write "<option value='"&rsi("threeid")&"'>"&rsi("city")&"</option>"
rsi.close
set rsi = nothing
else
set rsi=conn.execute("select * from china_city where id="&session("oneid")&" and twoid="&rs("city_twoid")&" and threeid<>0")
if rsi.eof or rsi.bof then
response.write "<option value=''>没有分类</option>"
else
do until rsi.eof%>
<option value="<%=rsi("threeid")%>" <%if rsi("threeid")=rs("city_threeid") then%>selected<%end if%>><%=rsi("city")%></option>
   <% rsi.movenext
    loop
	%>
<%end if
end if
%>
    </select>
                <font color="#FF0000">*</font> </td>
            </tr>
            <tr> 
              <td width="27%" height="26" align="right" bgcolor="#FFFFFF">信息类别：</td>
              <td height="26" colspan="2" bgcolor="#FFFFFF"> 
                <%
set rsi=conn.execute("select * from china_type where id>0 and twoid>0 and threeid=0")
%>
      <script language = "JavaScript">
var onecount2;
onecount2=0;
subcat2 = new Array();
        <%
		dim count2:count2 = 0
        do while not rsi.eof 
        %>
subcat2[<%=count2%>] = new Array("<%=rsi("name")%>","<%=rsi("id")%>","<%=rsi("twoid")%>");
        <%
        count2 = count2 + 1
        rsi.movenext
        loop
        rsi.close
		set rsi = nothing
        %>
onecount2=<%=count2%>;
</script>

<%
set rsi=conn.execute("select * from china_type where id>0 and twoid>0 and threeid>0")
%>
 <script language = "JavaScript">
var onecount3;
onecount3=0;
subcat3 = new Array();
        <%
		dim count3:count3 = 0
        do while not rsi.eof 
        %>
subcat3[<%=count3%>] = new Array("<%=rsi("name")%>","<%=rsi("id")%>","<%=rsi("twoid")%>","<%=rsi("threeid")%>");
        <%
        count3 = count3 + 1
        rsi.movenext
        loop
        rsi.close
		set rsi = nothing
        %>
onecount3=<%=count3%>;



function changelocation2(locationid)
    {
    document.postart.type_two.length = 0; 
    document.postart.type_two.options[0] = new Option('选择信息','');
	document.postart.type_three.length = 0; 
    document.postart.type_three.options[0] = new Option('选择信息','');
    var locationid=locationid;
	var i;
    for (i=0;i < onecount2; i++)
        {
            if (subcat2[i][1] == locationid)
            { 
                document.postart.type_two.options[document.postart.type_two.length] = new Option(subcat2[i][0], subcat2[i][2]);
            }        
        }
       
    }    
     function changelocation3(locationid,locationid1)
    {
    document.postart.type_three.length = 0; 
    document.postart.type_three.options[0] = new Option('选择信息','');
    var locationid=locationid;
	 var locationid1=locationid1;
    var i;
    for (i=0;i < onecount3; i++)
        {
            if (subcat3[i][2] == locationid)
            { 
			if (subcat3[i][1] == locationid1)
			{
                document.postart.type_three.options[document.postart.type_three.length] = new Option(subcat3[i][0], subcat3[i][3]);
            }        
        }
       } 
    }            
	 </script>
      <select name="type_one" size="1" id="select3" onChange="changelocation2(document.postart.type_one.options[document.postart.type_one.selectedIndex].value)">
        
		<option value="" selected>选择信息</option>
        <%set rsi=conn.execute("select * from china_type where id>0 and twoid=0")
if rsi.eof and rsi.bof then
response.write "<option value=''>没有分类</option>"
else
do until rsi.eof%>
 <option value="<%=rsi("id")%>" <%if rsi("id")=rs("type_oneid") then%>selected<%end if%>><%=rsi("name")%></option>
   <% rsi.movenext
    loop
	end if
rsi.close
set rsi= nothing
%>
      </select>
      <select name="type_two" id="select4" onChange="changelocation3(document.postart.type_two.options[document.postart.type_two.selectedIndex].value,document.postart.type_one.options[document.postart.type_one.selectedIndex].value)">
        		<option value="" selected>选择信息</option>
				  <%set rsi=conn.execute("select * from china_type where id="&toneid&" and twoid>0 and threeid=0")
if rsi.eof or rsi.bof then
response.write "<option value=''>没有分类</option>"
else
do until rsi.eof%>
 <option value="<%=rsi("twoid")%>" <%if rsi("twoid")=rs("type_twoid") then%>selected<%end if%>><%=rsi("name")%></option>
   <% rsi.movenext
    loop
	end if
rsi.close
set rsi= nothing

%>    </select>
	<select name="type_three" id="select5">
        <option value="" selected>选择信息</option>
		  <%set rsi=conn.execute("select * from china_type where id="&toneid&" and twoid="&rs("type_twoid")&" and threeid>0")
if rsi.eof and rsi.bof then
response.write "<option value=''>没有分类</option>"
else
do until rsi.eof%>
 <option value="<%=rsi("threeid")%>" <%if rsi("threeid")=rs("type_threeid") then%>selected<%end if%>><%=rsi("name")%></option>
   <% rsi.movenext
    loop
	end if
rsi.close
set rsi= nothing
conn.close
set conn= nothing
%>  
    </select>
              </td>
            </tr>
            <tr bgcolor="#FFFFFF"> 
              <td height="26" align="right">信息形式：</td>
              <td height="26" colspan="2"> 
                <input type="radio" value="no" name="dispic" <%If cispic="no" Then%>checked<%End If%>>
                文字信息&nbsp; 
                <input type="radio" value="yes" name="dispic" <%If cispic="yes" Then%>checked<%End If%>>
                图片信息 <font color="#FF0000">（注：设置为</font><font color="#008080">图片信息</font><font color="#FF0000">将会在</font><font color="#008080">全部分类</font><font color="#FF0000">栏目以图片方式显示）</font></td>
            </tr>
            <tr bgcolor="#FFFFFF"> 
              <td height="26" align="right">图片路径：</td>
              <td height="26" colspan="2"> 
                <input type="text" name="dpic" size="30" value="<%=pic%>">
<iframe style="top:2px" ID="UploadFiles" src="../upload_Photo.asp?PhotoUrlID=0" frameborder=0 scrolling=no width="320" height="25"></iframe></td>
            </tr>
            <tr bgcolor="#FFFFFF"> 
              <td height="26" align="right" valign="top">信息内容：</td>
              <td colspan="2"> 
                <textarea rows="14" name="dtext" cols="60" onKeyDown="checkMaxInput(this.form)" onKeyUp="checkMaxInput(this.form)"><%if ctext<>"" then%><%=replace(ctext,"<br>",vbcrlf)%><%end if%>
      </textarea>
                <font color="#FF0000">*&nbsp;</font> <font color="#FF0000"><br>
                目前还可写 
                <input readonly type=text name=remLen size=4 maxlength=4 style="border: 1 solid #888888">
                个字！</font> </td>
            </tr>
            <tr bgcolor="#FFFFFF"> 
              <td height="26" align="right">联系人：</td>
              <td height="26" colspan="2"> 
                <input name="dusername" type="text" id="dusername" value="<%=cusername%>" size="20" maxlength="30">
                <font color="#FF0000">* </font></td>
            </tr>
            <tr bgcolor="#FFFFFF" <%if webcardid="0" then%>style="display:none"<%end if%>> 
              <td height="26" align="right">身份证号：</td>
              <td height="26" colspan="2"> 
                <input name="dcardid" type="text" id="dcardid" value="<%=ccardid%>" size="20" maxlength="18">
                <font color="#FF0000">* </font></td>
            </tr>
            <tr bgcolor="#FFFFFF"> 
              <td height="26" align="right">联系电话：</td>
              <td height="26" colspan="2"> 
                <input name="dtel" type="text" id="dtel" value="<%=ctel%>" size="20" maxlength="20">
                <font color="#FF0000">* </font></td>
            </tr>
            <tr bgcolor="#FFFFFF"> 
              <td height="26" align="right">生效日期：</td>
              <td height="26" colspan="2"> 
                <input name="time" size="15" maxlength="50" value="<%=ctime%>">
                <font color="#FF0000">（格式如：2004-10-1）</font></td>
            </tr>
            <tr bgcolor="#FFFFFF"> 
              <td height="26" align="right">有效期至：</td>
              <td height="26" colspan="2"> 
                <input name="dstop" size="15" maxlength="50" value="<%=cstop%>">
                <font color="#FF0000">（格式如：2004-10-1）</font></td>
            </tr>
            <tr bgcolor="#FFFFFF"> 
              <td height="26" align="right">是否固顶：</td>
              <td height="26" colspan="2"> 
                <input type="radio" value="0" name="dtop" <%if ctop="0" then%>checked<%end if%>>
                否&nbsp; 
                <input type="radio" value="1" name="dtop" <%if ctop="1" then%>checked<%end if%>>
                是 <font color="#FF0000">（注：设置为此属性将在排列在同栏目的首位显示，并同时显示在首页滚动</font><font color="#008080">左侧</font><font color="#FF0000">）</font></td>
            </tr>
            <tr bgcolor="#FFFFFF"> 
              <td height="26" align="right">是否首页显示：</td>
              <td height="26" colspan="2"> 
                <input type="radio" value="0" name="shouye" <%if cshouye="0" then%>checked<%end if%>>
                否&nbsp; 
                <input type="radio" value="1" name="shouye" <%if cshouye="1" then%>checked<%end if%>>
                是 <font color="#FF0000">（注：首页滚动</font><font color="#008080">右侧</font><font color="#FF0000">显示）</font></td>
            </tr>
            <tr bgcolor="#FFFFFF"> 
              <td height="26" align="right">是否图文信息：</td>
              <td height="26" colspan="2">
                <input type="radio" value="0" name="lift" <%if clift="0" then%>checked<%end if%>>
                否&nbsp; 
                <input type="radio" value="1" name="lift" <%if clift="1" then%>checked<%end if%>>
                是 <font color="#FF0000">（注：在首页右侧显示为图片及文字混合显示，如 旅游/餐饮/招生）</font></td>
            </tr>
            <tr bgcolor="#FFFFFF"> 
              <td height="26" align="right">热点分类信息：</td>
              <td height="26" colspan="2"> 
                <input type="radio" value="0" name="hot" <%if chot="0" then%>checked<%end if%>>
                否&nbsp; 
                <input type="radio" value="1" name="hot" <%if chot="1" then%>checked<%end if%>>
                是 <font color="#FF0000">（注：在首页＂热点分类信息＂处显示）</font></td>
            </tr>
            <tr bgcolor="#FFFFFF"> 
              <td height="26" align="right">竟价费用：</td>
              <td height="26" colspan="2"> 
                <input name="dmoney" size="15" maxlength="50" value="<%=cmoney%>">
                元 <font color="#FF0000">（注：金额越大，排列位置越靠前）</font> </td>
            </tr>
            <tr bgcolor="#FFFFFF"> 
              <td height="26" align="right">审核：</td>
              <td height="26" colspan="2"> 
                <input name="mark" type="radio" value="no" <%If cmark="no" Then%>checked<%End If%>>
                未审核 
                <input type="radio" name="mark" value="yes" <%If cmark="yes" Then%>checked<%End If%>>
                已审核</td>
            </tr>
            <tr bgcolor="#FFFFFF"> 
              <td height="30" align="right"> </td>
              <td height="30" colspan="2" align="right"> 
                <p align="left"> 
                  <input type="submit" value="修改" name="submit">
                  &nbsp; 
                  <input type="reset" value="取消" name="reset">
                  &nbsp; 
                  <input type="button" value="返回" name="back" onclick="javascript:history.back()">
              </td>
            </tr>
          </table>
      </form>
      <br>    </td>
  </tr>
</table>
</div>
 <br>                                                                                                                       
</body>
</html>