<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="conn.asp" -->
<!--#include file="config.asp" -->
<!--#include file="syscode.asp" -->
<%
set rs=conn.execute("select *  from about where id=2")
content=rs("content")
rs.close
set rs=nothing
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>西安西科职业技术学院-专业介绍</title>
<!--关键字修改 config.asp 就可以了-->
<meta name="keywords" content="<%=key%>">
<meta name="description" content="<%=descrip%>">
<link href="style.css" rel="stylesheet" type="text/css">
<style type="text/css">
<!--
.STYLE1 {color: #990000}
-->
</style>
</head>
<body>
<!--#include file="top.asp" -->
<table width="950" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td width="235" valign="top"><table width="100%" border="0" cellspacing="0" cellpadding="0">
      <tr>
        <td height="34" background="images/left.jpg"><table width="100%" border="0" cellspacing="0" cellpadding="0">
            <tr>
              <td width="10%" align="right"><img src="images/arrow.gif" width="9" height="9"></td>
              <td width="27%">&nbsp;<span class="baifont">学院概况</span></td>
              <td width="47%">&nbsp;</td>
              <td width="16%">&nbsp;</td>
            </tr>
        </table></td>
      </tr>
      <tr>
        <td height="100" valign="top"><table width="232" border="0" align="right" cellpadding="0" cellspacing="0" background="images/abbg.jpg">
            <tr>
              <td width="230" height="100" valign="top"><table width="223" border="0" align="center" cellpadding="0" cellspacing="0">
                  <tr>
                    <td width="111" height="28" align="center"><img src="images/t1.gif" width="8" height="13" align="absmiddle"> <a href="about.asp">学院简介</a></td>
                    <td width="112" align="center"><img src="images/t1.gif" width="8" height="13" align="absmiddle"> <a href="huanjing.asp">校园风貌</a></td>
                  </tr>
                  <tr>
                    <td height="28" align="center"><img src="images/t1.gif" width="8" height="13" align="absmiddle"> <a href="shizi.asp">师资力量</a></td>
                    <td align="center"><img src="images/t1.gif" width="8" height="13" align="absmiddle"> <a href="youshi.asp">办学优势</a></td>
                  </tr>
                  <tr>
                    <td height="28" align="center"><img src="images/t1.gif" width="8" height="13" align="absmiddle"> <a href="guanli.asp">学院管理</a></td>
                    <td align="center"><img src="images/t1.gif" width="8" height="13" align="absmiddle"> <a href="linian.asp">办学理念</a></td>
                  </tr>
                  <tr>
                    <td height="28" colspan="2" align="center">&nbsp;</td>
                  </tr>
              </table></td>
            </tr>
        </table></td>
      </tr>
    </table>
    <table width="100%" height="5" border="0" cellpadding="0" cellspacing="0">
  <tr>
    <td ></td>
  </tr>
</table>

	<table width="100%" border="0" cellspacing="0" cellpadding="0">
        <tr>
          <td height="34" background="images/left1.jpg"><table width="100%" border="0" cellspacing="0" cellpadding="0">
            <tr>
              <td width="10%" align="right"><img src="images/arrow.gif" width="9" height="9"></td>
              <td width="27%">&nbsp;<span class="baifont">招生动态</span></td>
              <td width="47%">&nbsp;</td>
              <td width="16%"><a href="newslist.asp?cls=招生动态"><img src="images/more.gif" width="27" height="18" border="0"></a></td>
            </tr>
          </table></td>
        </tr>
        <tr>
          <td height="148" valign="top" background="images/left3bg.jpg" bgcolor="#CEE9FE"><table width="97%" border="0" align="center" cellpadding="0" cellspacing="0">
            <tr>
              <td><%
				dim sql
	sql="select top 6 * from news where smallclassname='招生动态'order by ord desc,id desc"
	set rs = conn.execute(sql)
	if rs.bof and rs.eof then
		response.write("<table ><tr><td>暂无记录</td></tr></table>")
	else
	%>
                  <table width="100%" border="0" cellspacing="0" cellpadding="0">
                    <%
	while not rs.eof
		if len(rs("title"))>11 then
		stitle=left(rs("title"),11)&"..."
	else
		stitle=rs("title")
	end if
	i=i+1
	%>
                    <tr >
                      <td width="19" align="center"><img src="images/PLUS.GIF" width="15" height="15"></td>
                      <td width="150" height="22"><a href="shownews.asp?id=<%=rs("id")%>" target="_blank" title="<%=rs("title")%>"><%=stitle%></a></td>
                      <td width="54"  ><%=rs("addtime")%></td>
                    </tr>
                    <%
	rs.movenext
	wend
	%>
                  </table>
                <%
	rs.close
	set rs=nothing
	end if
%>
              </td>
            </tr>
          </table></td>
        </tr>
      </table>
	<table width="100%" height="5" border="0" cellpadding="0" cellspacing="0">
      <tr>
        <td ></td>
      </tr>
    </table>
	<table width="100%" border="0" cellspacing="0" cellpadding="0">
      <tr>
        <td height="34" background="images/left1.jpg"><table width="100%" border="0" cellspacing="0" cellpadding="0">
            <tr>
              <td width="10%" align="right"><img src="images/arrow.gif" width="9" height="9"></td>
              <td width="27%">&nbsp;<span class="baifont">考生问答</span></td>
              <td width="47%">&nbsp;</td>
              <td width="16%"><a href="wenda.asp"><img src="images/more.gif" width="27" height="18" border="0"></a></td>
            </tr>
        </table></td>
      </tr>
      <tr>
        <td height="150" valign="top" background="images/left3bg.jpg" bgcolor="#CEE9FE"><table width="97%" border="0" align="center" cellpadding="0" cellspacing="0">
            <tr>
              <td><%
	sql="select top 6 * from news where smallclassname='问答'order by ord desc,id desc"
	set rs = conn.execute(sql)
	if rs.bof and rs.eof then
		response.write("<table ><tr><td>暂无记录</td></tr></table>")
	else
	%>
                  <table width="100%" border="0" cellspacing="0" cellpadding="0">
                    <%
	while not rs.eof
		if len(rs("title"))>11 then
		stitle=left(rs("title"),11)&"..."
	else
		stitle=rs("title")
	end if
	i=i+1
	%>
                    <tr >
                      <td width="19" align="center"><img src="images/wenhao.gif" width="10" height="12"></td>
                      <td width="150" height="22"><a href="showfaq.asp?id=<%=rs("id")%>" target="_blank" title="<%=rs("title")%>"><%=stitle%></a></td>
                      <td width="54"  ><%=rs("addtime")%></td>
                    </tr>
                    <%
	rs.movenext
	wend
	%>
                  </table>
                <%
	rs.close
	set rs=nothing
	end if
%>
              </td>
            </tr>
        </table></td>
      </tr>
    </table>
	<table width="100%" height="5" border="0" cellpadding="0" cellspacing="0">
      <tr>
        <td ></td>
      </tr>
    </table>	
	</td>
    <td valign="top"><table width="100%" border="0" cellspacing="0" cellpadding="0">
      <tr>
        <td height="39" background="images/ctoptbg.jpg"><table width="97%" border="0" align="center" cellpadding="0" cellspacing="0">
          <tr>
            <td width="4%" align="center"><img src="images/Sm_MainDayIcon.gif" width="15" height="15"></td>
            <td width="96%"> 专业介绍</td>
          </tr>
        </table></td>
      </tr>
    </table>
      <table width="100%" border="0" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
        <tr>
          <td valign="top" class="crt"><table width="708" border="0" align="right" cellpadding="4" cellspacing="2">
            <tr>
              <td width="696" height="479" valign="top"><%
	sql="select * from zhuanye order by id desc"
	set rs=server.CreateObject("adodb.recordset")
	rs.open sql,conn,1,3
	if rs.eof then 
		response.Write "暂无专业"
	else
		rs.PageSize = 6
		Page = CLng(Request("Page"))
		If Page < 1 Then Page = 1
		If Page > rs.PageCount Then Page = rs.PageCount
		rs.absolutepage=page
		  %>
                <table width="690" border="0" align="center" cellpadding="0" cellspacing="0">
                  
                  <%
for i=1 to 3
 %>
                  <tr>
                    <% 
	  for j=1 to 2
			 picurl=rs("d_picture")
			if len(rs("zhuanyename"))>12 then
			stitle=left(rs("zhuanyename"),12)&"…"
			else
			stitle=rs("zhuanyename")
			end if
	  %>
                    <td height="134"><table width="335" border="0" align="center" cellpadding="0" cellspacing="0">
                        <tr>
                          <td width="146" height="112"><table width="100%" border="0" cellpadding="2" cellspacing="1" bgcolor="#CCCCCC">
                              <tr>
                                <td bgcolor="#FFFFFF"><a href="showzy.asp?id=<%=rs("id")%>" target="_blank"><img src="<%=picurl%>" width="146" height="112" alt="" border="0"></a></td>
                              </tr>
                          </table></td>
                          <td valign="top"><table width="96%" border="0" align="center" cellpadding="0" cellspacing="0">
                              <tr>
                                <td class="hang"><span class="STYLE1">课程介绍:</span>
                                    <%
				  if len(RemoveHTML(rs("info")))>100 then
					  response.Write left(RemoveHTML(rs("info")),100)&"......"
				  else
					  response.Write RemoveHTML(rs("info"))
				  end if
				  %></td>
                              </tr>
                          </table></td>
                        </tr>
                        <tr>
                          <td height="22" align="center" bgcolor="#E9F2F9"><a href="showzy.asp?id=<%=rs("id")%>" target="_blank"><%=stitle%></a></td>
                          <td align="center" bgcolor="#E9F2F9"><img src="images/newlst.jpg" width="10" height="12" align="absmiddle"> <a href="showzy.asp?id=<%=rs("id")%>" target="_blank">详细介绍</a>&nbsp;&nbsp;&nbsp;<img src="images/newlst.jpg" width="10" height="12" align="absmiddle"> <a href="baoming.asp">我要报名</a></td>
                        </tr>
                    </table></td>
                    <%
	 rs.movenext
	 if x>=2 then exit for
	 if rs.eof then exit for
	 next
					  %>
                  </tr>
                  <tr>
                    <td height="13" background="images/zyline.jpg" colspan="2"></td>
                  </tr>
                  <%
if rs.eof then exit for
next
%>
                </table>
                <%
end if
%>
                <table width="98%" height="22" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#F2F2F2">
                  <tr>
                    <td align="center"><% 
  If page=1 Then
  response.Write "<font color=#999966>第一页</font>&nbsp;&nbsp;"
  response.Write "<font color=#999966>上一页</font>&nbsp;&nbsp;"
  else
  response.Write"<a href='?page=1'>第一页</a>&nbsp;&nbsp;<a href='?page="&(page-1)&"'>上一页</a>&nbsp;&nbsp;"
  end if
  If cint(page)=rs.pagecount then
  response.Write "<font color=#999966>下一页&nbsp;&nbsp;</font>"
  response.Write "<font color=#999966>最后页&nbsp;&nbsp;</font>"
  else
  response.Write"<a href='?page="&(page+1)&"'>下一页</a>&nbsp;&nbsp<a href='?page="&rs.pagecount&"&ord="&ord&"'>最后页</a>&nbsp;&nbsp; "
  end if
%>
                      &nbsp;&nbsp;页次&nbsp;<font COLOR="Red"><%=Page%></font>/<%=rs.PageCount%> 共<font COLOR="Red"><%=rs.recordcount%></font>条记录
                      &nbsp;&nbsp;
                      <select name="sel_page" onChange="javascript:location=this.options[this.selectedIndex].value;">
                        <%for i = 1 to rs.PageCount
             if i = page then%>
                        <option value="?page=<%=i%>"selected><%=i%></option>
                        <%else%>
                        <option value="?page=<%=i%>"><%=i%></option>
                        <%
			 end if
             next
			rs.close
			set rs=nothing
             %>
                      </select></td>
                  </tr>
                </table></td>
            </tr>
          </table></td>
        </tr>
      </table></td>
  </tr>
</table>
<!--#include file="end.asp" -->
</body>
</html>
