前言：本站為你精心整理了ASP制作學生檔案管理系統(tǒng)范文，希望能為你的創(chuàng)作提供參考價值，我們的客服老師可以幫助你提供個性化的參考范文，歡迎咨詢。

asp制作學生檔案管理系統(tǒng)

時間：2004-04-15作者：陳慶平安徽新華電腦學校

摘要：本系統(tǒng)是根據(jù)現(xiàn)代化校園的發(fā)展而設(shè)計的基于ASP的學生檔案管理系統(tǒng)，本系統(tǒng)可以方便老師、家長來學校查找學生。實現(xiàn)全校學生信息在線查詢。還可以對新來的學員信息進行信息錄入。由于學員上課情況復雜，可以實現(xiàn)信息修改，及時調(diào)整學員的基本情況。

關(guān)鍵字ASP在線查詢信息錄入信息修改

一、制作數(shù)據(jù)庫和建立數(shù)據(jù)源

1、利用MicrosoftAccess制作數(shù)據(jù)庫，取名為information,然后制作表，表名為infor.下面寫入數(shù)據(jù)字段。如圖所示：

2、建立ODBC數(shù)據(jù)源（在2000professional系統(tǒng)中建立）

步驟：

控制面板à管理工具àODBC數(shù)據(jù)源à系統(tǒng)DSNàAdd….

ODBC界面

二、系統(tǒng)界面

一個好的系統(tǒng)需要一個友好的用戶界面。由于本系統(tǒng)是基于ASP開發(fā)的，所以，我們利用網(wǎng)頁制作工具制作友好的用戶界面。部分界面如圖所示：

進入界面

信息錄入界面

信息查詢

三、程序?qū)崿F(xiàn)

由于本系統(tǒng)是基于ASP開發(fā)的實現(xiàn)在線操作的系統(tǒng)。所以，本系統(tǒng)的完成需要借助HTML，又由于HTML是網(wǎng)頁編程的基礎(chǔ)，所以，在這里就省去HTML代碼，相信大家都是HTML高手。公務(wù)員之家版權(quán)所有

1、信息錄入

<%

dimstrsql,rs

setconn=createobject("ADODB.connection")//建立ADODB連接

conn.open("DSN=information;UID=;PWD=;")//打開數(shù)據(jù)源information

setrs=createobject("ADODB.Recordset")//建立記錄對象rs

rs.open"infor",conn,3,3//打開數(shù)據(jù)庫里的infor表

rs.Addnew//添加一條新的記錄

rs("name").value=request.form("name")/*取得表單名為name里的內(nèi)容“送”

到數(shù)據(jù)庫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//保存數(shù)據(jù)庫里的記錄

Response.Write("你已經(jīng)成功注冊的這位學員的信息。請繼續(xù)<ahref='http://'''input.htm''''>注冊</a>")//顯示提示信息

rs.close//關(guān)閉數(shù)據(jù)記錄

conn.close//關(guān)閉連接

setrs=nothing

setconn=nothing

%>

2、信息查詢

<%

dimstrsql,conn,rs

setconn=server.createobject("ADODB.connection")

conn.open("DSN=information;UID=;PWD=;")

setrs=server.createobject("ADODB.Recordset")

strsql="select*frominforwherename=''''"&request("name")&"''''"http://利用SQL建立查詢

rs.openstrsql,conn

%>

<tablewidth="1205"border="1"align="left"bordercolor="#6600CC">

<tr>//本行寫上要顯示的字段的相應(yīng)的中文名

<tdwidth="69"><divalign="center"><fontsize="2">姓名</font></div></td>

<tdwidth="46"><divalign="center"><fontsize="2">性別</font></div></td>

<tdwidth="122"><divalign="center"><fontsize="2">出生年</font></div></td>

<tdwidth="46"><divalign="center"><fontsize="2">學歷</font></div></td>

<tdwidth="91"><divalign="center"><fontsize="2">政治面貌</font></div></td>

<tdwidth="91"><divalign="center"><fontsize="2">專業(yè)</font></div></td>

<tdwidth="50"><divalign="center"><fontsize="2">班級</font></div></td>

<tdwidth="69"><divalign="center"><fontsize="2">班主任</font></div></td>

<tdwidth="122"><divalign="center"><fontsize="2">入學時間</font></div></td>

<tdwidth="146"><divalign="center"><fontsize="2">聯(lián)系電話</font></div></td>

<tdwidth="337"><divalign="center"><fontsize="2">聯(lián)系地址</font></div></td>

</tr>

<%whileNotrs.eof%>//循環(huán)語句控制符合條件的記錄輸出

<tr>//本行根據(jù)循環(huán)條件可以重復輸出

<td><divalign="center"><fontsize="2"><%=rs("name")%></font></div></td>

/*輸出數(shù)據(jù)庫中符合條件的name字段的值*/

<td><divalign="center"><fontsize="2"><%=rs("sex")%></font></div></td>

<td><divalign="center"><fontsize="2"><%=rs("birth")%></font></div></td>

<td><divalign="center"><fontsize="2"><%=rs("xl")%></font></div></td>

<td><divalign="center"><fontsize="2"><%=rs("zzmm")%></font></div></td>

<td><divalign="center"><fontsize="2"><%=rs("career")%></font></div></td>

<td><divalign="center"><fontsize="2"><%=rs("class")%></font></div></td>

<td><divalign="center"><fontsize="2"><%=rs("teach")%></font></div></td>

<td><divalign="center"><fontsize="2"><%=rs("date")%></font></div></td>

<td><divalign="center"><fontsize="2"><%=rs("tel")%></font></div></td>

<td><divalign="center"><fontsize="2"><%=rs("add")%></font></div></td></tr>

<%rs.movenext

Wend

rs.close

conn.close

%>

</table>

3、信息修改

<%

setconn=server.createobject("adodb.connection")

conn.open"DSN=information;UID=;PWD=;"

setrs=server.CreateObject("adodb.recordset")

username=request("name")//取得name表單的值賦給username

strsql="select*frominforwherename=''''"&username&"''''"http://建立SQL查詢

rs.openstrsql,conn,3,3

%>

<formaction="zhuce.asp"method="post">

//以POST方式將修改的記錄通過zhuce.asp頁面的程序保存到數(shù)據(jù)庫當中

<tablewidth="75%"border="1"align="center"bordercolor="#663399">

<tr>

<tdwidth="18%"><divalign="right"><fontsize="2">姓名：</font></div></td>

<tdwidth="36%"><fontsize="2">

<inputname="name"type="text"id="name"value="<%=rs.fields("name")%>">

</font></td>//顯示符合查詢條件的數(shù)據(jù)庫當中name字段的值，供修改

<tdwidth="15%"><divalign="right"><fontsize="2">入學時間：</font></div></td>

<tdwidth="31%"><inputname="time"type="text"id="time"value="<%=rs.fields("date")%>"></td>

</tr>

<tr>

<tdheight="20"><divalign="right"><fontsize="2">性別：</font></div></td>

<td><p>

<label>

<inputname="sex"type="radio"value="<%=rs.fields("sex")%>"checked>

男</label>

<label>

<inputtype="radio"name="sex"value="<%=rs.fields("sex")%>">

女</label>

<br>

</p></td>

<td><divalign="right"><fontsize="2">專業(yè)：</font></div></td>

<td><inputname="career"type="text"id="career"value="<%=rs.fields("career")%>"></td>

</tr>

<tr>

<td><divalign="right"><fontsize="2">出生年月：</font></div></td>

<td><fontsize="2">

<inputname="birthday"type="text"id="birthday"value="<%=rs.fields("birth")%>">

</font></td>

<td><divalign="right"><fontsize="2">班級：</font></div></td>

<td><inputname="class"type="text"id="class"value="<%=rs.fields("class")%>"></td>

</tr>

<tr>

<td><divalign="right"><fontsize="2">政治面貌：</font></div></td>

<td><selectname="zz"id="zz">

<optionvalue="團員">團員</option>

<optionvalue="黨員">黨員</option>

<optionvalue="其他">其他</option>

</select></td>

<td><divalign="right"><fontsize="2">班主任：</font></div></td>

<td><inputname="teach"type="text"id="teach"value="<%=rs.fields("teach")%>"></td>

</tr>

<tr>

<td><divalign="right"><fontsize="2">學歷：</font></div></td>

<td><fontsize="2">

<selectname="xl"id="xl">

<optionvalue="初中">初中</option>

<optionvalue="高中">高中</option>

<optionvalue="大專">大專</option>

<optionvalue="本科">本科</option>

<optionvalue="研究生">研究生</option>

<optionvalue="其他">其他</option>

</select>

</font></td>

<td><divalign="right"><fontsize="2">教室：</font></div></td>

<td><inputname="room"type="text"id="room"></td>

</tr>

<tr>

<td><divalign="right"><fontsize="2">原畢業(yè)學校：</font></div></td>

<td><fontsize="2">

<inputname="school"type="text"id="school"value="<%=rs.fields("school")%>">

</font></td>

<tdcolspan="2"rowspan="5"><divalign="left">

<p><fontcolor="#FF0000"size="2">請數(shù)據(jù)錄入人員認真錄入學員信息，以便以</font></p>

<p><fontcolor="#FF0000"size="2">后查詢！</font></p>

</div></td>

</tr>

<tr>

<td><divalign="right"><fontsize="2">聯(lián)系地址：</font></div></td>

<td><fontsize="2">

<inputname="add"type="text"id="add"value="<%=rs.fields("add")%>">

</font></td>

</tr>

<tr>

<td><divalign="right"><fontsize="2">聯(lián)系電話：</font></div></td>

<td><fontsize="2">

<inputname="tel"type="text"id="tel"value="<%=rs.fields("tel")%>">

</font></td>

</tr>

<tr>

<td><divalign="right"><fontsize="2">婚姻狀況：</font></div></td>

<td><selectname="mar"id="mar">

<optionvalue="已婚">已婚</option>

<optionvalue="未婚">未婚</option>

</select></td>

</tr>

<tr>

<td><divalign="right"><fontsize="2">籍貫：</font></div></td>

<td><fontsize="2">

<inputname="addr"type="text"id="addr"value="<%=rs.fields("jg")%>">

</font></td>

</tr>

</table>

<tablewidth="75%"border="0">

<tr>

<td><divalign="center">

<inputtype="submit"name="Submit2"value="保存">

</div></td>

<td><inputtype="reset"name="Reset"value="重寫"></td>

</tr>

</table>

<p></p>

</form>