请教一个VBScript问题

我在运行下面这段代码时

1   
2Sub TwosTotal()   
3Dim j,total   
4For j=2 To 10 Step 2   
5total=total+j   
6Next   
7End Sub   
8MsgBox "总和为："&total&"。"

提示：
Microsoft VBScript 运行时错误错误 '800a0046'

没有权限: 'MsgBox'

/vb/total.asp，行19
请问如何解决？
---------------------------------------------------------------

在```

1必须在

 1标记中才能用msgbox函数。   
 2\---------------------------------------------------------------   
 3  
 4这里你就用reponse.write "总和为："&amp;total&amp;"。"   
 5  
 6\---------------------------------------------------------------   
 7  
 8msgbox只能在客户端使用   
 9asp是服务器段运行的   
10当然没有权限   
11改一下：

Sub TwosTotal()
Dim j,total
For j=2 To 10 Step 2
total=total+j
Next
End Sub
response.write "

1&lt;script language="vbscript"&gt;"   
2response.write "MsgBox '总和为："&amp;total&amp;"。'"   
3response.write "&lt;/script&gt;