📄 a.asp
字号:
<% Set hdobj = Server.CreateObject("HD.ComOpen")'请确保此行在最前
Connkaa = hdobj.WeekaaConn()
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>学生奖励申报</title>
<META HTTP-EQUIV="luxiaoqing" CONTENT="no-cache">
<STYLE TYPE="text/css">
<!--
.style3 {
font-size: 36px;
font-family: "黑体";
}
.style4 {color: #FFFFFF}
.style5 {font-size: 14px}
.style6 {font-size: 12px}
.style7 {
font-family: "黑体";
color: #FF0000;
}
.style9 {font-size: 16px; font-family: "黑体";color: #FFFFFF; }
.style99 {font-size: 16px; font-family: "黑体";}
body,td,th {
font-size: 12px;
}
.tables {
background-image: url(../Image/bigbg.jpg);
background-repeat: no-repeat;
}
a:link {
text-decoration: none;
}
a:visited {
text-decoration: none;
}
a:hover {
text-decoration: none;
}
a:active {
text-decoration: none;
}
body {
background-image: url(../Image/bg.gif);
background-color: #DEE7FF;
margin-left: 0px;
margin-top: 0px;
margin-right: 0px;
margin-bottom: 0px;
}
.style31 {font-size: 12px}
.style41 { color: #FFFFFF;
font-size: 16px;
font-weight: bold;
}
-->
</STYLE>
<script type="text/JavaScript">
<!--
function MM_openBrWindow(theURL,winName,features) { //v2.0
window.open(theURL,winName,features);
}
//-->
</script>
</head>
<body>
<%
if Request.QueryString("ac")="" then
tab="student"
ID=Request.QueryString("ID")
IDD=Request.QueryString("IDD")
if IDD<>"" then
ID=Request.QueryString("AA")
Set rsa = Server.CreateObject("ADODB.RecordSet")
sqlsa = "Select * From [AwPunt] where ID="&IDD
rsa.Open Sqlsa,Connkaa,1,3
RsaD=rsa("d")
RsaE=rsa("e")
end if
if ID="" then
ErrInfo = "StuwApp.asp"
Response.Redirect (ErrInfo)
end if
dim stv,sqstv
Set stv = Server.CreateObject("ADODB.RecordSet")
sqstv = "Select * From [sets] where TB='"&tab&"'"
stv.Open Sqstv,Connkaa,1,3
Set rs = Server.CreateObject("ADODB.RecordSet")
sqls = "Select * From [student] where ID="&ID
rs.Open Sqls,Connkaa,1,3
a=rs("a")
lu="../photo/"&session("acschoolsql")&"/"&a&".jpg"
Pr=Request.QueryString("Pr")
if Pr<>"Pr" then
%>
<table width="1003" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#3399fd">
<tr>
<td height="150" align="center" valign="bottom"><img src="../Image/bigbga.jpg" width="1003" height="150"></td>
</tr>
<tr>
<td height="28" align="center" valign="middle" background="../Image/bg01a.jpg"> </td>
</tr>
<tr>
<td bgcolor="#3399FD">
<%end if%>
<table width="700" border="0" align="center" cellpadding="0" cellspacing="0">
<form name="form1" method="post" action="?ac=ac&ID=<%=IDD%>">
<tr>
<td height="40" align="center" class="style9">学生奖励申报表</td>
</tr>
<tr>
<td height="28" background="../Image/bg01.jpg"><span class="style10">
<input type="hidden" name="a" value="<%=rs("ID")%>">
<input type="hidden" name="l" value="奖励">
<input name="b" type="hidden" id="a2" value="<%=rs("a")%>" size="22">
<input name="c" type="hidden" id="c4" value="<%=rs("c")%>" size="22">
</span></td>
</tr>
</table>
<table width="700" border="1" align="center" cellpadding="0" cellspacing="0" bordercolor="#0C4FBC" bgcolor="#FFFFFF">
<tr>
<td width="99" height="25" align="center"><%=stv("a")%></td>
<td width="133" align="center"><%=rs("a")%></td>
<td width="99" align="center"><%=stv("b")%></td>
<td width="140" align="center"><%=rs("b")%></td>
<td width="217" rowspan="11" align="center" background="../photo/boy.gif"><p><img src="<%=lu%>" alt="biao" width="200" height="260"></p></td>
</tr>
<tr>
<td height="25" align="center"><%=stv("c")%></td>
<td width="133" align="center"><%=rs("c")%></td>
<td align="center"><%=stv("d")%></td>
<td align="center"><%=rs("d")%></td>
</tr>
<tr>
<td height="25" align="center"><%=stv("e")%></td>
<td align="center"><%=rs("e")%></td>
<td align="center"><%=stv("f")%></td>
<td align="center"><%=rs("f")%></td>
</tr>
<tr>
<td height="25" align="center"><%=stv("g")%></td>
<td align="center"><%=rs("g")%></td>
<td align="center"><%=stv("h")%></td>
<td align="center"><%=rs("h")%></td>
</tr>
<tr>
<td height="25" align="center"><%=stv("i")%></td>
<td align="center"><%=rs("i")%></td>
<td align="center"><%=stv("j")%></td>
<td align="center"><%=rs("j")%></td>
</tr>
<tr>
<td height="25" align="center"><%=stv("k")%></td>
<td align="center"><%=rs("k")%></td>
<td align="center"><%=stv("l")%></td>
<td align="center"><%=rs("l")%></td>
</tr>
<tr>
<td height="25" align="center"><%=stv("m")%></td>
<td align="center"><%=rs("m")%></td>
<td align="center"><%=stv("n")%></td>
<td align="center"><%=rs("n")%></td>
</tr>
<tr>
<td height="25" align="center"><%=stv("o")%></td>
<td align="center"><%=rs("o")%></td>
<td align="center"><%=stv("p")%></td>
<td align="center"><%=rs("p")%></td>
</tr>
<tr>
<td height="25" align="center"><%=stv("q")%></td>
<td align="center"><%=rs("q")%></td>
<td align="center"><%=stv("r")%></td>
<td align="center"><%=rs("r")%></td>
</tr>
<tr>
<td height="25" align="center"><%=stv("s")%></td>
<td align="center"><%=rs("s")%></td>
<td align="center"><%=stv("t")%></td>
<td align="center"><%=rs("t")%></td>
</tr>
<tr>
<td height="25" align="center"><%=stv("u")%></td>
<td align="center"><%=rs("u")%></td>
<td align="center"><%=stv("v")%></td>
<td align="center"><%=rs("v")%></td>
</tr>
<tr>
<td height="25" align="center"><%=stv("w")%></td>
<td align="center"><%=rs("w")%></td>
<td align="center"><%=stv("x")%></td>
<td colspan="2" align="left"> <%=rs("x")%></td>
</tr>
<tr>
<td height="25" align="center"><%=stv("y")%></td>
<td align="center"><%=rs("y")%></td>
<td align="center"><%=stv("z")%></td>
<td colspan="2" align="left"> <%=rs("z")%></td>
</tr>
<tr>
<td height="25" colspan="5" align="center"><span class="style99">奖 励 项 目 名 称</span></td>
</tr>
<tr>
<td height="25" colspan="5" align="center"><span class="style10">
<input name="d" type="text" id="d" value="<%=RsaD%>" size="40">
</span></td>
</tr>
<tr>
<td height="25" colspan="5" align="center"><span class="style99">学习总结、申请理由</span></td>
</tr>
<tr>
<td height="120" colspan="5" align="center"><textarea name="e" cols="70" rows="23" id="e"><%=RsaE%></textarea></td>
</tr>
<tr>
<td height="40" colspan="5" align="center" bgcolor="#FFFFFF"><input type="submit" name="Submit" value="提交"></td>
</tr></form>
</table>
<%if Pr<>"Pr" then %>
<table width="700" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="23" align="center" background="../Image/bg01.jpg" bgcolor="#0033cc"><a href="A.asp?ID=<%=ID%>&Pr=Pr" target="_blank">打印</a></td>
</tr>
</table></td>
</tr>
<tr>
<td height="25" bgcolor="#3399FD"> </td>
</tr>
<tr>
<td height="28" background="../Image/bg01a.jpg" bgcolor="#3399FD"> </td>
</tr>
</table>
<%end if%>
<%
else
call hdobj.AddL("AwPunt","k",0)
end if
%>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -