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

📄 local.asp

📁 中国创网同学录1.02
💻 ASP
📖 第 1 页 / 共 2 页
字号:
<%@ Language=VBScript %>
<!--#include file=globals.asp -->
<script language="javascript">

function selecttype(curid,provinceid,areaid){


                window.location.href="local.asp?schooltypeid="+curid+"&provinceid="+provinceid+"&areaid="+areaid

    }
function selectarea(curid,provinceid,schooltypeid){


                window.location.href="local.asp?areaid="+curid+"&provinceid="+provinceid+"&schooltypeid="+schooltypeid

    }

</script>
<%
provinceid=trim(request("provinceid"))
schooltypeid=trim(request("schooltypeid"))
areaid=trim(request("areaid"))
set rs = createobject("ADODB.recordset")
set rss = createobject("ADODB.recordset")
if schooltypeid="" or schooltypeid="0" then
   if areaid="" or areaid="0" then
      temp=""
   else
      temp=" and areaid='"&areaid&"'"
   end if
else
   if areaid="" or areaid="0" then
      temp=" and schooltypeid="&clng(schooltypeid)
   else
      temp=" and areaid='"&areaid&"' and  schooltypeid="&clng(schooltypeid)
   end if
end if
if schooltypeid="" then
   schooltypeid=0
end if
if areaid="" then
   areaid=0
end if
sql="select * from province where provinceid='"&provinceid&"'"
rs.open SQL,schooldb
if not rs.eof then
   provincename=rs("provincename")
end if
rs.close
%>
<html>
<head>
<title>中国 创网-校友录-学校列表</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="keywords" content="同学、同学录、校友、老师、学校、班级、交流">
<STYLE type=text/css>
</STYLE>
<LINK href="scss.css" rel=stylesheet>
</head>

<body bgcolor="#FFFFFF" text="#000000" topmargin="5"><CENTER>
<!--#include file=top2.htm-->

<div align="center">
  <center>
    <table border="0" cellpadding="0" cellspacing="0" width="760" align="center">
      <!-- fwtable fwsrc="Untitled" fwbase="classlist.gif" fwstyle="Dreamweaver" fwdocid = "742308039" fwnested="0" -->
      <tr> 
        <td><img src="spacer.gif" width="7" height="1" border="0"></td>
        <td><img src="spacer.gif" width="121" height="1" border="0"></td>
        <td><img src="spacer.gif" width="5" height="1" border="0"></td>
        <td><img src="spacer.gif" width="15" height="1" border="0"></td>
        <td><img src="spacer.gif" width="9" height="1" border="0"></td>
        <td><img src="spacer.gif" width="7" height="1" border="0"></td>
        <td><img src="spacer.gif" width="105" height="1" border="0"></td>
        <td><img src="spacer.gif" width="255" height="1" border="0"></td>
        <td><img src="spacer.gif" width="101" height="1" border="0"></td>
        <td><img src="spacer.gif" width="100" height="1" border="0"></td>
        <td><img src="spacer.gif" width="28" height="1" border="0"></td>
        <td><img src="spacer.gif" width="7" height="1" border="0"></td>
        <td><img src="spacer.gif" width="1" height="1" border="0"></td>
      </tr>
      <tr> 
        <td colspan="3"><img name="classlist_r1_c1" src="img/classlist_r1_c1.gif" width="133" height="45" border="0"></td>
        <td><img name="classlist_r1_c4" src="img/classlist_r1_c4.gif" width="15" height="45" border="0"></td>
        <td colspan="2" background="img/classlist_r1_c5.gif">&nbsp;</td>
        <td colspan="3" background="img/classlist_r1_c5.gif">&nbsp;</td>
        <td colspan="3"><img name="classlist_r1_c10" src="img/classlist_r1_c10.gif" width="135" height="45" border="0"></td>
        <td><img src="spacer.gif" width="1" height="45" border="0"></td>
      </tr>
      <tr> 
        <td rowspan="7" background="img/classlist_r2_c1.gif">&nbsp;</td>
        <td rowspan="7" valign="top">&nbsp;</td>
        
      <td rowspan="7" background="img/classlist_r2_c3.gif">&nbsp;</td>
        
      <td colspan="8" bgcolor="#FFFFCC"><a href="/alumni/">中国 创网-校友录</a>&gt;&gt;&gt;<a href="schoollist.asp">学校列表</a>&gt;&gt;&gt;<font color="red"><%=provincename%></font>注册学校列表 
        <%
            sql="select count(*) as a from schoolinfo where schoolid like '"&provinceid&"%'"
            rs.open SQL,schooldb,1,3
            schoolcount=rs("a")
            rs.close
            %>
        ,共有<%=schoolcount%>所学校 </td>
        <td rowspan="8" background="img/classlist_r2_c12.gif">&nbsp;</td>
        <td><img src="spacer.gif" width="1" height="25" border="0"></td>
      </tr>
      <tr> 
        <td colspan="4"><img name="classlist_r3_c4" src="img/classlist_r3_c4.gif" width="136" height="35" border="0"></td>
        <td colspan="4" background="img/classlist_r3_c8.gif">&nbsp;</td>
        <td><img src="spacer.gif" width="1" height="35" border="0"></td>
      </tr>
      <tr> 
        <td colspan="4"><img name="classlist_r4_c4" src="img/classlist_r4_c4.gif" width="136" height="10" border="0"></td>
        <td colspan="3"><img name="classlist_r4_c8" src="img/classlist_r4_c8.gif" width="456" height="10" border="0"></td>
        <td rowspan="5">&nbsp;</td>
        <td><img src="spacer.gif" width="1" height="10" border="0"></td>
      </tr>
      <tr> 
        <td rowspan="4" colspan="2">&nbsp;</td>
        
      <td colspan="5" rowspan="2" valign="top"> 
        <div align="center">
            <center>
              <table width="100%" border="0" cellspacing="1" bordercolor="#000000">
                <tr> 
                  
                <td bgcolor="#F6F6F6" align="center" valign="top" width="324"> 
                  <br>
                    <table width="555" border="0" cellspacing="1" bgcolor="#5B5B5B">
                      <tr> 
                        <td class="topic" align="center" height="36" bgcolor="#CCCCCC"> 
                          <font color="#000000">分类查看 &gt;&gt; 学校类型: </font> 
                          <select name="select" onChange="javascript:selecttype(this.options[selectedIndex].value,'<%=cstr(provinceid)%>','<%=areaid%>');">
                            <option>请选择</option>
                            <%
              sql="select * from schooltype order by schooltypeid"
              rs.open SQL,schooldb
              while not rs.eof
              selected1=""
              if cint(schooltypeid)=cint(rs("schooltypeid")) then
                 selected1="selected"
              end if
              %>
                            <option <%=selected1%> value=<%=rs("schooltypeid")%>><%=rs("schooltypename")%></option>
                            <%
               rs.movenext
               wend
               rs.close
              %>
                          </select>
                          <font color="#000000"> &nbsp;&nbsp;学校所在地区: </font> 
                          <select name="select2" onChange="javascript:selectarea(this.options[selectedIndex].value,'<%=cstr(provinceid)%>',<%=schooltypeid%>);">
                            <option>请选择</option>
                            <%
             sql="select * from areainfo where provinceid='"&provinceid&"' order by seed "
             rs.open SQL,schooldb
             while not rs.eof

⌨️ 快捷键说明

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