当前位置: 首页 > 图文教程 > 网络编程 > ASP > asp 关键词字符串分割如何实现方法

ASP
asp调用存储过程
利用批处理文件和 vbs 脚本实现网站视频自动录制
ASP、vbscript编码模板
FileSystem对象常用的文件操作函数有哪些?
asp显示日历效果
sql语句的一些集合
ASP语法注释
函数名称 函数功能
万能数据库连接程序
记录集内随机取记录的代码
分页代码
如何在数据库中用好Transaction?
用Command对象和RecordSet对象向数据库增加记录哪一个更好
为什么在存储过程中用OLEDB方式不能返回记录集
如何查询日期类型的数据?
ASP如何获取真实IP地址
两种小偷程序的比较
使用xmlHttp结合ASP实现网页的异步调用
用ASP开"多线程"
整理了一个editplus的剪辑文件(ASP方面的内容)

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


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-09-13   浏览: 93 ::
收藏到网摘: 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前面