28,391
社区成员
发帖
与我相关
我的任务
分享
<html>
<head>
<base target="contents">
</head>
<body>
<div align="center"> <img src="src/top.gif" width="1000" height="110" alt="精品课程" /> </div>
<table width="1000" border="0" align="center" cellpadding="0" cellspacing="0" >
<tr>
<td align="left" valign="middle">
<div align="center"> <a href="index.asp" class="Bar" target="main">
<span class="STYLE4">首 页 </span> </a> <span class="WHITE STYLE4">| </span>
<span class="STYLE4"> <a target="left" href="left.asp?classid=news">站内新闻 </a>| </span>
<span class="STYLE4"> <a href="left.asp?classid=information" target="left">123 </a>| </span>
</div>
</td>
</tr>
</table>
</body>
</html>
<html>
<head>
<base target="contents">
</head>
<body>
<div align="center"> <img src="src/top.gif" width="1000" height="110" alt="精品课程" /> </div>
<table width="1000" border="0" align="center" cellpadding="0" cellspacing="0" >
<tr>
<td align="left" valign="middle">
<div align="center"> <a href="index.asp" class="Bar">
<span class="STYLE4">首 页 </span> </a> <span class="WHITE STYLE4">| </span>
<span class="STYLE4"> <a target="contents" href="left.asp?classid=news">站内新闻 </a>| </span>
<span class="STYLE4"> <a href="left.asp?classid=information" target="_left">123 </a>| </span>
</div>
</td>
</tr>
</table>
</body>
</html>
<html>
<head>
<meta HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=gb2312">
<title>新建网页 1</title>
</head>
<frameset rows="180,*">
<frame name="banner" scrolling="no" noresize target="contents" src="top.asp">
<frameset cols="150,*">
<frame name="left" target="main" src="left.asp">
<frame name="main" src="main.asp">
</frameset>
<noframes>
<body>
<p>此网页使用了框架,但您的浏览器不支持框架。</p>
</body>
</noframes>
</frameset>
</html>
<html>
<head>
<base target="main">
</head>
<body >
<%
set conn=server.createobject("adodb.connection")
conn.connectionstring = "driver={sql server};server=YourSQLSERVER;uid=sa;pwd=1234;database=test"
conn.open
commandtext="select * from news where classid='"&Request.QueryString("classid")&"'"
set rs = conn.execute(commandtext,recordsaffected,adcmdtext)
If Err.number <>0 Then
Err.clear
Set conn=Nothing
response.write"数据库连接出错!"
response.End
end if
%>
<table width="80%" border="0">
<% do while not rs.eof %>
<tr>
<td height="30"> <a href="main.asp?id= <%=RS("id")%>" target="main" > <%=RS("title")%> </a>
</td>
</tr>
<%
rs.movenext
loop
rs.close
set rs=nothing
%>
</table>
</body>
</html>
<body>
<%
set conn=server.createobject("adodb.connection")
conn.connectionstring = "driver={sql server};server=YourSQLSERVER;uid=sa;pwd=1234;database=test"
conn.open
commandtext="select * from news where id='"&Request.QueryString("id")&"'"
set rs = conn.execute(commandtext,recordsaffected,adcmdtext)
If Err.number <>0 Then
Err.clear
Set conn=Nothing
response.write"数据库连接出错!"
response.End
end if
if not rs.eof then
%>
<table width="80%" height="30" border="0">
<tr>
<td bgcolor="#ECFFFF">
<% response.Write"您当前的位置 »»"%> <% =RS("classid") %>
<% response.Write" »»"%> <% =RS("title") %>
<% response.Write(" <br>") %>
</td>
</tr>
<% end if %>
<% do while not rs.eof %>
<tr>
<td height="30" > <%=RS("content")%> </td>
<tr>
<td align="right" > <%=RS("zuozhe")%> <%=RS("riqi")%> </td>
</tr>
<%
rs.movenext
loop
rs.close
set rs=nothing
%>
</table>
</body>