📄 adm_mainleft_sel.asp
字号:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="../conndb/conn.asp"-->
<%
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>添加考题的步骤</title>
</head>
<style>
td{font-size:9pt;}
</style>
<script language="javascript" src="js/js.js"></script>
<script>
</script>
<body topmargin=0 leftmargin=0>
<form name="addques_sel" method="post" action="questions/adm_AddQuestion.asp" target="mainr">
<table width=100% height="94" border=0 align=center cellpadding=0 cellspacing=0>
<tr align=center>
<td height="26">
1.选择考试专业
</td>
</tr>
<tr align=center>
<td height="23">
<select name="sel_profession" style="width:120" onchange="localhost(addques_sel.sel_profession.value)">
<%
getproid = replace(trim(request("proid")),"'","") 'getproid为Tab_profession表中的ID属性值
rssql = "select * from Tab_profession"
set rs = conn.Execute(rssql)
while(not rs.eof)
%>
<option value="<%=rs("ID")%>" <%if(cstr(rs("ID")) = getproid)then%>selected<%end if%>><%=rs("Name")%></option>
<%
rs.movenext
wend
rs.close
set rs = nothing
%>
</select>
</td>
</tr>
<tr align=center>
<td height="23">
2.选择考试课程
</td>
</tr>
<tr align=center>
<td height="23">
<select name="sel_lesson" style="width:120">
<%
dim sql
if(getproid = "")then
set bbb = conn.Execute("select top 1 * from Tab_profession")
'TOP子句: 限制返回到结果集中的行数,此处返回一行。
if(not bbb.eof)then
getproid = bbb("ID")
end if
bbb.close
set bbb = nothing
end if
if(getproid <> "")then
sql = "select * from Tab_Lesson where ofProfession = "&getproid
set rsles = conn.Execute(sql)
while(not rsles.eof)
%>
<option value="<%=rsles("ID")%>"><%=rsles("Name")%></option>
<%
rsles.movenext
wend
end if
%>
</select>
</td>
</tr>
<tr align=center>
<td height="23">
<input type="submit" name="submit" value="选择" style="height:17;border:1px solid;">
|
<input type="button" name="button" value="取消" style="height:17;border:1px solid;" onclick="hid_td(parent.td_fra)">
</td>
</tr>
</table>
</form>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -