一、手机号中间四位为星号

SQL语句为：select Mobile,left(Mobile,3)&"****"&mid(Mobile,8,4) as dh from KS_User

循环体里：[ loop=10]手机号：{$Field(foldername,Text,0,...,2,)}[/loop]

二、手机号后四位为星号

感觉有必要说下如何实现手机号后四位为星号

SQL语句为：select Mobile from KS_User

循环体里：[ loop=10]手机号：{$Field(foldername,Text,7,****,2,)}[/loop]

修改文件：ks_cls/Kesion.CommonCls.asp，约868行。

For I = 1 To l
c = Abs(Ascw(Mid(Str, I, 1)))
If c > 255 Then
	T = T + 2
Else
	T = T + 1
End If
If T >= strlen Then
	'strTemp = Left(Str, I)
	'增加省略号改造2015-10-30
	strTemp = Left(Str, I)&"..."
Exit For
End If
Next

部分用户在后台上传图片时，提示没有登录，无权限，如下图：

解决方法如下：

打开 admin/include/swfupload.asp

找到

42行

Dim ChkRS:Set ChkRS =Conn.Execute("Select top 1 a.username,b.userid From KS_Admin a inner join KS_User b on a.username=b.username Where AdminID=" & KS.ChkClng(AdminID) & " and a.PassWord='" & KS.ChkClng(Pass) & "'")

改成

Dim ChkRS:Set ChkRS =Conn.Execute("Select top 1 a.username,b.userid From KS_Admin a inner join KS_User b on a.username=b.username Where AdminID=" & KS.ChkClng(AdminID) & " and a.PassWord='" & KS.DelSql(replace(Pass,"'","")) & "'")

1、如果您的系统出现新添加的模型无法添加数据（这个问题是创建自定义模型时，没有创建county字段的原因）

对于已创建的模型，可以手工在数据库里加个county字段（varchar(100)) 即可。

您也可以删除新自定义模型，然后按以下修改后，再重新创建模型即可。

2、打开

admin/system/ks.model.asp

找到2576行左右

"SignDateLimit tinyint Default 0,"&_
"SignDateEnd datetime,"&_
"Province nvarchar(100),"&_
"City nvarchar(100),"&_
"County nvarchar(100),"&_
"MapMarker nvarchar(255),"&_
"InfoPurview tinyint Default 0,"&_
"ArrGroupID nvarchar(100),"&_

增加上面红色的代码，这样重新创建的模型，就不会存在问题了。

修改采集(科讯采集)属性中点击初始数设置为0时,则取500以内的随机数

修改文件:admin\Collect\Item_CollecNews.asp 第945行

将

Rs("Hits")=Hits

修改为

if Hits=0then
Rs("Hits")=Int((500*Rnd)+1)
else
Rs("Hits")=Hits
end if

修改后的文章采集项目属性栏中,点击数初始值设置为0时(默认),则入库的文章点击数为500以内的随机数(当然你也可设为其它数值)

1、自定义SQL标签实现方法：

只输出年：{$Field(adddate,Date,YYYY)}

只输出月：{$Field(adddate,Date,MM)}

只输出日：{$Field(adddate,Date,DD)}

2、系统函数标签实现方法：

只输出年：{@adddate(Date,YYYY)}

只输出月：{@adddate(Date,MM)}

只输出日：{@adddate(Date,DD)}