asp如何只读取中文内容?(一个关于函数的问题)

lzx0460 2004-08-06 01:29:40
我想从数据库中只取出中文字符

例如:这样一段字符串

“ :<TABLE cellSpacing=0 cellPadding=0 width=700 border=0> <TBODY> <TR> <TD> <DIV align=center><FONT face=黑体 color=#003399 size=4>新疆远都贸易有限公司服装生产项目和新疆德汇实业集团温洲大酒店项目落户昌吉&l. ”


我只想取“新疆远都贸易有限公司服装生产项目和新疆德汇实业集团温洲大酒店项目落户昌吉”这部分

那里有这样的函数?


...全文
129 点赞 收藏 4
写回复
4 条回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
lzx0460 2004-08-06
Response.Write(replacetest(aa,HTML(rs(2)),""))

aa="[^\u4e00-\u9fa5]"

无法替换

HTML函数如下

function HTML(fString)
if not isnull(fString) then
fString = Replace(fString, ">", ">")
fString = Replace(fString, "<", "<")

fString = Replace(fString, CHR(34), """)
fString = Replace(fString, CHR(39), "'")
fString = Replace(fString, CHR(13), "")
fString = Replace(fString, "%", "")
fString = Replace(fString, """, "")
HTML = fString
end if
end function
回复
iuhxq 2004-08-06
skyboy0720(飞)强啊
回复
baby21st 2004-08-06
哪里都没有现成的这样函数
只有自己写,用正则表达式来做替换~~

回复
skyboy0720 2004-08-06
<%
function replacetest(patrn,str,str1)
set regEx = new RegExp
regEx.pattern=patrn
regEx.IgnoreCase=true
regEx.Global=true
replacetest=regEx.replace(str,str1)
end function
str="<font>abc<font ciolo>我爱你<fas>fff"
response.write replacetest("[^\u4e00-\u9fa5]",str,"")
%>
回复
相关推荐
发帖
ASP
创建于2007-09-28

2.8w+

社区成员

ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
申请成为版主
帖子事件
创建了帖子
2004-08-06 01:29
社区公告
暂无公告