下面是一个使用CSS对文字显示特性进行控制的HTML文件，要求：1，整个文件采用gb2312字符集；2，h1标记采用 宋体；3，span标记字体为20pt 红字。请将相应代码填写完整。 ＜html＞
＜Title＞CSS示例＜/Title＞
＜meta http-equiv = \＞ ＜style type = \＞ h1{font-family:\
.text{__(3)__:20pt;color:__(4)__} ＜/style＞ ＜body＞
＜h1＞这是一个CSS示例。＜/h1＞
＜span class=\＞这段文字应该是红字，字体为20pt。＜/span＞ ＜/body＞ ＜/html＞ 答案:
1，gb2312
2，宋体
3，font-size
4，red
5，text
下列ASP程序根据名为MyComponent的组件创建一个名为MyApp的Application变量，并且检测客户端主机的IP，如果IP为202.113.168.1，则将该变量值置为1。请将程序填写完整。 ＜%
Set ___(1)___ = Server.___(2)___(\
___(3)___ '禁止其他用户修改MyApp属性 If ___(4)___ = \ Application(\ End If
___(5)___ '允许其他用户修改MyApp属性 %＞ 答案:
1，Application(\2，CreateObject
3，Request.ServerVariables(\4，Application.Lock 5，Application.Unlock
数据库中存在works_on{dept,emp_no}、employee{emp_no,sex,name}、salary{emp_no,grade,salaries}三个表，它们通过emp_no字段相互关联。 请按下列要求写出相应SQL。
a,挑出部门(dept)为\，姓名(name)姓\张\的所有男职员的name和emp_no信息。(职员性别用sex字段表示，其中M表示男职员，F表示女职员)； b,将姓名为\李三\的员工的级别(grade)调整为3；
c,挑出级别(grade)为1，薪水(salaries)排名为前三位的职员的emp_no,name,dept信息。 答案:
1，SELECT name, b.emp_no FROM works_on a, employee b WHERE a.emp_no = b.emp_no AND a.dept = \张%\
2，UPDATE salary SET grade = 3 WHERE emp_no IN (SELECT emp_no from employee where name = \李三\
3，SELECT a.emp_no, name, dept FROM employee a, works_on b WHERE a.emp_no = b.emp_no AND a.emp_no in (SELECT TOP 3 emp_no from salary where grade = 1 ORDER BY salaries DESC)
下面这段ASP程序用于打开MyDB数据源，并执行名为Upd_Students的存储过程，请将程序填写完整。 ＜%
Set Conn = Server.CreateObject(\ Set Cmmd = Server.CreateObject(\ Conn.Open \
Set Cmmd.___(3)___ = Conn Cmmd.CommandType = adCMDText Cmmd.CommandText = \ Cmmd.___(5)___ '执行存储过程 Conn.Close %＞ 答案:
1，ADODB.Connection
2，ADODB.Command
3，ActiveConnection
4，Upd_Students
5，Execute
在下列JavaScript程序中，单击p1标记分别获得父节点和右兄弟节点，并输出它们的标记名，请将程序填写完整。 ＜html＞
＜Title＞DOM示例 ＜/Title＞
＜script language = \＞ function GetNodeInfo() { var str;
str = \父节点是: \
str += \右兄弟节点是: \ p2.innerHTML = str; }
function GetParentNode() { var pnode = __(3)__; return pnode.nodeName; }
function GetRigtSiblingNode() { var rnode = __(4)__; return rnode.nodeName; } ＜/script＞ ＜body＞
＜p id = \＞点击这里将获得p1的父节点和右兄弟节点，并输出它们的名字到p2中 ＜/p＞
＜span id = \＞ ＜/span＞ ＜/body＞ ＜/html＞ 答案:
1，GetParentNode()
2，GetRigtSiblingNode()
3，p1.parentNode
4，p1.nextSibling
5，onclick
写一个简单的HTML页面，要求：1， 网页标题为：HTML Sample
2， 页面显示内容为：Hello,HTML 3， 页面内容应置中；
4， 建立一个图像链接，插入当前目录下一幅名为Libray.gif的图片，链接指向地址为http://www.sohu.com； 答案:
Hello,HTML
编写函数，用于过滤一个数组arrNum内重复的元素，并用原数组内的非重复元素重新产生一个新数组arrNewNum并输出其值，输出结果应为：6 8 5 11 ＜script type=\＞
var arrNum=[1,4,1,1,1,3,3,4,6,7,8,7,5,11,22,22]; var arrNewNum = new ______(1)________; var bRepeate;
for(var i=0;i＜arrNum.length;i++){ ______(2)________;
for(var j=0;j＜______(3)______;j++){ if(i!=j && arrNum[i]==arrNum[j]){ bRepeate=true; } }
if(!bRepeate){
arrNewNum[arrNewNum.length] = ______(4)________; }; }
for(var i in arrNewNum) {
document.write(______(5)______ + \}
＜/script＞ 答案: 1，Array()
2，bRepeate = false 3，arrNum.length 4，arrNum[i] 5，arrNewNum[i]
下面程序利用Cookies来记录客户的访问次数，如果客户第一次访问设置为1，否则在原来的次数上加1，并将名为Number的Cookie的有效期设置为2015-12-31。请将相应代码填写完整。 ＜% Response.Buffer=True %＞
＜html＞ ＜body＞ ＜%
Dim varNumber
varNumber=___(1)___(\读取Cookies值 if varNumber=\
varNumber=1 '如果是第一次，则令访问次数为1 Else
___(2)___ End If
Response.Write \您是第\次访问本站\
___(3)___ '将新的访问次数存到Cookies中 ___(4)___=#___(5)___# '设置有效期 %＞
＜/body＞ ＜/html＞ 答案:
1，Request.Cookies
2，varNumber=varNumber+1
3，Response.Cookies(\4，Response.Cookies(\5，2015-12-31
下面JavaScript函数用来输出当前时间，输出格式为24小时制，例如09:12:01，并且要求每隔一秒刷新一次时间。请将相应代码填写完整。 ＜html＞
＜Title＞JavaScript Timer＜/Title＞ ＜script type=\＞ function aClock() {
var now = ______(1)________; var hour = now.getHours(); var min = now.getMinutes(); var sec = now.getSeconds(); var timeStr = \
timeStr += ((min ＜ 10) ? \ timeStr += ((sec ＜ 10) ? \
document.clock_form.clock_text.value = ______(2)________; clockId = ______(3)_______('aClock()', 1000); }
＜/script＞
＜body onload = \＞ ＜form name = \＞
当前时间是：＜input type = \＞ ＜/form＞ ＜/body＞ ＜/html＞ 答案:
1，new Date() 2，timeStr 3，setTimeout
4，aClock() 5，clock_text
下面ASP程序用来处理CreditCard和Shipping表，如果当日是星期天（非交易日），则取消事务操作。假设数据源名字为\请将代码填写完整。 ＜%
Set Conn = Server.CreateObject(\ Conn.Open \ ___(2)___ '开始事务处理
Conn.Execute \
Conn.Execute \＋ 1 WHERE ID = '1000001'\ IF ___(3)___(WeekDay(Date)) = \ ___(4)___ ELSE
___(5)___ '提交事务操作 END IF Conn.Close %＞ 答案:
1，ADODB.Connection 2，Conn.BeginTrans 3，WeekDayName
4，Conn.RollBackTrans 5，Conn.CommitTrans
下面这段程序，打开本文件夹下的文本文件test.txt，并读取其中所有的内容显示在页面上，请填写其中的空格。 ＜%
Dim fso
Set fso=___(1)___(\ Dim TextFile
Set TextFile= fso.___(2)___(Server.___(3)___(\ Do While Not TextFile.AtEndOfStream
Response.Write TextFile.ReadLine Response.Write \\ ___(4)___ '结束循环
___(5)___ '关闭文件，并释放资源 %＞ 答案:
1，Server.CreateObject
2，OpenTextFile
3，MapPath
4，Loop
5，TextFile.close