?
Solved

CrystalDecisions.CrystalReports.Engine.LogOnException: Logon Failed

Posted on 2004-04-02
3
Medium Priority
?
3,157 Views
Last Modified: 2012-06-21
I am attempting to refresh a crystal report and then export it to a new location via a console application. I can get everything to work fine except for my refresh. If I comment out myreport.refresh() it exports just fine. So, my problem is getting this exception when I try to refresh. I have blanked out my server name , user id, and passwords for this post. They are populated and work fine when logging into sql plus from the same machine this code is being run from. I am however leaving the databasename="" because this is not required when connecting to oracle.
  I have listed what I think is important for this error. Please let me know if you need additional information.

APP Type:
Console Application

DATABASE:
Oracle

EXCEPTION:
CrystalDecisions.CrystalReports.Engine.LogOnException:Logon Failed

CODE:
Imports CrystalDecisions.CrystalReports.Engine
Imports CrystalDecisions.Shared


Module Module1
    Private myreport As CrystalDecisions.CrystalReports.Engine.ReportDocument

    Sub Main()

        Dim crParameterValues As ParameterValues
        Dim crParameterDiscreteValue As ParameterDiscreteValue
        Dim crParameterFieldDefinitions As ParameterFieldDefinitions
        Dim crParameterFieldDefinition As ParameterFieldDefinition


        myreport = New CrystalDecisions.CrystalReports.Engine.ReportDocument()
        myreport.Load("c:\test1.rpt", OpenReportMethod.OpenReportByTempCopy)

        Dim tbCurrent As CrystalDecisions.CrystalReports.Engine.Table
        Dim tliCurrent As CrystalDecisions.Shared.TableLogOnInfo
        Try
            For Each tbCurrent In myreport.Database.Tables
                tliCurrent = tbCurrent.LogOnInfo
                With tliCurrent.ConnectionInfo
                    .ServerName = "xxxxx"
                    .UserID = "xxxxx"
                    .Password = "xxxxx#"
                    .DatabaseName = ""
                End With
                tbCurrent.ApplyLogOnInfo(tliCurrent)
            Next tbCurrent
        Catch Exp As LoadSaveReportException
            MsgBox("Incorrect path for loading report.", MsgBoxStyle.Critical, "Load Report Error")
        Catch Exp As Exception
            MsgBox(Exp.Message & "   in GetReportConnection Procedure", MsgBoxStyle.Critical, "General Error")
        End Try
        myreport.Refresh()


        Dim CrExportOptions As ExportOptions
        Dim CrDiskFileDestinationOptions As New DiskFileDestinationOptions()
        Dim CrFormatTypeOptions As New PdfRtfWordFormatOptions()

        CrDiskFileDestinationOptions.DiskFileName = "c:\test2.rpt"
        CrExportOptions = myreport.ExportOptions

        With CrExportOptions
            .ExportDestinationType = ExportDestinationType.DiskFile
            .ExportFormatType = ExportFormatType.CrystalReport
            .DestinationOptions = CrDiskFileDestinationOptions
            .FormatOptions = CrFormatTypeOptions
        End With


        Try
            '--- Export ---------------------------------------------
            ' Sets the current parameters and exports the report to
            ' specified format.
            '--------------------------------------------------------

            'Get the collection of parameters from the report
            crParameterFieldDefinitions = myreport.DataDefinition.ParameterFields

            'Access the specified parameter from the collection
            crParameterFieldDefinition = crParameterFieldDefinitions.Item("Dealer Number")

            'Get the current values from the parameter field. At this point there are zero values set.
            crParameterValues = crParameterFieldDefinition.CurrentValues

            'Set the current values for the numeric parameter field
            crParameterDiscreteValue = New ParameterDiscreteValue()
            crParameterDiscreteValue.Value = "80858"

            'Add the current value for the parameter field
            crParameterValues.Add(crParameterDiscreteValue)

            'The current parameter values must be applied for the parameter field.
            crParameterFieldDefinition.ApplyCurrentValues(crParameterValues)

            myreport.Export()
        Catch exc As CrystalDecisions.CrystalReports.Engine.InvalidArgumentException
            MsgBox(exc.Message)
        Catch exc As CrystalDecisions.CrystalReports.Engine.ParameterFieldCurrentValueException
            MsgBox(exc.Message)
        Catch exc As CrystalDecisions.CrystalReports.Engine.LogOnException
            MsgBox(exc.Message)
        Catch exc As Exception
            MsgBox(exc.ToString())
        End Try

    End Sub

End Module
0
Comment
Question by:cwigley
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
  • 2
3 Comments
 

Author Comment

by:cwigley
ID: 10741456
I found that my problem was the fact I did not have an odbc setup on the machine I was running the code from. Please close this question.

 Thank you!
0
 
LVL 6

Accepted Solution

by:
KarunSK earned 2000 total points
ID: 10744455
You need to post in the Community Support TA and ask for delete + refund, adding a link to this question.
0
 
LVL 6

Expert Comment

by:KarunSK
ID: 10930748
I am not sure why you accepted my comment as an answer. Did you post in the Community Support TA asking for a delete and refund? My comment should not be accepted as an answer since it was not intended to be one.

Cheers!
Karun.
0

Featured Post

Quick Start: DOCKER

Sometimes you just need a Quick Start on a topic in order to begin using it.. this is just what you need to know to get up and running with Docker!

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

IP addresses can be stored in a database in any of several ways.  These ways may vary based on the volume of the data.  I was dealing with quite a large amount of data for user authentication purpose, and needed a way to minimize the storage.   …
In my previous two articles we discussed Binary Serialization (http://www.experts-exchange.com/A_4362.html) and XML Serialization (http://www.experts-exchange.com/A_4425.html). In this article we will try to know more about SOAP (Simple Object Acces…
If you’ve ever visited a web page and noticed a cool font that you really liked the look of, but couldn’t figure out which font it was so that you could use it for your own work, then this video is for you! In this Micro Tutorial, you'll learn yo…
In this video, Percona Solution Engineer Dimitri Vanoverbeke discusses why you want to use at least three nodes in a database cluster. To discuss how Percona Consulting can help with your design and architecture needs for your database and infras…
Suggested Courses

762 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question