<% @Language = "VBScript" %> <% Response.buffer = true %> <% Dim oFS,oFSPath Dim servername,serverinst, path Dim oDefSite,sDefDoc,sSitePath,sDocName Dim aDefDoc Dim success Dim infoobj, administ Dim bind,binditems,port,adminURL adminURL = "" success = false Set infoobj=GetObject("IIS://localhost/w3svc/info") Set administ= GetObject("IIS://localhost/w3svc/" & infoobj.AdminServer) bind = administ.ServerBindings(0)(0) binditems = split(bind,":") port= binditems(1) adminURL = "http://localhost:" & port & "/" Set oFS=CreateObject("Scripting.FileSystemObject") servername=Request.ServerVariables("SERVER_NAME") serverinst=Request.ServerVariables("INSTANCE_ID") path = "IIS://" & servername & "/W3SVC/" & serverinst Set oDefSite = GetObject(path) thisURL = oDefSite.ADsPath & "/Root" & Request.ServerVariables("URL") if instr(thisURL,"localstart.asp") > 0 then thisURL = Mid(thisURL,1,instr(thisURL,"localstart.asp")-2) end if Set oDefSiteRoot = GetObject(thisURL) 'Get the default document for this site... sDefDoc = oDefSite.DefaultDoc sSitePath = oDefSiteRoot.Path 'parse through the default document string aDefDocs = split(sDefDoc,",") 'and make sure at least one of them is valid for each sDocName in aDefDocs if oFS.FileExists(sSitePath & "\" & sDocName) then if InStr(sDocName,"iisstart") = 0 then success = True exit for end if end if next %> Welcome to Windows 2000 Internet Services <% if not success and err = 0 then %> <% end if %>
You do not currently have a default document set for your users. Any users attempting to connect to this site are currently receiving an ">"Under Construction page".
<% Dim WshShell, ver Set WshShell = Server.CreateObject("Wscript.Shell") On Error Resume Next ver = 0 ver = WshShell.RegRead("HKLM\SOFTWARE\Policies\Microsoft\Windows NT\Printers\DisableWebPrinting") %> <% If ver <> 1 or err <> 0 Then %> <% end if %> <% err.clear %>
Welcome to IIS 5.0
Internet Information Services (IIS) for Microsoft Windows 2000 brings the power of Web computing to Windows. With IIS, you can easily share files and printers and create applications to securely publish information to improve the way your organization works. IIS is a secure platform for building and deploying eCommerce solutions. IIS also makes it easy to bring mission-critical business applications to the Web.

Windows 2000 with IIS scales to meet your needs. You can:

  • Set up a personal Web server.
  • Share information within your team.
  • Access databases.
  • Create an enterprise intranet.

IIS integrates proven Internet standards with Windows, so that using the Web does not mean having to start over and learn new ways to publish, manage, or develop.

Windows 2000 with Internet Information Services is the easiest way to share information and run powerful applications on the Web.

Integrated Management
You can manage IIS through the Windows 2000 Computer Management console, or by using scripting. If you have installed Windows 2000 Server or Windows 2000 Advanced Server, the <% if port <> "" then %>Administration Web site<% else %>Administration Web site<% end if %> can also be used to manage IIS.

You can also right-click on a directory, and you can share its contents via the Web, as well as configure the most common IIS settings.

Online Documentation
The award-winning IIS online documentation includes an index, full-text search, and printing by node or by individual topic. You can:

  • Get help with tasks.
  • Learn about server operation.
  • Consult reference material.
  • View code samples.
Web Printing
Windows 2000 dynamically lists all the printers on your server on an easily accessible Web site. You can browse this site to monitor printers and their jobs. You can also connect to the printers via this site from any Windows computer.

1997-1999 Microsoft Corporation. All rights reserved.