阅读下列说明，回答问题1至问题3，将解答填入答题纸的对应栏内。

【说明】

某论坛的首页及留言页面如图5-1、图5-2所示。

【问题1】 (6分)

请根据图5-1和图5-2补充完成下面留言页面代码：

……

＜TABLE width="100%" border=0 cellPadding=5 cellSpacing=0＞

＜form. name="frmguestbook" method=post (1) ="leavemessage.asp" nSubmit="return

checkGuestBook() "＞

＜tr＞

＜td height=30 align=right class="border_t_1_r_01"＞留言类型：＜/td＞

＜td colspan="3" class="border_t_r_01"＞＜ (2) name="InfoType"＞

＜option value="0" (3) ＞请选择留言类型＜/option＞

＜option value='1'＞网管咨询＜/option＞＜option value='2'＞意见建议＜/option＞＜option

value='12'＞其他＜/option＞

＜/select＞ ＜font color=red＞*＜font＞＜/td＞

＜/tr＞

＜tr＞

＜td height=30 align=right class="borde_t_1_r_01"＞留言主题：＜/td＞

＜td colspan="3" class=" border_t_1_r_01"＞ ＜INPUT type=" (4) ”style="WIDTH: 515px"

maxLength="60" name="Topic" value=""＞＜font color=red＞*＜／font＞＜/td＞

＜/tr＞

＜tr＞

＜td height=30 align=right class="border_t_1_r_01"＞留言内容：＜br＞＜font color=red＞限500

汉字内＜/font＞＜/td＞

＜td colspan="3" class=" border_t_r_01"＞＜ (5)name="Content" class=input_01

style="height:60px;WIDTH:515px"＞＜／textarea＞ ＜font color=red＞*＜／font＞

＜! --br＞＜div style="width:520px"＞＜／div--＞＜/td＞

＜/tr＞

……

＜tr＞

＜td height=30 align=middle class="border_t_b_1_r_01"＞; ＜/td＞

＜td colspan="3" align=lefi class="border_t_b_r_01"＞＜input type=submit value="填好了，现在就提交留言！ "name="submit"＞

＜/tr＞

(6)

＜/table＞

空(1)～(6)备选答案：

A．textarea

B．＜/form＞

C．select

D．selected

E．action

F．text

【问题2】 (5分)

在留言页面中，为保证系统运行的效率，添加了脚本程序对用户输入的留言信息进行验证，当用户输入信息不符合要求时，弹出相应窗口提示用户。补充完成下面验证部分的代码。

＜script. language=javascript＞

function(7)

{

……

if (strlength(Jtrim(document.frmguestbook.Topic. (8) ))＞ (9) ) {

window.(10) （"留言主题不得超过30汉字或60字符！"）；

document. frmguestbook.Topic.focus();

return (11)

}

……

}

return true

}

＜/script＞

【问题3】（4分）

在论坛首页中有访客计数器，访客计数存放在系统coun文件夹的counter.txt中，请补充完成下面计数器的部分代码。

……

＜%

dim visitors

(12) =server.mappath(" coun/counter.txt")

set fs= (13) .createobject("Scripting.FileSystemObject")

set thisfile=fs.opentextfile(whichfile)

visitors=thisfile. (14)

thisfile.close

countlen=len(visitors)

for i=1 to 5-countlen

response.write "＜img src=counter/0.gif＞"

next

for i=1 to countlen

response.write "＜img src=counter/"& mid(visitors,i,1)&".gif＞＜/img＞"

next

visitors= (15) +1

set ut=fs.createtextfile(whichfile)

out.writeline(visitors)

out.close

set fs=nothing

%＞

……

空(12)～(15)备选答案：

A． counter

B．server

C．request

D．whichfile

E．readline

F．visitors