KesionCMS V8.0x utf-8版本禁止中文名注册无效的修正-领先建站CMS提供服务商我们专注于CMS建站产品的研发

kesion

<<返回列表上一个主题下一个主题打印本帖复制本帖地址

2861 查看	4 回复

主题：[分享]KesionCMS V8.0x utf-8版本禁止中文名注册无效的修正 [收藏主题]

转到：

科汛官方当前离线

47268 主题	145 广播	405 粉丝

添加关注

级别:管理员

用户积分:101604 分
登录次数:7935 次
注册时间:2006/12/7
最后登录:2023/12/14
创始人

创始人

管理员

终身成就奖

当前不在线

科汛官方发表于：2012/2/1 10:17:00 | 显示全部帖子查看该作者主题楼主

科汛在线商城系统(NET)

做官网就用科汛智能建站系统!

打开

ks_cls/kesion.commoncls.asp

找到如下代码

'判断有没有中文
function HasChinese(str)
HasChinese = false
dim i
for i=1 to Len(str)
if Asc(Mid(str,i,1)) < 0 then
HasChinese = true :exit for
end if
next
end function

替换为

'判断有没有中文
Function HasChinese(Content)
Dim regEx, Matches, Match
Set regEx = New RegExp
regEx.Pattern="[\u4e00-\u9fa5]+"
regEx.IgnoreCase = True
regEx.Global = True
Set Matches = regEx.Execute(Content)
If Matches.count > 0 Then
HasChinese=true
Else
HasChinese=false
end if
End Function

KesionCMS,,

做新职业技能培训平台就选#科汛网校

反对(2)

回到顶部

回到底部

底部

＜上一主题 | 下一主题＞

Powered By KesionCMS Version X1

厦门科汛软件有限公司 © 2006-2016 页面执行0.20313秒 powered by KesionCMS 9.0