?? baoming.asp
字號:
<%name=request.form("name")
sex=request.form("sex")
age=request.form("age")
jg=request.form("jg")
number=request.form("number")
date1=request.form("date1")
minzu=request.form("minzu")
xl=request.form("xl")
school=request.form("school")
xb=request.form("xb")
zy1=request.form("zy1")
zy2=request.form("zy2")
byschool=request.form("byschool")
jx=request.form("jx")
zzmm=request.form("zzmm")
address=request.form("address")
phone=request.form("phone")
youbian=request.form("youbian")
chinese=request.form("chinese")
shuxue=request.form("shuxue")
english=request.form("english")
wuli=request.form("wuli")
huaxue=request.form("huaxue")
shenwu=request.form("shenwu")
zhengzhi=request.form("zhengzhi")
tc=request.form("tc")
lishi=request.form("lishi")
dili=request.form("dili")
set conn=Server.CreateObject("ADODB.Connection")
dbpath=Server.MapPath("data.mdb")
conn.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="&dbpath
set rs=Server.CreateObject("ADODB.Recordset")
strsql="select * from baoming"
rs.Open strsql,conn,1,3%>
<%if len(name)=0 then
response.write "<center>你還沒有輸入你的名字!</center>"
response.end
end if
if len(age)=0 then
response.write "<center>你還沒有輸入你的年齡!</center>"
response.end
end if
if len(number)=0 then
response.write "<center>你還沒有輸入你的身份證號碼!</center>"
response.end
end if
if len(date1)=0 then
response.write "<center>你還沒有輸入你的出生日期!</center>"
response.end
end if
if len(minzu)=0 then
response.write "<center>你還沒有輸入你的民族!</center>"
response.end
end if
if xl="請選擇" then
response.write "<center>你還沒選擇好你的學歷!</center>"
response.end
end if
if len(xb)=0 then
response.write "<center>你還沒有輸入你要報的系別!</center>"
response.end
end if
if len(zy1)=0 then
response.write "<center>專業(yè)名至少要填一個</center>"
response.end
end if
if len(byschool)=0 then
response.write "<center>畢業(yè)學校一定要填</center>"
response.end
end if
if len(address)=0 then
response.write "<center>你的通訊地址一定要填寫，而且要填寫正確，否則你所報的學校的通知書你就收不到了！</center>"
response.end
end if
if len(youbian)=0 then
response.write "<center>郵政編碼一定要填寫，否則你就收不到通知書了！</center>"
response.end
end if
rs.addnew
rs("name")=name
rs("sex")=sex
rs("age")=age
rs("number")=number
rs("date1")=date1
rs("minzu")=minzu
rs("xl")=xl
rs("school")=school
rs("xb")=xb
rs("zy1")=zy1
rs("zy2")=zy2
rs("byschool")=byschool
rs("jx")=jx
rs("zzmm")=zzmm
rs("address")=address
rs("phone")=phone
rs("youbian")=youbian
rs("chinese")=chinese
rs("shuxue")=shuxue
rs("english")=english
rs("wuli")=wuli
rs("huaxue")=huaxue
rs("shenwu")=shenwu
rs("zhengzhi")=zhengzhi
rs("tc")=tc
rs("jg")=jg
rs("lishi")=lishi
rs("dili")=dili
rs("time")=now()
rs.update
%>
<html>
<head>
<meta http-equiv="Content-Language" content="zh-cn">
<title>報名</title>
<link rel="stylesheet" type="text/css" href="bao.css">
</head>
<body style="text-align: center">
<p align="center"><b>祝賀您，您在<%=rs("school")%>的報名成功！下面是您的報名表：</b></p>
<div align="center">
<table border="1" cellpadding="0" cellspacing="0" style="border-left:3px solid #800000; border-right:3px solid #800000; border-collapse: collapse" bordercolor="#800000" width="79%" id="AutoNumber1" height="250">
<tr>
<td width="15%" height="31" style="border-left: 3px solid #800000; border-top-width: 1; border-bottom-width: 1">
<p> <b>姓名:</b></td>
<td width="13%" height="31"><p align="center"><%=rs("name")%></td>
<td width="15%" height="31">
<p align="center"><b>年齡:</b></td>
<td width="7%" height="31"><p align="center"><%=rs("age")%></td>
<td width="15%" height="31">
<p align="center"><b>性別:</b></td>
<td width="5%" height="31">
<p align="center"><%=rs("sex")%></td>
<td width="14%" height="31">
<p align="center"><b>出生日期:</b></td>
<td width="37%" height="31">
<p align="center"><%=rs("date1")%></td>
</tr>
<tr>
<td width="12%" height="31" style="border-left-style: solid; border-left-width: 3; border-top-width: 1; border-bottom-width: 1">
<p> <b>民族:</b></td>
<td width="13%" height="31">
<p align="center">
<%=rs("minzu")%></td>
<td width="15%" height="31">
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -