📄 index.asp
字号:
<%@LANGUAGE="VBSCRIPT"%>
<!-- #include file=conn.asp -->
<%set Rs=server.CreateObject("ADODB.Recordset")
Rs.open "select top 1 * from xiangmu",con,1,1
if Rs.eof or Rs.bof then
response.write "数据库错误,数据库中项目已经不存在,请添加项目后再操作!"
Rs.close
set Rs=nothing
con.close
set con=nothing
response.end
end if
session("xiangmu")=rs("baoming")
response.clear
Rs.close
set Rs=nothing
%>
<html>
<head>
<meta HTTP-EQUIV="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" type="text/css" href="style.css">
<STYLE type=text/css>
.inputs{border-left:0px;border-right:0px;border-top:0px;border-bottom:1px groove #aa9977;width:310px;font-size:9pt;BACKGROUND-COLOR: #000000;}
</STYLE>
<title><%=session("xiangmu")%>-在线报名</title>
</head>
<body text=ffffff leftmargin="0" bgcolor=000000 style="background-color: #FFFFFF">
<br>
<center>
<form method="POST" action="sucess.asp" style="color: #000000; border: 1px solid #FFFFFF">
<div align="left">
<table align="center">
<tr>
<td align="right"> </td>
<td align="right"><font color="#000000"><span class="p9">姓名</span></font></td>
<td align="center">
<font color="#000000">
<input name="mingzi" size="50" class="inputs" maxlength="50" style="border: 1px dotted #C0C0C0; ; color:#000000; background-color:#FFFFFF">
</font>
</td>
</tr>
<tr>
<td align="right"> </td>
<td align="right"><span class="p9"><font color="#000000">工作单位</font></span></td>
<td align="center">
<font color="#000000">
<input name="danwei" size="50" class="inputs" maxlength="200" style="color: #000000; border: 1px dotted #C0C0C0; background-color: #FFFFFF"> </font>
</td>
</tr>
<tr>
<td align="right"> </td>
<td align="right"><span class="p9"><font color="#000000">电话</font></span></td>
<td align="center">
<font color="#000000">
<input name="dianhua" size="50" class="inputs" maxlength="200" style="color: #000000; border: 1px dotted #C0C0C0; background-color: #FFFFFF">
</font>
</td>
</tr>
<tr>
<td></td>
<td align="right"><span class="p9"><font color="#000000">地址</font></span></td>
<td>
<font color="#000000">
<input name="zhuzhi" size="50" class="inputs" maxlength="100" style="color: #000000; border: 1px dotted #C0C0C0; background-color: #FFFFFF"></font></td>
</tr>
<tr>
<td> </td>
<td align="right"><span class="p9"><font color="#000000">邮箱</font></span></td>
<td align="center">
<font color="#000000">
<input name="youjian" size="50" class="inputs" maxlength="200" style="color: #000000; border: 1px dotted #C0C0C0; background-color: #FFFFFF"></font></td>
</tr>
<tr>
<td> </td>
<td align="right"><span class="p9"><font color="#000000">交费方式</font></span></td>
<td align="left">
<font color="#000000">
<select name="jiaofei" size="1" class="smallInput" style="color: #000000; background-color: #FFFFFF">
<%set Rs1=server.CreateObject("ADODB.Recordset")
Rs1.open "select * from jiaofei",con,1,1
if Rs1.eof or Rs1.bof then
response.write "数据库错误,数据库中汇款项目不存在,请添加汇款项目后再操作!"
Rs1.close
set Rs1=nothing
con.close
set con=nothing
response.end
end if
rs1.movefirst
while not rs1.eof
response.write("<option value="&rs1("jiaofei")&">"&rs1("jiaofei")&"</option>")
rs1.movenext
wend
Rs1.close
set Rs1=nothing
con.close
set con=nothing
%>
</select></font></td>
</tr>
<tr>
<td align="right"> </td>
<td align="right" valign=top><font color="#000000"><span class="p9">其他说明</span></font></td>
<td align="center">
<font color="#000000">
<textarea name="shuomin" cols="48" rows="9" class="smallarea" style="color: #000000; border: 1px solid #C0C0C0; background-color: #FFFFFF"></textarea>
</font>
</td>
</tr>
<tr>
<td align="right"> </td>
<td align="right"></td>
<td align="center">
<dl>
<font color="#000000">
<input type="submit" value=" 完 成 提 交 " class="buttonface" style="color: #000000; background-color: #C0C0C0">
<input type="reset" value=" 重 新 再 写 " class="buttonface" style="color: #000000; background-color: #C0C0C0">
</font>
</dl>
</td>
</tr>
<tr>
<td align="right"> </td>
<td align="right"></td>
<td align="center"> </td>
</tr>
</table>
</div>
</form>
<table width=350 align="center">
<td align="left">
</td>
</table>
</center>
</body>
</html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -