Hi all,
I want to create a crystal report using asp.net running on my Local PC... I have add a physical crystal report into my .net project and
can connect to the my local SQL Server - Northwind Database and drag-N-drop the "Customers" Table's fields to the crystal report.

-My setting-
sql server: using sql and window authentication, use "sa" as username and "password" as password.

However, when I run the code, I receive an error message "Logon Failed"... and my code is shown as below:

Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

        'Put user code to initialize the page here
        Dim crTableLogoninfos As New TableLogOnInfos
        Dim crTableLogoninfo As New TableLogOnInfo
        Dim crConnectionInfo As ConnectionInfo
        Dim crReportDocument As New testRpt

        crTableLogoninfos = New TableLogOnInfos
        crTableLogoninfo = New TableLogOnInfo
        crConnectionInfo = New ConnectionInfo
        With crConnectionInfo
            .ServerName = "MyComputerName"
            .DatabaseName = "NorthWind"
            .UserID = "sa"
            .Password = "password"
        End With

        crTableLogoninfo.ConnectionInfo = crConnectionInfo
        crTableLogoninfos.Add(crTableLogoninfo)
        CrystalReportViewer1.LogOnInfo = crTableLogoninfos
        CrystalReportViewer1.ReportSource = crReportDocument

        CrystalReportViewer1.DataBind()
End Sub

Anyone have an idea what's wrong ?

Regards,
Charles.

I have the same problem :(

i have the same problem.

Hi PPl,

Earlier I had the same problem. But I think the reason why its givin failed to logon is ...its not able to take the logon credentials for the table as I see in the above posted code. This is what I am using and its working fine. Try making changes a the below mentioned code. This bug is actually fixed in the Framework 1.1 and 2.0 .

***********CODE*****************

Public Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        'Put user code to initialize the page here

        sCode = Request.QueryString("CODE")

        InitializeComponent()
        Dim SelectFormula As String
        SelectFormula = "{WMS_M_SCRIPT.SCRIPT_CD} = '" & sCode & "'"

        CrystalReportViewer1.SelectionFormula = SelectFormula

        crConnectionInfo.ServerName = "SYSADMIN02"
        crConnectionInfo.DatabaseName = "testing"
        crConnectionInfo.UserID = "sa"
        crConnectionInfo.Password = ""
        crDatabase = crReportDocument.Database
        crTables = crDatabase.Tables

        For Each crTable In crTables

            crTableLogOnInfo = crTable.LogOnInfo
            crTableLogOnInfo.ConnectionInfo = crConnectionInfo
            crTable.ApplyLogOnInfo(crTableLogOnInfo)

        Next

        CrystalReportViewer1.ReportSource = crReportDocument

        CrystalReportViewer1.PageZoomFactor = 100

        CrystalReportViewer1.Visible = True


    End Sub

************************************************

The above code applies the Logon Credentials for each table exclusively if there is more than one table.

Cheer........

make sure you create a Setup & Deploment project to your solution so you can run it on the server. This registers Crystal, the merge modules, and the licensing file to the server. Without this stuff, it will never run.

I spent weeks researching this and found an article that explains it.

[http://support.businessobjects.com/c..._printing.pdf]

This is the article you really need.

http://support.businessobjects.com/c...deployment.pdf

Ron

By adding a single line marked as red u can solve the problem

Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

        'Put user code to initialize the page here
        Dim crTableLogoninfos As New TableLogOnInfos
        Dim crTableLogoninfo As New TableLogOnInfo
        Dim crConnectionInfo As ConnectionInfo
        Dim crReportDocument As New testRpt

        crTableLogoninfos = New TableLogOnInfos
        crTableLogoninfo = New TableLogOnInfo
        crConnectionInfo = New ConnectionInfo
        With crConnectionInfo
            .ServerName = "MyComputerName"
            .DatabaseName = "NorthWind"
            .UserID = "sa"
            .Password = "password"
        End With

        crTableLogoninfo.ConnectionInfo = crConnectionInfo
 crTableLogoninfo.TableName = "Place your table name Here"
        crTableLogoninfos.Add(crTableLogoninfo)
        CrystalReportViewer1.LogOnInfo = crTableLogoninfos
        CrystalReportViewer1.ReportSource = crReportDocument

        CrystalReportViewer1.DataBind()
End Sub

Abhishek
[email protected]

Folks, I am running in to a very similar problem. Since I have many users that require only a small portion of the data available, I chose to first load their specific data into a dataset. This code works fine in a WinApp, but fails with the "Logon Failed" error message mentioned when I drop the code into a WebApp. I'm not providing any LogonInfo beacuse I am linking to the dataset. What am I missing? I have stepped through and only get the error when I associate the CR with the CRV. If I need logon credentials, what do I use? I've already extracted the data from the DB.


   Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        'Put user code to initialize the page here
        If Not (Me.IsPostBack) Then
            Session("iRec") = 0

            AgentID = Page.Request.QueryString("AID")
            RequirementID = CType(Page.Request.QueryString("RID"), Date)

            With sqlSelectResponseDetailView.Parameters
                .Item("@AgentID").Value = AgentID
                .Item("@RequirementID").Value = RequirementID
            End With
            sdaResponseDetailView.Fill(DsResponses1, "ResponseDetailView")
            dv = New DataView(DsResponses1.ResponseDetailView)

            crResponses1.SetDataSource(DsResponses1.ResponseDe tailView)
            crvResponses.ReportSource = crResponses1
            crvResponses.DataBind()
        End If

    End Sub

' Define Crystal Reports variable
        Dim crReportDocument As CrystalDecisions.CrystalReports.Engine.ReportDocum ent
        Dim crExportOptions As CrystalDecisions.Shared.ExportOptions
        Dim crDiskFileDestinationOptions As CrystalDecisions.Shared.DiskFileDestinationOptions
        Dim Fname As String



        crReportDocument = New CrystalDecisions.CrystalReports.Engine.ReportDocum ent

        crReportDocument.Load("C:\inetpub\wwwroot\test.rpt ")

        Fname = "c:\temp\" & Session.SessionID.ToString & ".pdf"
        crDiskFileDestinationOptions = New CrystalDecisions.Shared.DiskFileDestinationOptions
        crDiskFileDestinationOptions.DiskFileName = Fname
        crExportOptions = crReportDocument.ExportOptions
        With crExportOptions
            .DestinationOptions = crDiskFileDestinationOptions
            .ExportDestinationType = CrystalDecisions.Shared.ExportDestinationType.Disk File
            .ExportFormatType = CrystalDecisions.Shared.ExportFormatType.PortableD ocFormat
        End With

        Dim table As New DataTable
        Dim adaptador As New SqlClient.SqlDataAdapter
        Dim con As New SqlClient.SqlConnection
        con.ConnectionString = ConfigurationSettings.AppSettings("ConnectionStrin g")
        Dim cmd As New SqlClient.SqlCommand("select * from table", con)
        adaptador.SelectCommand = cmd
        adaptador.Fill(tabla)
        crReportDocument.SetDataSource(tabla)
        CrystalReportViewer1.ReportSource = crReportDocument
        CrystalReportViewer1.DisplayGroupTree = True

        CrystalReportViewer1.DataBind()
        crReportDocument.Export() ' if i want to export it to a file, in this example to a pdf

Thank you very much!
This is very useful for me!