📄 baoming.asp
字号:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="Connections/connect.asp" -->
<%
Dim Recordset1
Dim Recordset1_numRows
Set Recordset1 = Server.CreateObject("ADODB.Recordset")
Recordset1.ActiveConnection = MM_connect_STRING
Recordset1.Source = "SELECT * FROM baomingmessage"
Recordset1.CursorType = 0
Recordset1.CursorLocation = 2
Recordset1.LockType = 1
Recordset1.Open()
Recordset1_numRows = 0
%>
<%
Dim Recordset2__MMColParam
Recordset2__MMColParam = "1"
If (Request.QueryString("class") <> "") Then
Recordset2__MMColParam = Request.QueryString("class")
End If
%>
<%
Dim Recordset2
Dim Recordset2_numRows
Set Recordset2 = Server.CreateObject("ADODB.Recordset")
Recordset2.ActiveConnection = MM_connect_STRING
Recordset2.Source = "SELECT keshi, money, name FROM jiangzuo WHERE jiangzuoid = " + Replace(Recordset2__MMColParam, "'", "''") + ""
Recordset2.CursorType = 0
Recordset2.CursorLocation = 2
Recordset2.LockType = 1
Recordset2.Open()
Recordset2_numRows = 0
%>
<html>
<head>
<title>Untitled Document</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
</head>
<body bgcolor="#6699CC">
<form action="save.asp" method="post">
<table width="598" height="115" border="0" cellspacing="1" bgcolor="#000000">
<tr bgcolor="#666699">
<td colspan="4"><div align="center"><font color="#FFCC00">学生信息注册</font></div></td>
</tr>
<tr>
<td width="64" bgcolor="#6699CC"><font color="#FF0000" size="2">姓名：</font></td>
<td width="252" bgcolor="#66aadd"><div align="center">
<input name="name" type="text" id="name">
</div></td>
<td width="59" bgcolor="#6699CC"><font color="#FFCC00" size="2">性别：</font></td>
<td width="229" bgcolor="#66aadd"><div align="center">
<input name="sex" type="text" id="sex">
</div></td>
</tr>
<tr>
<td bgcolor="#6699CC"><font color="#FFCC00" size="2">年龄：</font></td>
<td bgcolor="#66aadd"><div align="center">
<input name="age" type="text" id="age">
</div></td>
<td bgcolor="#6699CC"><font color="#FFCC00" size="2">电话：</font></td>
<td bgcolor="#66aadd"><div align="center">
<input name="tel" type="text" id="tel">
</div></td>
</tr>
<tr>
<td bgcolor="#6699CC"><font color="#FFCC00" size="2">Email:</font></td>
<td bgcolor="#66aadd"><div align="center">
<input name="email" type="text" id="email">
</div></td>
<td bgcolor="#6699CC"><font color="#FF0000" size="2">地址：</font></td>
<td bgcolor="#66aadd"><div align="center">
<input name="address" type="text" id="address">
</div></td>
</tr>
</table>
<br>
<table width="598" border="0" cellspacing="1" bgcolor="#000000">
<tr>
<td height="24" colspan="4" bgcolor="#666699"><div align="center"><font color="#FFCC00">课程选择</font></div></td>
</tr>
<tr>
<td width="252" bgcolor="#6699CC"><div align="center"><font color="#FFCC00" size="2">课程</font></div></td>
<td width="252" bgcolor="#6699CC"> <div align="center"><font color="#FFCC00" size="2">课时</font></div></td>
<td width="162" bgcolor="#6699CC"> <div align="center"><font color="#FFCC00" size="2">学费</font></div></td>
<td width="174" bgcolor="#6699CC"> <div align="center"><font color="#FFCC00" size="2">报名</font></div></td>
</tr>
<tr bgcolor="#66aadd">
<td><div align="center"><font color="#FFCC00" size="2"><%=(Recordset2.Fields.Item("name").Value)%></font></div></td>
<td><div align="center"><font color="#FFCC00" size="2"><%=(Recordset2.Fields.Item("keshi").Value)%></font></div></td>
<td><div align="center"><font color="#FFCC00" size="2"><%=(Recordset2.Fields.Item("money").Value)%></font></div></td>
<td>
<input name="baoming" type="checkbox" id="baoming" value="<%= request("class")%>" checked> <font color="#FFCC00" size="2">现在报名</font></td>
</tr>
</table>
<p><font color="#FF0000">请输入雇员的ID号</font>
<input name="guyuanid" type="text" id="guyuanid" size="10" maxlength="3">
</p>
<p align="right"><font color="#FF0000"><font size="2">（注红色先项不能为空）</font></font>
</p>
<p align="center">
<input type="submit" name="Submit" value="登记">
<input type="reset" name="Submit2" value="取消">
</p>
</form>
</body>
</html>
<%
Recordset1.Close()
Set Recordset1 = Nothing
%>
<%
Recordset2.Close()
Set Recordset2 = Nothing
%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -