my project is about displaying map(and its info) based on query fired..the result of the query should be displayed in the form of report(collecting data from database)...the problem is when i uploaded the page,the error shown was:-
The page cannot be displayed
There is a problem with the page you are trying to reach and it cannot be displayed.
--------------------------------------------------------------------------------
Please try the following:
Click the Refresh button, or try again later.
Open the localhost home page, and then look for links to the information you want.
HTTP 500.100 - Internal Server Error - ASP error
Internet Information Services
--------------------------------------------------------------------------------
Technical Information (for support personnel)
Error Type:
Microsoft VBScript runtime (0x800A01AD)
ActiveX component can't create object: 'WMBuilder.ReportBuilder'
/IITR_ROADS/GWMAppGen/Content/Build/QryReportBuild.inc, line 42
Browser Type:
Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.0; .NET CLR 1.0.3705)
Page:
GET /IITR_ROADS/GWMAppGen/Content/QueryResult.asp
Time:
Saturday, April 12, 2008, 2:45:30 AM
More information:
Microsoft Support
-----------------------------------------------------------------------------
and my code was:-
Expand|Select|Wrap|Line Numbers
- <!-- Including customizable query definitions
- #INCLUDE FILE="..\..\Content\Defs\CustomQueryDefs.inc" -->
- <!-- Including customizable query definitions
- #INCLUDE FILE="..\..\Content\Defs\ConnectionDefs.inc" -->
- <!-- Including customizable query definitions
- #INCLUDE FILE="..\..\Content\Build\MapBuild.inc" -->
- <%
- Dim sobjRBuilder
- svarConnectionDefs=GetConnectionDefs
- svarQueryDefs = GetCustomQueryDefs
- Set sobjRBuilder = CreateObject("WMBuilder.ReportBuilder")
- '-- Set references to built-in ASP objects
- Set sobjReportBuilder.Request = Request
- Set sobjReportBuilder.Response = Response
- Set sobjReportBuilder.Server = Server
- '-- Build Report
- sobjReportBuilder.BuildQueryReport svarConnectionDefs, svarQueryDefs
- '-- Retrieve query report parameters
- slngMaxRecords = sobjReportBuilder.MaxRecords
- slngFirstRecordIndex = sobjReportBuilder.FirstRecordIndex
- slngTotalRecordsCount = sobjReportBuilder.TotalRecordsCount
- '-- Clean up
- Set sobjReportBuilder = nothing
- %>