色99999亚洲,亚洲欧美成人一区二区,亚洲制服国产中文字幕

導(dǎo)語(yǔ)：ASP制作學(xué)生檔案管理系統(tǒng)一文來源于網(wǎng)友上傳，不代表本站觀點(diǎn)，若需要原創(chuàng)文章可咨詢客服老師，歡迎參考。

時(shí)間：2004-04-15作者：陳慶平安徽新華電腦學(xué)校

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

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

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

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

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

步驟：

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

ODBC界面

二、系統(tǒng)界面

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

進(jìn)入界面

信息錄入界面

信息查詢

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

由于本系統(tǒng)是基于ASP開發(fā)的實(shí)現(xiàn)在線操作的系統(tǒng)。所以，本系統(tǒng)的完成需要借助HTML，又由于HTML是網(wǎng)頁(yè)編程的基礎(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")//建立記錄對(duì)象rs

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

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

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

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

Response.Write("你已經(jīng)成功注冊(cè)的這位學(xué)員的信息。請(qǐng)繼續(xù)<ahref='http://'''input.htm''''>注冊(cè)</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">學(xué)歷</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">班級(jí)</font></div></td>

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

<tdwidth="122"><divalign="center"><fontsize="2">入學(xué)時(shí)間</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)語(yǔ)句控制符合條件的記錄輸出

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

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

<%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頁(yè)面的程序保存到數(shù)據(jù)庫(kù)當(dāng)中

<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ù)庫(kù)當(dāng)中name字段的值，供修改

<tdwidth="15%"><divalign="right"><fontsize="2">入學(xué)時(shí)間：</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>

</tr>

<tr>

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

</font></td>

</tr>

<tr>

<optionvalue="團(tuán)員">團(tuán)員</option>

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

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

</select></td>

</tr>

<tr>

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

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

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

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

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

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

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

</select>

</font></td>

</tr>

<tr>

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

</font></td>

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

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

</div></td>

</tr>

<tr>

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

</font></td>

</tr>

<tr>

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

</font></td>

</tr>

<tr>

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

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

</select></td>

</tr>

<tr>

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

</font></td>

</tr>

</table>

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

<tr>

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

</div></td>

</tr>

</table>

<p></p>

</form>

ASP制作學(xué)生檔案管理系統(tǒng)

熱門標(biāo)簽

精品范文