function.asp

来自「应用于高等院校党团思想教育」· ASP 代码 · 共 12 行

<!-- #include file = "conn_user.asp" -->
<%
function IsBad(NameA,NameB)'检查B是否在A的黑名单上   
  BadRs=Conn_User.execute("Select Count(UserName) As Num From BadList Where UserName='" & NameA & "' And BadName='" & NameB & "'")   
  if BadRs("Num")=0 then   
    IsBad=False   
  else   
    IsBad=True   
  end if   
  Set BadRs=nothing   
end function   
%>