📄 hcjoin.asp
字号:
<!--#include file="config.asp"-->
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"
"http://www.w3.org/TR/html4/loose.dtd">
<!--#include file="head.asp"-->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title><%=Sitename%>-花花草草-报名参加</title>
<LINK href="css.css" type=text/css rel=stylesheet>
</head>
<body>
<%sitehead
if session("xyluser")="" Then ShowError("请登录后再进行此操作")%>
<table width="760" border="0" align="center" cellpadding="0" cellspacing="0" class="border">
<tr>
<td height="291" valign="top">
<table width="100%" border="0" align="center" cellpadding="0" cellspacing="0" class="border">
<tr>
<td width="86%" height="25"> <img src="skins/1/xb3.gif"> 当前位置:<a href="index.asp">首页</a> >> <a href="xh.asp">学校校花</a> >> 报名参加</td>
<td width="14%"><a href="hcjoin.asp">报名参加</a></td>
</tr>
</table>
<br>
<table width="98%" border="0" align="center" cellpadding="1" cellspacing="2" class="border">
<tr>
<td height="20" colspan="3" bgcolor="#FFCFCE"> <b>报名参加</b></td>
</tr>
<tr>
<td height="200">
<%Select Case request("type2")
Case "add":
Call add
Case Else:
call show
End Select
sub show%>
<table width="80%" border="0" align="center" cellpadding="0" cellspacing="0" class="border">
<tr>
<td height="80">加入需知：<br>
1、将个人资料填写完整，特别是[其它资料] 栏里的选项是必须填写的，否则将无法参加校花校草评比。<br>
2、校花代表照片将是个人资料里的“个人照片”选项，将你认为最佳的照片贴在这里<br>
3、要有自己的班级，若没有加入班级者亦不可加入。</td>
</tr>
<tr>
<td height="50"><div align="center"><a href="edit.asp">编辑资料</a> <a href="?type2=add">下一步</a></div></td>
</tr>
<tr>
<td> </td>
</tr>
</table>
<%end sub
sub add
rs.open "select top 1 * from user where id="&session("xyluserid")&"",conn,1,3
if rs.eof then ShowError("你的用户名不存在，可能被删除")
if rs("ishc")=1 then ShowError("你已经是校花选手了")
if rs("realname")="" or rs("bjid")=0 or isnull(rs("bjid")) or rs("birthday")="" or rs("blood")="" or rs("job")="" or rs("zwzs")="" or rs("shengxiao")="" or rs("userphoto")="" or rs("userphoto")="http://" then ShowError("请填写完整你的资料")
if right(rs("userphoto"),4)<>".jpg" and right(rs("userphoto"),4)<>".gif" and right(rs("userphoto"),4)<>".bmp" then ShowError("你的个人资料里的“个人照片”项填写错误，请先去编辑个人资料。")
rs("ishc")=1
rs("hcdate")=date()
rs("hccount")=0
rs.update
rs.close:set rs=nothing
a=obj.gourl(" 页面五秒后将转向学校校花页面，您可以进行以下操作：<br><br> <a href=index.asp>[返回首页]</a><br><br> 到<A href=xh.asp>[学校校花]</a>","xh.asp")
end sub%></td>
</tr>
</table>
<br>
</td></tr>
</table>
<%sitebottom%>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -