<% Response.ContentType = "application/x-netscape-revocation" serialnumber = Request.QueryString set Admin = Server.CreateObject("CertificateAuthority.Admin") stat = Admin.IsValidCertificate("sta-enm-ca-02.so.standrews607.com\STA-ENM-CA-02", serialnumber) if stat = 3 then Response.Write("0") else Response.Write("1") end if %>