今天测试了下,在ks.user.asp文件里,加句判断就行了
if FoundErr=True then Exit Sub
If KS.C("SuperTF")<>"1" then Param=Param & " and (groupid<>1 or username='" & KS.C("AdminName") & "')"
if CurrentPage < 1 then CurrentPage=1
sql=KSCls.GetPageSQL("KS_User","userid",MaxPerPage,CurrentPage,1,Param,sSQL)