<%@ LANGUAGE = VBScript %> <% Option Explicit %> <% if Session("FONTSIZE") = "" then %> <% else %> <% On Error Resume Next Dim path, currentobj, sDlgTitle, mbw sDlgTitle = "Server Properties - [" & Request.ServerVariables("SERVER_NAME") &"]" path=Session("dpath") Session("path")=path Session("SpecObj")="" Session("SpecProps")="" Set currentobj=GetObject(path) %> <% ' Do not use top.title.Global.update flag if page is loaded into a dialog bUpdateGlobal = false %> <%= sDlgTitle %> " TOPMARGIN=5 LEFTMARGIN=5 TEXT="#000000" onLoad="loadHelp();">
<%= sFont("","","",True) %> <%= L_IIS_TEXT %>
<%= sFont("","","",True) %> <% if currentobj.MaxBandwidth > 0 then %> <% else %> <% end if %>  <%= L_ENABLEBANDWIDTH_TEXT %>
<%= sFont("","","",True) %> <%= L_LIMITNET_TEXT %>

<%= L_MAXNETUSAGE_TEXT %>  <% if currentobj.MaxBandwidth < 0 then mbw = "" else mbw = currentobj.MaxBandwidth/1024 end if %> <%= inputbox(0,"text","hdnMaxBandwidth",mbw,10,"","","isNum(this,1,32767);calcBW(this);",true,false,false) %>  <%= L_KBS_TEXT %>

<%= sFont("","","",True) %> <%= L_MIMEMAP_TEXT %>
   <%= sFont("","","",True) %><%= L_CONFIGUREMIME_TEXT %>
<% end if %>