学生成绩管理系统Word文档格式.docx

学生成绩管理系统Word文档格式.docx

《学生成绩管理系统Word文档格式.docx》由会员分享，可在线阅读，更多相关《学生成绩管理系统Word文档格式.docx（32页珍藏版）》请在冰豆网上搜索。

scriptlanguage="

JavaScript"

//嵌入JavaScript脚本语言

<

--

functiontest（）//用于判断输入的字符是否为数值型

{if（document.form2.page.value=="

||isNaN（document.form2.page.value））{alert（"

输入页数必须为数值型"

）;

document.form2.page.focus（）;

returnfalse;

}

returntrue;

//-->

/script>

script>

functiondel（）//用于判断记录有没有选中的函数

{varflag=true;

vartemp="

;

vartmp;

if（（document.form1.answer.length+"

）=="

undefined"

）{tmp=1}else{tmp=document.form1.answer.length}

if（tmp==1）{

if（document.form1.answer.checked）{

flag=false;

temp=document.form1.answer.value}}else{for（i=0;

i<

document.form1.answer.length;

i++）{

if（document.form1.answer[i].checked）{

if（temp=="

）

{flag=false;

temp=document.form1.answer[i].value

}else{flag=false;

temp=temp+"

"

+document.form1.answer[i].value}}}}

if（flag）{alert（"

对不起，你还没有选择！

）}

else

{name=document.form1.name.value

//alert（name）

if（confirm（"

确实要删除？

））{

window.location="

delnews.asp?

id="

+temp;

}}

return!

flag;

styletype="

text/css"

@importurl（"

20051026_stry_css.css"

a{font-size:

12px;

tr{font-size:

.style1{font-size:

24px}

/style>

/head>

body>

scriptlanguage=Javascript>

functioncheckall（all）//用于判断全选记录的函数

{vara=document.getElementsByName（"

answer"

for（vari=0;

i<

a.length;

i++）a[i].checked=all.checked;

tablewidth="

760"

border="

0"

align="

center"

cellpadding="

cellspacing="

bgcolor="

FDFEF9"

tr>

tdvalign='

top'

conn1.asp"

%

page=CLng（request（"

page"

））'

利用CLng函数把page值转换为Long型

judge=request（"

judge"

judge2=request（"

judge2"

judge3=0

sqlcmd="

select*frombbs1OrderByxhDesc"

rs.Opensqlcmd,newconn,1,2

%>

formmethod="

POST"

id=form1name=form1>

818"

border='

1'

cellpadding='

0'

cellspacing='

bordercolor="

#CCCCCC"

id=TabDocMain>

tdwidth="

44"

height="

20"

align=center>

删除框<

/td>

124"

班级<

110"

学号<

89"

姓名<

97"

课程<

69"

成绩<

学期<

86"

类型<

74"

操作<

/tr>

%

ifnot（rs.EOForrs.BOF）then

rs.MoveFirst

rs.PageSize=12'

每页显示的条数

Ifpage<

1Thenpage=1

Ifpage>

rs.PageCountThenpage=rs.PageCount

rs.AbsolutePage=page

Foripage=1Tors.PageSize

%>

tdheight="

align=centerwidth="

inputtype="

checkbox"

name="

value="

%=rs（"

id"

）%>

id="

Checkbox1"

align=leftwidth="

bj"

xh"

user"

kc"

cj"

xq"

lx"

ahref="

update.asp?

id=<

修改<

/a>

%rs.MoveNext

Ifrs.EOFThenExitFor

Next%>

colspan="

12"

&

nbsp;

chkall"

on"

onClick="

checkall（this）"

Checkbox2"

//选中所有记录

button"

btnDelete"

删除"

style='

font-family:

宋体;

font-size:

9pt;

'

del（）"

Button1"

/table>

/form>

tableborder="

width="

815"

formonSubmit="

returntest（）;

method="

get"

action="

admin.asp"

id=form2name=form2>

151"

>

页数：

%Response.Write"

inputtype=textsize=2maxlength=4name=pageclass=editbox1>

inputtype=hiddenname=judgevalue=1>

'

显示输入页数框并将page,judge参数传递下去%>

664"

Ifpage=1Then

Response.Write"

fontclass='

white'

第一页　上一页<

/font>

EndIf

Ifpage<

1Then

ahref=admin.asp?

page=1class='

yellow'

第一页<

　<

page="

（page-1）&

"

class='

上一页<

RS.PageCountThen

（page+1）&

下一页<

RS.PageCount&

最后一页<

EndIf

Ifpage=RS.PageCountThen

下一页　最后一页<

tdclass="

white"

2"

　记录总数：

%=rs.recordCount%>

　总页数：

%=rs.PageCount%>

　当前页次：

%=page%>

810"

td>

%else%>

align=centercellpadding="

td>

对不起，还没有记录！

%endif%>

p>

&

/p>

429"

26"

59"

index.asp"

首页<

88"

add.asp"

target="

_parent"

添加单个成绩<

99"

adds.asp"

批量添加成绩<

96"

re.asp"

通过搜索并修改<

fontcolor="

#0000CC"

64"

javascript:

window.close（）"

退出<

setrs=server.createobject（"

adodb.recordset"

sql="

select*frombbs1orderbyxhdesc"

rs.opensql,conn,1,3

/body>

/html>

%else

Response.Redirect"

admpost.asp"

endif%>

单量添加成绩代码如下

20041026_25175_stry_css.css"

300"

478"

valign='

279"

divalign=center>

formname="

form1"

post"

addnew.asp"

178"

tdalign="

right"

90"

divalign="

class="

style1"

/div>

200"

inputname="

type="

text"

学期<

selectname="

option>

第一学期<

/option>

第二学期<

第三学期<

第四学期<

第五学期<

第六学期<

第七学期<

第八学期<

/select>

考试课<

考查课<

45"

submit"

Submit"

添加"

reset"

Submit2"

重置"

410"

21"

91"

109"

管理总界面<

52"

批量添加成绩代码如下

--

841"

spanclass="

style2"

style3"

*<

/span>

学号栏必须全部填满<

782"

24"

108"

103"

106"

83"

82"

164"

al