PRB: The Island Hopper Sample Does Not Work with Internet Explorer 5 or SQL Server 7.0 (284222)



The information in this article applies to:

  • Microsoft Visual Studio 6.0 SP1
  • Microsoft Visual Studio 6.0 SP4
  • Microsoft Visual Studio 6.0 SP5

This article was previously published under Q284222

SYMPTOMS

The Island Hopper sample does not work with Microsoft Internet Explorer version 5 or later, or with Microsoft SQL Server 7.0 or later.

CAUSE

The Island Hopper sample requires Microsoft Windows NT 4.0, Microsoft Internet Information Server 4.0, Internet Explorer 4.0, and SQL Server 6.5. Island Hopper is not supported on any other configuration.

RESOLUTION

Instead of using the Island Hopper sample, you might want to use the Duwamish Books sample. For additional information, visit the following Microsoft Web sites: The Duwamish Books sample is designed to works with Microsoft Windows 95, Microsoft Windows 98, Windows NT 4.0, and Microsoft Windows 2000. The Island Hopper sample works only with Windows NT 4.0 Server and Internet Information Server 4.0.

STATUS

This behavior is by design.

MORE INFORMATION

NOTE: The following workaround is not supported by Microsoft. Use this method at your own risk.

To work around this issue, you can prevent the Island Hopper sample from checking for Internet Explorer 4.0, with which it was designed to operate. You must have at least an intermediate level of understanding of the Visual Basic language and code to implement this code change.

To make this change, edit the Browsercheck.vbs file. This file is supplied with the Island Hopper sample. Edit the file either in the Visual Studio Integrated Development Environment (IDE), or in a text editor. Remark out the whole portion of the script that checks for the Internet Explorer version. To do this, place an apostrophe (') in front of each line that does not already have an apostrophe at the beginning of the line. When you finish, each of the following lines must start with an apostrophe. The following code is the original code (before you add the apostrophes):
    'This file is provided as part of the Microsoft Visual Studio 6.0 Samples

    'THIS CODE AND INFORMATION IS PROVIDED "AS IS" WITHOUT
    'WARRANTY OF ANY KIND, EITHER EXPRESSED OR IMPLIED,
    'INCLUDING BUT NOT LIMITED TO THE IMPLIED WARRANTIES
    'OF MERCHANTABILITY AND/OR FITNESS FOR A  PARTICULAR
    'PURPOSE.

    'Copyright (C) 1997, 1998 Microsoft Corporation, All rights reserved

    '**************************************************
    '    Include Purpose: Checks for Internet Explorer 4 or later
    '**************************************************
    Dim strUserAgent
        Dim iFound

    strUserAgent = UCase(Request("HTTP_USER_AGENT"))
        iFound = inStr(1, strUserAgent, "MSIE", 1)
        if iFound <> 0 then
            if CInt(Mid(strUserAgent,iFound + 5, 1)) < 4 then
               Response.Redirect("getMSIE4.htm")
            end if
        else
        Response.Redirect("getMSIE4.htm")
    End If 
				
After you make this change, try to use the Island Hopper sample with a configuration other than the required configuration (Windows NT 4.0, Internet Information Server 4.0, Internet Explorer 4.0, and SQL Server 6.5).

Modification Type:MinorLast Reviewed:8/15/2005
Keywords:kbprb KB284222