asp 关键词字符串分割如何实现方法

dim i, title
title = objrs("Title")
for i = 0 to len(Title") step 2
    response.write mid(title, i, 2) & ","
next

<%
dim objRs,strSql
Set objRs=Server.CreateObject("ADODB.RecordSet")
strSql="select Title,Content from Table"
objRs.Open strSql,strConn,1,3
if objRs.Eof then
  response.write "<center>没有此数据</center>"
else
%>

<%
dim i, title
title = objrs("Title")
for i = 1 to len(Title")-2
    response.write mid(title, i, 2) & ","  '这里只是个示范输出,你要自己把他赋值到META变量啊 汗
next
%>

加在META前面