asp 按照字数 分割文本内容！

求救 asp 按照字数 分割文本内容！！！！！
如：a="全球最大的中文社区"
想把这个文本内容 按照3个字一份段原则分割内容。
分完形式如：
a1=全球最
a2=大的中
a3=文社区

请问这样的asp代码改怎么实现呢!
------解决方案--------------------

<%

a = "全球最大的中文社区"

n = 1

For i = 1 To Len(a) STEP 3

	s = "a" & n & "=""" & Mid(a, i, 3) & """"

	ExecuteGlobal s

    n = n + 1

Next



For i = 1 To n-1

	Response.Write Eval("a" & i)

Next



%>

------解决方案--------------------

'注意：逗号作为分隔符的前提是逗号在字串里不存在。

a = "全球最大的中文社区"

a1 = ""

For i = 1 To Len(a) STEP 3

	if a1 <> "" then

		a1 = a1 & ","

	end if

    a1 = a1 & Mid(a, i, 3)

Next



ar = split(a1, ",")