📄 wdkc.asp
字号:
<HTML><HEAD><TITLE>x学校网上选课系统---课程列表</TITLE>
<META http-equiv=Content-Type content="text/html; charset=gb2312"><LINK
href="images/css.css" type=text/css rel=stylesheet>
</HEAD>
<BODY bgColor=#f0f0f0 leftMargin=0 topMargin=0 MARGINWIDTH="0" MARGINHEIGHT="0">
<!--#include file="top.asp"-->
<TABLE id=table2 height=150 cellSpacing=0 cellPadding=0 width=770 align=center
border=0>
<TBODY>
<TD vAlign=top bgColor=#ffffff height=119>
<DIV align=center>
<TABLE id=table7 height=33 cellSpacing=0 cellPadding=0 width=770
border=0>
<TBODY>
<TR>
<TD width=770 colSpan=2>
<P align=center><FONT size=2><B>学号<B> <%=session("XZW_xsID")%> </B>所选的课程</B></FONT></P></TD></TR>
</TBODY></TABLE></DIV>
<TABLE id=table7 height=86 cellSpacing=0 cellPadding=0 width="100%"
border=0>
<TR>
<TD height="86">
<DIV align=center>
<form name="formReg" method="post" action="xuanke_save.asp" >
<TABLE cellSpacing=1 borderColorDark=#ffffff cellPadding=0
width="98%" bgColor=#000000 borderColorLight=#000000
border=0>
<TBODY>
<TR bgColor=#f0f0f0 height=32>
<TD align=middle>课程<BR>
编号</TD>
<TD align=middle>课程名称</TD>
<TD align=middle>教师</TD>
<TD align=middle>课程简介</TD>
<TD align=middle>上课地点</TD>
<TD align=middle>课程学分</TD>
<TD align=middle>人数限额<BR>
(最多/最少)</TD>
<TD align=middle>已选<BR>
人数</TD>
<TD align=middle>操作</TD>
</TR>
<%
call CheckLogin()
set RS12=Server.CreateObject("ADODB.RecordSet")
infolist2="select * from 学生表_student where name='"&session("XZW_xsID")&"' "
RS12.open infolist2,conn,1,3
if RS12.eof then
str="该学生的信息不存在，请检查！"
MsgShow str,"0",url
'str：提示消息内容；flag：0：返回，标志1：跳转到URL，标志2：关闭窗口 标志3：用于显示 标志4： 刷新页面 标志5： 刷新父窗口
call CloseDatabase()
response.end
else
kcid=RS12("SXKC")
RS12.close
end if
if kcid= "" or IsNULL(kcid) then
str="您还没有选择任何课程，请先选择！"
url="xuanke.asp"
MsgShow str,"0",url
'str：提示消息内容；flag：0：返回，标志1：跳转到URL，标志2：关闭窗口 标志3：用于显示 标志4： 刷新页面 标志5： 刷新父窗口
call CloseDatabase()
response.end
end if
set RS=Server.CreateObject("ADODB.Recordset")
SQL="select * from 教师表_teacher where id="&kcid&""
RS.open SQL,conn,1,1
if RS.Recordcount<1 then
else
%>
<TR bgColor=#ffffff height=25>
<TD align=middle><%=rs("kcbh")%></TD>
<TD align=left> <A title=点击这里查看简介
href="kc_show.asp?id=<%=rs("id")%>"
target=_blank><%=rs("kcmc")%> </A></TD>
<TD align=middle><%=rs("zsxm")%></TD>
<TD align=middle><A
href="kc_show.asp?id=<%=rs("id")%>"
target=_blank>查看</A></TD>
<TD align=middle><%=rs("skdd")%></TD>
<TD align=middle><%=rs("kcxf")%></TD>
<TD align=middle><%=rs("xzrs")%></TD>
<TD align=middle><%=rs("yxrs")%></TD>
<TD align=middle>暂无</TD> </TR>
<%
rs.close
set rs=nothing
end if
call CloseDatabase()
%>
</TBODY>
</TABLE></form>
</DIV></TD>
</TR>
</TABLE>
</TD></TR>
<TR>
<TD background="images/line_2.gif" bgColor=#ffffff
height=12> </TD></TR></TBODY></TABLE>
<!--#include file="dibu.asp"-->
</BODY></HTML>
<SCRIPT language=javascript>
function chkform1()
{
if (!confirm("真的要选中该课程吗？ [作出选择后将不能再修改]"))
{return false;}
}
</SCRIPT>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -