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.

43 lines
1.0 KiB

  1. <HTML>
  2. <HEAD>
  3. <TITLE>SCE-XML Analysis Export with VBScript</TITLE>
  4. <SCRIPT LANGUAGE="VBScript">
  5. sub cmdDemo_OnClick
  6. dim SecDB
  7. set SecDB = CreateObject("SecMan.SecurityDatabase")
  8. SecDB.FileName=document.demoForm.sdbFile.value
  9. SecDB.ImportTemplateFile document.demoForm.infFile.value
  10. SecDB.Analyze ()
  11. SecDB.ExportAnalysisToXML document.demoForm.xmlFile.value, ""
  12. MsgBox "Done!"
  13. end sub
  14. </SCRIPT>
  15. </HEAD>
  16. <BODY>
  17. <HR><H2>Single-step demo:</H2>
  18. <FORM NAME="demoForm">
  19. INF Template to import:<BR>
  20. <INPUT TYPE="File" NAME="infFile" SIZE="100""><BR>
  21. Security Database:<BR>
  22. <INPUT TYPE="File" NAME="sdbFile" SIZE="100""> <BR>
  23. XML output file:<BR>
  24. <INPUT TYPE="File" NAME="xmlFile" SIZE="100""> <BR>
  25. <INPUT TYPE="Button" NAME="cmdDemo" VALUE="Go!">
  26. <INPUT TYPE="Button" NAME="cmdViewXML" VALUE="ViewXML"
  27. onclick="javascript:window.open(document.demoForm.xmlFile.value);">
  28. </FORM>
  29. </BODY>