asp中用select 获取前一部分字节得内容

来源:百度知道 编辑:UC知道 时间:2024/05/17 06:14:58
比如rs.open"select 文章 from wenzhang",cn,1,3
我只想select文章的前500字节内容,怎么获取??

如果是500个字符就简单:left(rs("content"),500)
如果是500个字节,就复杂些,要转化一下(汉字双字节):
leftString(rs("content"),500)
Function leftString(str,length)
dim x,y,i,s
s=str
x = len(str)
y = 0
if x >= 1 then
for i = 1 to x
if asc(mid(str,i,1)) < 0 or asc(mid(str,i,1)) >255 then
y = y + 2
else
y = y + 1
end if
if y >= length then
s = left(str,i) '字符串字节数
exit for
end if
next
end if
leftString = s
End Function

就加上这两句,s1就是你要的500字节大小汉字
s1 = rs("文章")
s1 = left(s1,500)

假设你把取出来的一条记录放到变量string里,那么,显示前500字的方法是:
response.write left(string,500)