最新国产好看的视频,伊人天堂AV在线,国产Aaaaaa视频,蜜臀视频在线观看一区,人妻av色图,密臀久久久精品影片,青青视频免费观看毛片,久草在线观看视,国产三级精品色情在线

asp 關(guān)鍵詞字符串分割如何實現(xiàn)方法

 更新時間:2007年11月23日 21:59:13   作者:  

我想做META關(guān)鍵字,比如我的標(biāo)題顯示ASP代碼是:<% =objrs("Title")%>
如果<% =objrs("Title")%>最終顯示的標(biāo)題如“字符串分割如何實現(xiàn)?”
我想把字符串按兩個漢字分割,如“字符,符串,串分,分割,割如,如何,何實,實現(xiàn)”
那ASP代碼如何寫?
非常感謝。

復(fù)制代碼 代碼如下:

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

復(fù)制代碼 代碼如下:

<%
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>沒有此數(shù)據(jù)</center>"
else
%>

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

加在META前面

相關(guān)文章

最新評論

南江县| 会东县| 确山县| 高平市| 内黄县| 林州市| 南乐县| 镇平县| 庆云县| 郁南县| 绵阳市| 余庆县| 香格里拉县| 台北市| 类乌齐县| 塔河县| 怀集县| 阳江市| 晋江市| 谢通门县| 灵寿县| 五指山市| 吉水县| 克什克腾旗| 土默特右旗| 伊川县| 城步| 揭西县| 德安县| 阿克陶县| 东乡族自治县| 疏勒县| 马尔康县| 江城| 金溪县| 嘉黎县| 苏州市| 茂名市| 马边| 布拖县| 泽普县|