今天测试了下,在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)