Leaked source code of windows server 2003
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

76 lines
2.8 KiB

  1. <%@ CODEPAGE=65001 'UTF-8%>
  2. <%' certrsdn.asp - (CERT)srv web - (R)e(S)ult: (D)e(N)y
  3. ' Copyright (C) Microsoft Corporation, 1998 - 1999 %>
  4. <!-- #include FILE=certsbrt.inc -->
  5. <!-- #include FILE=certdat.inc -->
  6. <!-- #include FILE=certsrck.inc -->
  7. <% ' came from certfnsh.asp
  8. Dim sMode, nDisposition
  9. 'Disposition code ref: \nt\public\sdk\inc\certcli.h
  10. Const CR_DISP_INCOMPLETE =0
  11. Const CR_DISP_ERROR =1
  12. Const CR_DISP_DENIED =2
  13. Const CR_DISP_ISSUED =3
  14. Const CR_DISP_ISSUED_OUT_OF_BAND=4
  15. Const CR_DISP_UNDER_SUBMISSION =5
  16. Const CR_DISP_REVOKED =6
  17. Const no_disp=-1
  18. sMode=Request.Form("Mode")
  19. nDisposition=Session("nDisposition")
  20. ' If this is a pending request, remove it from the user's cookie
  21. If "chkpnd"=sMode Then
  22. RemoveReq(Request.Form("ReqID"))
  23. End If
  24. %>
  25. <HTML>
  26. <Head>
  27. <Meta HTTP-Equiv="Content-Type" Content="text/html; charset=UTF-8">
  28. <Title>Microsoft Certificate Services</Title>
  29. </Head>
  30. <Body BgColor=#FFFFFF Link=#0000FF VLink=#0000FF ALink=#0000FF><Font ID=locPageFont Face="Arial">
  31. <Table Border=0 CellSpacing=0 CellPadding=4 Width=100% BgColor=#008080>
  32. <TR>
  33. <TD><Font Color=#FFFFFF><LocID ID=locMSCertSrv><Font Face="Arial" Size=-1><B><I>Microsoft</I></B> Certificate Services &nbsp;--&nbsp; <%=sServerDisplayName%> &nbsp;</Font></LocID></Font></TD>
  34. <TD ID=locHomeAlign Align=Right><A Href="/certsrv"><Font Color=#FFFFFF><LocID ID=locHomeLink><Font Face="Arial" Size=-1><B>Home</B></Font></LocID></Font></A></TD>
  35. </TR>
  36. </Table>
  37. <P ID=locPageTitle> <B> Certificate Request Denied </B>
  38. <!-- Green HR --><Table Border=0 CellSpacing=0 CellPadding=0 Width=100%><TR><TD BgColor=#008080><Img Src="certspc.gif" Alt="" Height=2 Width=1></TD></TR></Table>
  39. <%If CR_DISP_REVOKED=nDisposition Then%>
  40. <P ID=locIssRev> Your certificate was issued, and then revoked. </P>
  41. <%Else%>
  42. <P ID=locDenied> Your certificate request was denied. </P>
  43. <%End If%>
  44. <P ID=locInfoReqIDandReason>
  45. <%
  46. Dim ICertRequest, strTmpReasonCode
  47. Set ICertRequest=Session("ICertRequest")
  48. nReqId=ICertRequest.GetRequestID()
  49. strTmpReasonCode=ICertRequest.GetDispositionMessage()
  50. %>
  51. Your Request Id is <%=nReqId%>. The disposition message is "<%=strTmpReasonCode%>".
  52. </P>
  53. <P ID=locContactAdmin>Contact your administrator for further information.
  54. </P>
  55. <!-- Green HR --><Table Border=0 CellSpacing=0 CellPadding=0 Width=100%><TR><TD BgColor=#008080><Img Src="certspc.gif" Alt="" Height=2 Width=1></TD></TR></Table>
  56. <!-- White HR --><Table Border=0 CellSpacing=0 CellPadding=0 Width=100%><TR><TD BgColor=#FFFFFF><Img Src="certspc.gif" Alt="" Height=5 Width=1></TD></TR></Table>
  57. </Font>
  58. <!-- ############################################################ -->
  59. <!-- End of standard text. Scripts follow -->
  60. <!-- No scripts -->
  61. </Body>
  62. </HTML>
  63. <%Session.Abandon()%>