📄 index.asp
字号:
<!--#INCLUDE FILE="../../../system/odbc_connection.asp"-->
<HTML>
<HEAD>
<TITLE> 教师资料 </TITLE>
<link rel="stylesheet" href="../../../system/all.css">
</HEAD>
<BODY BGCOLOR="#FFFFFF">
<h4>教师资料</h4>
<%
dim lesson_id,rs,sql
lesson_id=session("lesson_id")
Sql="select teacher.user_id,teacher.user_name,teacher.email,teacher.tel,teacher.web from teacher,user_lesson "
sql=sql & " where user_lesson.user_id=teacher.user_id"
sql=sql & " and user_lesson.lesson_id='" & lesson_id & "'"
sql=sql & " order by teacher.user_id"
SET RS=db.EXECUTE(SQL)
%>
<center>
<TABLE border="0" width="95%">
<Tr align="center">
<TD width=15%>用户名</TD>
<TD width=15%>姓名</TD>
<TD width=15%>电话</TD>
<TD width=40%>email</TD>
</Tr>
<%
do while not rs.eof
response.write "<tr align='center'>"
response.write "<td><a href='particular.ASP?user_id=" & rs("user_id") & "' >"& rs("user_id") & "</a></td>"
If not isnull(rs("web")) Then
response.write "<td><a href='"& rs("web") & "' target='_new'>" & rs("user_name") & "</a></td>"
Else
response.write "<td>" & rs("user_name") & "</td>"
End If
response.write "<td>"& rs("tel") & "</td>"
response.write "<td><a href='mailto:"& rs("email") & "'>" & rs("email") & "</a></td>"
response.write "</tr>"
rs.movenext
loop
%>
</table>
</CENTER>
<p>
<p>
</BODY>
</HTML>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -