【文章內(nèi)容簡介】 第 18 頁 共 40 頁 (sql) Session(userID)=userID Session(userName)=userName Alert(注冊成功 ) () % 學(xué)生登陸系統(tǒng)后的首頁 ! include file= % dim userID dim niandu dim banji dim nianji dim banzhuren dim banzhang dim xuxiweiyuan dim shenghuoweiyuan dim laodongweiyuan dim tuanzhishu dim tiyuweiyuan dim wenyiweiyuan dim banjirenshu dim sql dim rs if(Session(userID))= then Alert(對不起，你的登陸信息有誤，請登錄后進入系統(tǒng) ) Go() else set rs=() userID=Session(userID) banji=Session(banji) 黃山學(xué)院信息工程學(xué)院畢業(yè)設(shè)計文檔 第 19 頁 共 40 頁 nianji=Session(nianji) sql=select * from class where banji=39。amp。 banji amp。39。and nianji=39。amp。 nianji amp。39。 sql,conn,1,1 niandu=rs(1) banjidengji=rs(3) banzhuren=rs(4) banzhang=rs(5) xuexiweiyuan=rs(6) shenghuoweiyuan=rs(7) tuanzhishu=rs(8) laodongweiyuan=rs(9) wenyiweiyuan=rs(10) tiyuweiyuan=rs(11) renshu=rs(12) wenli=rs(15) end if % tr td height=35bgcolor=ff9933div align=center h4當 前 位 置 /h4 /div/td td bgcolor=ff9933div align=center h4班級信息 /h4 /div/td /tr /table table border=1 br br tr align=center valign=middle td width=164 height=83 bgcolor=C24E00年 度 /td td width=203input name=niandu class=Text readonly value=%=niandu%size=15/td td width=172 height=83bgcolor=C24E00年級 /td td width=238input type=text name=banjireadonly value=%=nianji%size=15/td td width=161 height=83 bgcolor=C24E00班級 /td td width=139input type=text name=nianji readonly value=%=banji%size=15/td /tr tr align=center valign=middle td height=86 bgcolor=C24E00班主任 /td 黃山學(xué)院信息工程學(xué)院畢業(yè)設(shè)計文檔 第 20 頁 共 40 頁 tdinput type=text name=banzhuren readonly value=%=banzhuren%size=15/td td height=86 bgcolor=C24E00班長 /td tdinput type=text name=banzhangreadonly value=%=banzhang%size=15/td td height=86bgcolor=C24E00學(xué)習(xí)委員 /td tdinput type=text name=xuexiweiyuanreadonly value=%=xuexiweiyuan%size=15/td /tr tr align=center valign=middle td height=86 bgcolor=C24E00生活委員 /td tdinput type=text name=shenghuoweiyuanreadonly value=%=shenghuoweiyuan%size=15/td td height=86 bgcolor=C24E00團支書 /td tdinput type=text name=tuanzhiwureadonly value=%=tuanzhishu%size=15/td td height=86bgcolor=C24E00勞動委員 /td tdinput type=text name=laodongweiyuanreadonly value=%=laodongweiyuan%size=15/td /tr tr align=center valign=middle td bgcolor=C24E00 height=88文藝委員 /td tdinput type=text name=wenyiweiyuanreadonly value=%=wenyiweiyuan%size=15/td td bgcolor=C24E00height=88體育委員 /td tdinput type=text name=tiyuweiyuanreadonly value=%=tiyuweiyuan%size=15/td td bgcolor=C24E00 height=88班級人數(shù) /td tdinput type=text name=tiyuweiyuanreadonly value=%=renshu%size=15/td /tr 顯示學(xué)生的學(xué)籍信息 黃山學(xué)院信息工程學(xué)院畢業(yè)設(shè)計文檔 第 21 頁 共 40 頁 學(xué)生基本信息單元 班級信息 會考成績單元 黃山學(xué)院信息工程學(xué)院畢業(yè)設(shè)計文檔 第 22 頁 共 40 頁 團員信息單元 %@LANGUAGE=VBSCRIPT CODEPAGE=936% !include file= % dim userID dim sql dim rs if(Session(userID))= then Alert(對不起，你的登陸信息有誤，請登錄后進入系統(tǒng) ) Go() else set rs=() userID=Session(userID) sql=select * from mainxueji where zhongkaobaomingxuhao=39。amp。 userID amp。39。 //查詢學(xué)籍表 sql,conn,1,1 end if % % 39。獲取部門記錄 set rs_chengxin=() sql_chengxin=select * from list_chengxing where xingming_id=amp。userIDamp。 order by id asc sql_chengxin,conn,1,2% % do while not % tr td align=center bgcolor=F1FCFA /td td align=center bgcolor=F1FCFAspan class=STYLE22%=rs_chengxin(chengxing_jiluren)%/span/td td align=center bgcolor=F1FCFAspan class=STYLE22%=rs_chengxin(chengxing_jilubumen)%/span/td td align=center bgcolor=F1FCFAspan class=STYLE22%=rs_chengxin(chengxing_jilushijian)%/span/td td align=center bgcolor=F1FCFAspan 黃山學(xué)院信息工程學(xué)院畢業(yè)設(shè)計文檔 第 23 頁 共 40 頁 class=STYLE22%=rs_chengxin(chengxing_xingzhi_big)%/spanspan class=STYLE22 %if rs_chengxin(chengxing_xingzhi_small)then ： %%=rs_chengxin(chengxing_xingzhi_small)%/span/td td align=center bgcolor=F1FCFAspan class=STYLE22%=rs_chengxin(chengxing_miaoshu)%/span/td /tr % loop % 課程表 模塊 顯示學(xué)生的課程表信息 ! include file= % dim banjihao dim rs1 dim rs dim sql set rs1=() userID=Session(userID) banji=Session(banji) nianji=Session(nianji) sql=select banjihao from class where banji=39。amp。 banji amp。39。and nianji=39。amp。 nianji amp。39。 sql,conn,1,1 banjihao=rs1(banjihao) set rs=() sql=select * from schedule 黃山學(xué)院信息工程學(xué)院畢業(yè)設(shè)計文檔 第 24 頁 共 40 頁 sql=sql+where kebiao_id=39。amp。 banjihao amp。39。 sql,conn,1,1 % table width=1046 height=144 border=5 cellpadding=10 cellspacing=2 tr td height=41 colspan=8 h1 align=center%=rs(kebiaomingcheng)%/h1/td /tr tr td height=41h3span class=STYLE1星期 /span/h3/td td height=41h3span class=STYLE1第一節(jié) /span/h3/td td height=41h3span class=STYLE1第二節(jié) /span/h3/td td height=41h3span class=STYLE1第三節(jié) /span/h3/td td height=41h3span class=STYLE1第四節(jié) /span/h3/td td