📄 detail.asp

📁 fdafaf af

💻 ASP

字号:

<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="conn.asp"-->
<!--#include file="show_error.asp"-->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>无标题文档</title>
<link href="eric.css" rel="stylesheet" type="text/css">
</head>

<body>
<%
dim id
id=trim(request.querystring("id"))
'过滤字符
if id<>"" then
call opendb()
set rs=conn.execute("select * from homework where id=" & id)
if rs.eof then
call error("非法参数！")
call Iserror()
response.end
else
%>
<table width="400" border="0" align="center" cellpadding="4" cellspacing="1" id="table_01">
  <tr>
    <td class="white_bold_blue">作业名称：</td>
    <td class="white_bold_blue"><%=rs("homework_name")%></td>
  </tr>
  <tr>
    <td>内容：</td>
    <td><%=rs("content")%></td>
  </tr>
  <tr>
    <td>状态：</td>
    <td>
	<%
	if rs("Is_upload")=true then
	response.write "充许上传！"
	elseif rs("Is_upload")=false then
	response.write "禁止上传！"
	else
	response.write "出现未知错误！"
	end if
	%></td>
  </tr>
  <tr>
    <td>面向对象：</td>
    <td><%=rs("object_class")%></td>
  </tr>
</table>
<%end if
call closers()
call closedb()
end if
%>
</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -