admin_file_output.asp

做的一个毕业设计（学生档案管理系统）

<!--#include file="../conn.asp"-->
<!--#include file="inc/inc.asp"-->
<!--#include file="../inc/inc.asp"-->
<!--#include file="common/admin_File_inc.asp"-->

<STYLE TYPE="text/css">
body {background: #fff;}
td {color:#000;}
.outputtab {background: #fff;border-right:1px solid #000; width:660px;}
.outputtab td{border-left:1px solid #000;border-top:1px solid #000;height:30px;padding:3px 0;}
TEXTAREA {overflow: hidden;border:0;width:95%;height:95%;margin-left:5px;}
h1 {
	line-height: 35px;
	text-align: center;
	border-bottom-width: 1px;
	border-bottom-style: solid;
	border-bottom-color: #000;
}
</STYLE>
<%
Dim file_edit,file_i,file_jk_i,file_gx_i
action=che(request("action"))
id=che(request("id"))
If id="" Then response.End

Sql_Lists="ClassNo,Name,His,Gender,National,"&_
	"birth,Political,Political_date,Entry,Entry_Date,"&_
	"Telephone,Birthplace,address,identityNo,Zip,"&_
	"Learning,talent,Incentives,Hobbies,demerits,"&_
	"Changes,graduation_Date,graduation_future,Remarks,pic,"&_
	"file_jk_l0,file_jk_l1,file_jk_l2,file_jk_l3,file_jk_l4,"&_
	"file_gx_l0,file_gx_l1,file_gx_l2,file_gx_l3,file_gx_l4"
Sql_tables="File_info"
Sql_Conditions=" ID = "&id
sql=Sqlinfo(Sql_Lists,Sql_tables,Sql_Conditions,"","","")
file_edit = connopen(sql)
If isArray(file_edit) Then
	If file_edit(24,0)<>"" Then picurl=file_edit(24,0)
	response.write "<h1>学校名称</h1>"
	For file_i=0 To 9
		arr_file_i(file_i)=Split(file_edit(file_i+25,0),",")
	Next

%>
<table align="center" style="border:0;width:660px;margin-bottom:3px;" cellspacing="0" cellpadding="0">
	<tr>
		<td width="50%">&nbsp;&nbsp;学号：<%=file_edit(0,0)%></td>
		<td width="50%">&nbsp;&nbsp;专业：</td> 
	</tr>
</table>
<table align="center" class="outputtab" cellspacing="0" cellpadding="0">
	<tr align="center">
		<td width="6%">姓名</td>
		<td width="15%">&nbsp;<%=file_edit(1,0)%></td>
		<td width="6%">性别</td>
		<td width="15%">&nbsp;<%=arr_Gender(file_edit(3,0))%></td>
		<td width="6%">曾用名</td>
		<td width="15%">&nbsp;<%=file_edit(1,0)%></td>
		<td width="6%">民族</td>
		<td width="15%">&nbsp;<%=file_edit(1,0)%></td>
		<td rowspan="4" width="16%"><img src="..\upload\<%=picurl%>" id="imageurl" name="imageurl" width="90" height="120"></td>
	</tr>
	<tr align="center">
		<td>出生<BR>日期</td>
		<td>&nbsp;<%=file_edit(5,0)%></td>
		<td>入学<BR>学历</td>
		<td>&nbsp;<%=arr_Entry(file_edit(8,0))%></td>
		<td>政治<BR>面貌</td>
		<td>&nbsp;<%=arr_Political(file_edit(6,0))%></td>
		<td>加入<BR>组织<BR>时间</td>
		<td>&nbsp;<%=file_edit(7,0)%></td>
	</tr>
	<tr align="center">
		<td>班别</td>
		<td colspan="2">&nbsp;<%=file_edit(1,0)%></td>
		<td>身份证号</td>
		<td colspan="2">&nbsp;<%=file_edit(13,0)%></td>
		<td>籍贯</td>
		<td>&nbsp;<%=file_edit(11,0)%></td>
	</tr>
	<tr align="center">
		<td>家庭<BR>住址</td>
		<td colspan="3">&nbsp;<%=file_edit(12,0)%></td>
		<td>邮编</td>
		<td>&nbsp;<%=file_edit(14,0)%></td>
		<td>联系<BR>电话</td>
		<td>&nbsp;<%=file_edit(10,0)%></td>
	</tr>
</table>

<table align="center" class="outputtab" cellspacing="0" cellpadding="0">
	<tr align="center">
		<td rowspan="5" width="6%">个<BR>人<BR>简<BR>历</td>
		<td colspan="2" width="21%">何年月至何年月</td>
		<td width="31%">所在学校或单位</td>
		<td width="21%">任何职务</td>
		<td width="21%">证明人</td>
	</tr>
	<%For file_jk_i=0 To 3%>
	<tr align="center">
	<td colspan="2">&nbsp;<%If arr_file_i(0)(file_jk_i)<>"" or arr_file_i(0)(file_jk_i)<>"" Then response.write arr_file_i(0)(file_jk_i)&"&nbsp;"&arr_file_i(1)(file_jk_i)%></td>
	<td>&nbsp;<%=arr_file_i(2)(file_jk_i)%></td>
	<td>&nbsp;<%=arr_file_i(3)(file_jk_i)%></td>
	<td>&nbsp;<%=arr_file_i(4)(file_jk_i)%></td>
	</tr>
	<%next%>
	
	<tr align="center">
		<td rowspan="5">社<BR>会<BR>关<BR>系</td>
		<td width="11%">称呼</td>
		<td width="10%">姓名</td>
		<td>在何单位</td>
		<td>任何职务</td>
		<td>联系电话</td>
	</tr>
	<%For file_gx_i=0 To 3%>
	<tr align="center">
	<td>&nbsp;<%=arr_file_i(5)(file_gx_i)%></td>
	<td>&nbsp;<%=arr_file_i(6)(file_gx_i)%></td>
	<td>&nbsp;<%=arr_file_i(7)(file_gx_i)%></td>
	<td>&nbsp;<%=arr_file_i(8)(file_gx_i)%></td>
	<td>&nbsp;<%=arr_file_i(9)(file_gx_i)%></td>
	</tr>
	<%next%>

	<tr align="center">
		<td rowspan="2">大学<BR>期间<BR>各项<BR>记录</td>
		<td colspan="2">个人特长</td>
		<td colspan="2">奖惩记录</td>
		<td>处分记过</td>
	</tr>
	<tr align="center">
		<td colspan="2" style="height:100px;" align="left">
			<TEXTAREA><%If  Not IsNull(file_edit(16,0)) Then response.write Replace(file_edit(16,0),"${}$",Chr(13))%></TEXTAREA></td>
		<td colspan="2" align="left">
			<TEXTAREA><%If  Not IsNull(file_edit(17,0)) Then response.write Replace(file_edit(17,0),"${}$",Chr(13))%></TEXTAREA></td>
		<td align="left">
			<TEXTAREA><%If  Not IsNull(file_edit(19,0)) Then response.write Replace(file_edit(19,0),"${}$",Chr(13))%></TEXTAREA></td>
	</tr>
	<tr align="center">
		<td style="height:80px;">学籍<BR>异动<BR>情况</td>
		<td colspan="5" align="left"><TEXTAREA><%If  Not IsNull(file_edit(20,0)) Then response.write Replace(file_edit(20,0),"${}$",Chr(13))%></TEXTAREA></td>
	</tr>
</table>
<table align="center" class="outputtab" cellspacing="0" cellpadding="0" style="border-bottom:1px solid #000;">
	<tr align="center">
		<td width="6%" style="height:80px;">毕(结) 业<BR>去向</td>
		<td width="44%" align="left"><TEXTAREA><%If  Not IsNull(file_edit(22,0)) Then response.write Replace(file_edit(22,0),"${}$",Chr(13))%></TEXTAREA></td>
		<td width="6%">毕(结) 业<BR>日期</td>
		<td width="44%" align="left"><TEXTAREA><%If  Not IsNull(file_edit(21,0)) Then response.write Replace(file_edit(21,0),"${}$",Chr(13))%></TEXTAREA></td>
	</tr>
	<tr align="center">
		<td style="height:150px;">备注</td>
		<td colspan="3" align="left"><TEXTAREA><%If  Not IsNull(file_edit(23,0)) Then response.write Replace(file_edit(23,0),"${}$",Chr(13))%></TEXTAREA></td>
	</tr>
</table>
<%End If%>