ASP製作學生檔案管理系統(畢業論文)

　　摘要：本系統是根據現代化校園的發展而設計的基於ASP的學生檔案管理系統，本系統可以方便老師、家長來學校尋找學生。實現全校學生資訊線上查詢。還可以對新來的學員資訊進行資訊錄入。由於學員上課情況複雜，可以實現資訊修改，及時調整學員的基本情況。

　　關鍵字 ASP 線上查詢 資訊錄入 資訊修改

　　 一、製作資料庫和建立資料來源

　　1、利用Microsoft Access 製作資料庫，取名為information,然後製作表，表名為infor.下面寫入資料欄位。如圖所示：

　　2、建立ODBC資料來源（在2000 professional 系統中建立）

　　步驟：

　　控制台à管理工具àODBC資料來源à系統DSNàAdd….ODBC介面

　　 二、系統介面

　　一個好的系統需要一個友好的使用者介面。由於本系統是基於ASP開發的，所以，我們利用網頁製作工具製作友好的使用者介面。部分介面如圖所示：

　　進入介面：

　　資訊錄入介面

　　信 息 查 詢

　　三、程式實現

　　由於本系統是基於ASP開發的實現線上操作的系統。所以，本系統的完成需要藉助HTML，又由於HTML是網頁編程的基礎，所以，在這裡就省去HTML代碼，相信大家都是HTML高手。

　　1、資訊錄入

<%
dim strsql,rs
set conn=createobject("ADODB.connection") //建立ADODB串連
conn.open ("DSN=information;UID=;PWD=;") //開啟資料來源information
set rs=createobject("ADODB.Recordset") //建立記錄對象rs
rs.open "infor",conn,3,3 //開啟資料庫裡的infor表
rs.Addnew //添加一條新的記錄
rs("name").value=request.form("name") /*取得表單名為 name裡的內容“送”到資料庫name記錄裡（備忘：表單名是資訊錄入介面裡的提示資訊是“姓名”的表單域的名字，以下類似）*/
rs("sex").value=request.form("sex")
rs("birth").value=request.form("birthday")
rs("zzmm").value=request.form("zz")
rs("teach").value=request.form("teach")
rs("xl").value=request.form("xl")
rs("class").value=request.form("class")
rs("school").value=request.form("school")
rs("add").value=request.form("add")
rs("tel").value=request.form("tel")
rs("hy").value=request.form("mar")
rs("jg").value=request.form("addr")
rs("career").value=request.form("career")
rs("date").value=request.form("time")
rs("school").value=request.form("school")
rs.Update //儲存資料庫裡的記錄
Response.Write ("你已經成功註冊的這位學員的資訊。請繼續<a href='input.htm'>註冊 </a>") //顯示提示資訊
rs.close //關閉資料記錄
conn.close //關閉串連
set rs=nothing
set conn=nothing
%>

　　2、資訊查詢

<%
dim strsql,conn,rs
set conn=server.createobject("ADODB.connection")
conn.open ("DSN=information;UID=;PWD=;")
set rs=server.createobject("ADODB.Recordset")
strsql="select * from infor where name= '" & request("name") &"'"//利用SQL建立查詢
rs.open strsql,conn
%>
<table width="1205" border="1" align="left" bordercolor="#6600CC">
<tr> //本行寫上要顯示的欄位的相應的中文名
<td width="69"><div align="center"><font size="2">姓名</font></div></td>
<td width="46"><div align="center"><font size="2">性別</font></div></td>
<td width="122"><div align="center"><font size="2">出生年</font></div></td>
<td width="46"><div align="center"><font size="2">學曆</font></div></td>
<td width="91"><div align="center"><font size="2">政治面貌</font></div></td>
<td width="91"><div align="center"><font size="2">專業</font></div></td>
<td width="50"><div align="center"><font size="2">班級</font></div></td>
<td width="69"><div align="center"><font size="2">班主任</font></div></td>
<td width="122"><div align="center"><font size="2">入學時間</font></div></td>
<td width="146"><div align="center"><font size="2">聯絡電話</font></div></td>
<td width="337"><div align="center"><font size="2">聯絡地址</font></div></td>
</tr>
<% while Not rs.eof %> //迴圈語句控制合格記錄輸出
<tr> //本行根據迴圈條件可以重複輸出
<td><div align="center"><font size="2"><%=rs("name")%></font></div></td>
/*輸出資料庫中合格name欄位的值*/
<td><div align="center"><font size="2"><%=rs("sex")%></font></div></td>
<td><div align="center"><font size="2"><%=rs("birth")%></font></div></td>
<td><div align="center"><font size="2"><%=rs("xl")%></font></div></td>
<td><div align="center"><font size="2"><%=rs("zzmm")%></font></div></td>
<td><div align="center"><font size="2"><%=rs("career")%></font></div></td>
<td><div align="center"><font size="2"><%=rs("class")%></font></div></td>
<td><div align="center"><font size="2"><%=rs("teach")%></font></div></td>
<td><div align="center"><font size="2"><%=rs("date")%></font></div></td>
<td><div align="center"><font size="2"><%=rs("tel")%></font></div></td>
<td><div align="center"><font size="2"><%=rs("add")%></font></div></td> </tr>
<% rs.movenext
Wend
rs.close
conn.close
%>
</table>

　　3、資訊修改

<%
set conn=server.createobject("adodb.connection")
conn.open "DSN=information;UID=;PWD=;"
set rs=server.CreateObject("adodb.recordset")
username=request("name") // 取得name表單的值賦給username
strsql="select * from infor where name='"&username&"'" //建立SQL查詢
rs.open strsql,conn,3,3
%>
<form action="zhuce.asp" method="post">
// 以POST方式將修改的記錄通過zhuce.asp頁面的程式儲存到資料庫當中
<table width="75%" border="1" align="center" bordercolor="#663399">
<tr>
<td width="18%"><div align="right"><font size="2">姓 名：</font></div></td>
<td width="36%"><font size="2">
<input name="name" type="text" id="name" value="<%=rs.fields("name")%>">
</font></td> //顯示符合查詢條件的資料庫當中name欄位的值，供修改
<td width="15%"><div align="right"><font size="2">入學時間：</font></div></td>
<td width="31%"><input name="time" type="text" id="time" value="<%=rs.fields("date")%>"></td>
</tr>
<tr>
<td height="20"><div align="right"><font size="2">性 別：</font></div></td>
<td><p>
<label>
<input name="sex" type="radio" value="<%=rs.fields("sex")%>" checked>
男</label>
<label>
<input type="radio" name="sex" value="<%=rs.fields("sex")%>">
女</label>
<br>
</p></td>
<td><div align="right"><font size="2">專業：</font></div></td>
<td><input name="career" type="text" id="career" value="<%=rs.fields("career")%>"></td>
</tr>
<tr>
<td><div align="right"><font size="2">出生年月：</font></div></td>
<td><font size="2">
<input name="birthday" type="text" id="birthday" value="<%=rs.fields("birth")%>">
</font></td>
<td><div align="right"><font size="2">班級：</font></div></td>
<td><input name="class" type="text" id="class" value="<%=rs.fields("class")%>"></td>
</tr>
<tr>
<td><div align="right"><font size="2">政治面貌：</font></div></td>
<td><select name="zz" id="zz">
<option value="團員">團員</option>
<option value="黨員">黨員</option>
<option value="其他">其他</option>
</select></td>
<td><div align="right"><font size="2">班主任：</font></div></td>
<td><input name="teach" type="text" id="teach" value="<%=rs.fields("teach")%>"></td>
</tr>
<tr>
<td><div align="right"><font size="2">學曆：</font></div></td>
<td><font size="2">
<select name="xl" id="xl">
<option value="初中">初中</option>
<option value="高中">高中</option>
<option value="大專">大專</option>
<option value="本科">本科</option>
<option value="研究生">研究生</option>
<option value="其他">其他</option>
</select>
</font></td>
<td><div align="right"><font size="2">教室：</font></div></td>
<td><input name="room" type="text" id="room"></td>
</tr>
<tr>
<td><div align="right"><font size="2">原畢業學校：</font></div></td>
<td><font size="2">
<input name="school" type="text" id="school" value="<%=rs.fields("school")%>">
</font></td>
<td colspan="2" rowspan="5"><div align="left">
<p><font color="#FF0000" size="2">請資料錄入人員認真錄入學員資訊，以便以</font></p>
<p><font color="#FF0000" size="2">後查詢！</font></p>
</div></td>
</tr>
<tr>
<td><div align="right"><font size="2">聯絡地址：</font></div></td>
<td><font size="2">
<input name="add" type="text" id="add" value="<%=rs.fields("add")%>">
</font></td>
</tr>
<tr>
<td><div align="right"><font size="2">聯絡電話：</font></div></td>
<td><font size="2">
<input name="tel" type="text" id="tel" value="<%=rs.fields("tel")%>">
</font></td>
</tr>
<tr>
<td><div align="right"><font size="2">婚姻狀況：</font></div></td>
<td><select name="mar" id="mar">
<option value="已婚">已婚</option>
<option value="未婚">未婚</option>
</select></td>
</tr>
<tr>
<td><div align="right"><font size="2">籍貫：</font></div></td>
<td><font size="2">
<input name="addr" type="text" id="addr" value="<%=rs.fields("jg")%>">
</font></td>
</tr>
</table>
<table width="75%" border="0">
<tr>
<td><div align="center">
<input type="submit" name="Submit2" value="保 存">
</div></td>
<td><input type="reset" name="Reset" value="重 寫"></td>
</tr>
</table>
<p> </p>
</form>