📄 head.asp

📁 《Web数据库技术》-高晗-vod点播系统程序源代码

💻 ASP

字号:

<!--#include file="conn.asp"-->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="../images/style.css" rel="stylesheet" type="text/css">
<title>VOD点播系统</title>
<style type="text/css">
<!--
.style1 {font-size: 16px}
-->
</style>
</head>
<table width="740" height="81" border="0">
<tr>
      <td height="59" rowspan="2"><div align="center">
        <table width="262" border="0">
          <tr>
            <td width="256"><div align="center" class="style1"><span style="font-weight: bold;">欢 迎 使 用 VOD 点 播 系 统</span></div></td>
          </tr>
        </table>
       </td>
      
</tr>
    <tr>
    </tr>
    <tr>
      <td colspan="2">
        <table border="0" width="98%" cellspacing="0" cellpadding="0" id="table7" height="19">
            <tr>
              <td width="300" height="22">
              <p align="center"> 
              <a target="_top" href="index.asp">首页</a></td>

              <td width="300" height="22">
              <p align="center"><a href="allmovie.asp" target=_blank>全部电影</a></td>

<%
	   Set rst= Server.CreateObject("ADODB.Recordset")
	   rst.open "select * from type",conn,1,1
     if rst.EOF then
	      response.write "没有栏目："
	   else
	       do while NOT rst.EOF
%>
              <td width="300" height="22">
              <a href="lbmx.asp?type=<%=rst("type")%>" target=_blank>
              <p align="center"><%=rst("type")%></a></td>
<%
	rst.MoveNext
	loop
	end if
	rst.close
	set rst=nothing
 %>
            </tr>
        </table>
    </tr>
</table>
</table>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -