繁體中文当前位置: 首页 > 图文教程 > 网络编程 > ASP > asp 关键词字符串分割如何实现方法
- ASP
- 17种正则表达式
- 关闭窗口时保存数据的办法
- 一个新的JMail（4.3版本）发送代码
- 一个很简单的验证码程序
- 用正则解析图片地址,并利用XMLHTTP组件将其保存
- 利用ASP+JMAIL进行邮件群发的新思路
- MD5算法研究(2)
- MD5算法研究(1)
- JS判断输入日期的正确性
- 实现搜索结果的关键词变色标注的程序
- LCID地区代码
- IIS6.0下ASP的新增功能
- IIS 5.1和IIS 6.0一些显著的重要区别
- 浅谈如何建立三层体系结构的ASP应用程序
- Windows 2000活动目录详解之安装配置篇
- Windows 2000活动目录详解之结构篇
- Windows 2000活动目录详解之基础篇
- 判断Cookies是否处于开启状态
- 一个仿phplib的模板类
- 在线实时开通WEB及FTP源程序
ASP 中的 asp 关键词字符串分割如何实现方法
出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2009-09-13 浏览: 152 ::
收藏到网摘: n/a
我想做META关键字，比如我的标题显示ASP代码是：<% =objrs("Title")%>
如果<% =objrs("Title")%>最终显示的标题如“字符串分割如何实现？”
我想把字符串按两个汉字分割，如“字符,符串,串分,分割,割如,如何,何实,实现”
那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前面
评论 (0) All
