right.asp

来自「与asp相关的技术 如数据库和网页设计 很有用的哦」· ASP 代码 · 共 32 行

ASP
32
字号
<!--#INCLUDE FILE="../../system/odbc_connection.asp"-->
<%
if session("user_type")<>"T" then
		response.redirect "../../index.asp"
end if
%>
<html>
<head>
	<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
</head>
<body>
	<%
	On Error Resume Next
	'将该页面输出
	Dim sql
	If Request.QueryString("id") ="" Then
		'如果没有选择第几节,就显示第1节
		sql = "Select Top 1 * From course Order by id"
	Else
		sql = "Select * From course Where id=" & Request.QueryString("id") 
	End If
	Set rs=db.Execute(sql)
	Response.Write rs("body")
	db.close
	Set db=Nothing
	If err.Number>0 Then
		Response.Write "请在左边选定章节"
	End If
	%>
</body>
</html>

⌨️ 快捷键说明

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