1   Dim m As String = """""飞!"
2        m = m.Replace("""""\""")
3        s.Append("""<font color=\""blue\"">" & m & "</font>""+")
4        s.Append("""<font color='blue'>" & m & "</font>""+")
5        s.Append("""""")
6        j.Append("draw365keyList(" & s.ToString() & ");")
7        j.Append("function draw365keyList(s){ document.write(s); }")
1<!--
2<%=j%>
3//-->
posted on 2005-06-07 23:33  T_98Dsky   阅读(1154)  评论(0编辑  收藏  举报