Response.Write 怎样修改字体

我想修改这段代码：

Response.write "您当前的IP是："
Response.write ReqIP()
Response.write "  来自："
Response.write Look_Ip(Format_Ip(ReqIP()))
Response.write "<br>"
Response.write "<br>"
if TRIM(request("IpValue"))="" then
Response.write "<br>"
else
IP=TRIM(request("IpValue"))
t1=Timer*1000

Dim regEx, Match, thePattern, theIP
theIP = TRIM(request("IpValue"))
thePattern = "^(([0-2]{0,1}\d{1,2})\.){3}([0-2]{0,1}\d{1,2})$"
Set regEx = New RegExp
regEx.Pattern = thePattern
regEx.IgnoreCase = True
Set Match = regEx.Execute(theIP)
If Match.Count Then
response.write "您查询的IP是："&ip&"  来自："&Look_Ip(Format_Ip(IP))&"（耗时："&(Timer*1000-t1)&"ms）"
Else

运行后字体各项属性显示为：【<center><span style=&quo

response.write response.write语句出错 response.write选择性输出 Response.Write问题 response.write不能输出... 请指教response.write response.write 书写 response.write用处啊 response.write问题? ASP RESPONSE.WRITE小问题