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.

93 lines
3.1 KiB

  1. <%@ Language=VBScript %>
  2. <% Option Explicit %>
  3. <!-- #include file="sh_page.asp" -->
  4. <%
  5. '==================================================
  6. ' Microsoft Server Appliance
  7. '
  8. ' Server Welcome Page
  9. '
  10. ' Author: a-pkreem
  11. ' History: 1/10/00 created
  12. '
  13. '
  14. ' Copyright (c) 1999 - 2000 Microsoft Corporation. All rights reserved.
  15. '==================================================
  16. Dim strServerName
  17. On Error Resume Next
  18. Set objLocMgr = Server.CreateObject("ServerAppliance.LocalizationManager")
  19. strSourceName = "sakitmsg.dll"
  20. if Err.number <> 0 then
  21. Response.Write "Error in localizing the web content "
  22. Response.End
  23. end if
  24. '-----------------------------------------------------
  25. 'START of localization content
  26. Dim L_ALERTLBL_TEXT
  27. Dim L_WELCOME_TEXT
  28. Dim L_WINDOWS_SETUP_TEXT
  29. Dim L_STATUSPAGE
  30. L_ALERTLBL_TEXT = objLocMgr.GetString(strSourceName, "&H40010035",varReplacementStrings)
  31. L_WELCOME_TEXT = objLocMgr.GetString(strSourceName, "&H40010036",varReplacementStrings)
  32. L_WINDOWS_SETUP_TEXT = objLocMgr.GetString(strSourceName, "&H40010037",varReplacementStrings)
  33. L_STATUSPAGE = objLocMgr.GetString(strSourceName, "&H40010038",varReplacementStrings)
  34. 'End of localization content
  35. '-----------------------------------------------------
  36. strServerName = Request.ServerVariables("SERVER_NAME")
  37. %>
  38. <html>
  39. <head>
  40. <!-- Copyright (c) 1999 - 2000 Microsoft Corporation. All rights reserved-->
  41. <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
  42. <title><% =L_ALERTLBL_TEXT %></title>
  43. <link rel="STYLESHEET" type="text/css" href="sh_page.css">
  44. <script language=JavaScript src="sh_page.js"></script>
  45. </head>
  46. <body oncontextmenu="return false;" topmargin="0" leftmargin="0" rightmargin="0" bottommargin="0" class="AREAPAGEBODY">
  47. <div style="position: absolute; width:100%; height:100%; z-index:-1">
  48. <table border="0" height=100% width="100%" cellspacing="0" cellpadding=2>
  49. <TR><td height=100% ></td></tr>
  50. <TR><td align=right><img src="images/status_water.gif"></td></tr>
  51. <TR><TD height=25 width=100% bgcolor=#000000></TD></TR>
  52. </table>
  53. </div>
  54. <table border="0" width="100%" cellspacing="0" cellpadding=2>
  55. <TR><TD height=26 bgcolor=#000000></TD></TR>
  56. <TR><TD height=8 bgcolor=#CCCCFF></TD></TR>
  57. </table>
  58. <% ServeAreaLabelBar(L_ALERTLBL_TEXT) %>
  59. <table border="0" width="520" cellspacing="0" cellpadding="2">
  60. <tr>
  61. <td width="35">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;</td>
  62. <td width="100%"><span class="AreaText">
  63. <P ID=ParaID_0><strong> </strong><%=L_WELCOME_TEXT%></P>
  64. <P ID=ParaID_1><%=L_WINDOWS_SETUP_TEXT%></P>
  65. <A href="<% ="http://" & strServerName %>"><ID id=ParaID_2><%=L_STATUSPAGE%></ID></a>
  66. </span>
  67. </td>
  68. </tr>
  69. </table>
  70. </body>
  71. </html>