<%@ Language=VBScript %>
<% Option Explicit %>
<%
'==================================================
' Microsoft Server Appliance
'
' Server Welcome Page
'
' Author: a-pkreem
' History: 1/10/00 created
'
'
' Copyright (c) 1999 - 2000 Microsoft Corporation. All rights reserved.
'==================================================
Dim strServerName
On Error Resume Next
Set objLocMgr = Server.CreateObject("ServerAppliance.LocalizationManager")
strSourceName = "sakitmsg.dll"
if Err.number <> 0 then
Response.Write "Error in localizing the web content "
Response.End
end if
'-----------------------------------------------------
'START of localization content
Dim L_ALERTLBL_TEXT
Dim L_WELCOME_TEXT
Dim L_WINDOWS_SETUP_TEXT
Dim L_STATUSPAGE
L_ALERTLBL_TEXT = objLocMgr.GetString(strSourceName, "&H40010035",varReplacementStrings)
L_WELCOME_TEXT = objLocMgr.GetString(strSourceName, "&H40010036",varReplacementStrings)
L_WINDOWS_SETUP_TEXT = objLocMgr.GetString(strSourceName, "&H40010037",varReplacementStrings)
L_STATUSPAGE = objLocMgr.GetString(strSourceName, "&H40010038",varReplacementStrings)
'End of localization content
'-----------------------------------------------------
strServerName = Request.ServerVariables("SERVER_NAME")
%>
<% =L_ALERTLBL_TEXT %>
