Crystal Reports problem with crystal activex viewer in asp.net

Message

   Hi,
Here is my code written in .aspx file. 
I am getting blank page when I run this code. Please help me out.

<HTML>
<HEAD>
<TITLE>Crystal Reports ActiveX Viewer</TITLE>
</HEAD>
<BODY BGCOLOR=C6C6C6  leftmargin=0 topmargin=0 rightmargin=0 bottommargin=0 >
<object id="CRViewer"
    classid="CLSID:460324E8-CFB4-4357-85EF-CE3EBFE23A62"
    width=100%
    codebase="ActiveXViewer.cab" style="height: 248px">
<param name="EnableRefreshButton" value="1" />
<param name="EnableGroupTree" value="1" />
<PARAM NAME="DisplayGroupTree" VALUE=1>
<param name="EnablePrintButton" value=1>
<PARAM NAME="EnableExportButton" VALUE=1>
<PARAM NAME="EnableDrillDown" VALUE=1>
<PARAM NAME="EnableSearchControl" VALUE=1>
<PARAM NAME="EnableAnimationControl" VALUE=1>
<PARAM NAME="EnableZoomControl" VALUE=1>

</object>

<SCRIPT LANGUAGE="VBScript">
<!--
Sub Window_Onload

    On Error Resume Next
    Dim webBroker
    Set webBroker = CreateObject("CrystalReports11.WebReportBroker.1")
    Dim webSource
    Set webSource = CreateObject("CrystalReports11.WebReportSource.1")
    webSource.ReportSource=webBroker
    webSource.URL="http://"+location.host+"/WebSite6/CrystalReport.rpt"
    CRViewer.ReportName="http://"+location.host+"/WebSite6/CrystalReport.rpt"
    webSource.PromptOnRefresh =false
    CRViewer.ReportSource = webSource
    CRViewer.ViewReport
    alert("hi")
End Sub

-->
</SCRIPT>

</BODY>
</HTML>