microsoft.public.vb.crystal - Microsoft Visual Basic
I have a problem where the Crystal Reports viewer shows th toolbar when running Windows/2000, but not Windows/XP. Ha anyone ever heard of this before? I have another VB.NET solution whic does paint the toolbar under XP, so it must be a code or technique issue. The toolbar is functional and shows tool tips and silloete, but is grayed out from viewing. I will paste code here of report being launched. Any hel would be great, I'm stumped Private Sub mnuFileWaterCoilRpt_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles mnuFileWaterCoilRpt.Clic If CheckDirty(m_daRoot) = DialogResult.Cancel The Retur End I If m_projectFile Is Nothing OrElse m_projectFile.Length = 0 The MsgBox("You must first open or save the project that you wish to print first." Retur End I Dim report As New WaterCoi Dim viewer As New ReportViewerForm(report, m_projectFile Tr Me.Hide( viewer.WindowState = FormWindowState.Maximize viewer.ShowDialog(Me Catch exc As Exceptio MessageBox.Show(exc.ToString Finall Me.Show( report.Close( report.Dispose( viewer.Close( viewer.Dispose( End Tr End Su here is form with viewer Option Strict O Option Explicit On Imports System.Dat Imports System.Data.SqlClien Imports CrystalDecisions.CrystalReports.Engin Imports CrystalDecisions.ReportSourc Imports CrystalDecisions.Share Public Class ReportViewerFor Inherits System.Windows.Forms.For #Region " Windows Form Designer generated code Public Sub New(ByVal report As ReportDocument, ByVal projectFile As String MyBase.New( Dim tbCurrent As CrystalDecisions.CrystalReports.Engine.Tabl Dim tliCurrent As CrystalDecisions.Shared.TableLogOnInf Dim rptExpensiveProducts As New ReportDocumen InitializeComponent( 'rptExpensiveProducts.Load("..\QuoteReport1.rpt" reportViewer.ReportSource = report 'rptExpensiveProduct If reportViewer.LogOnInfo.Count > 0 The Dim ti As TableLogOnInfo = reportViewer.LogOnInfo(0 ti.ConnectionInfo.DatabaseName = projectFil ti.ConnectionInfo.ServerName = Environment.MachineNam End I ' For Each tbCurrent In rptExpensiveProducts.Database.Table 'tliCurrent = tbCurrent.LogOnInf 'With tliCurrent.ConnectionInf '.ServerName = Environment.MachineNam ' .UserID = " ' .Password = " '.DatabaseName = projectFil 'End Wit 'tbCurrent.ApplyLogOnInfo(tliCurrent 'Next tbCurren ' Set the report source for the crystal reports ' viewer to the report instance 'This call is required by the Windows Form Designer ' InitializeComponent( 'Add any initialization after the InitializeComponent() cal ' reportViewer.ReportSource = repor ' If reportViewer.LogOnInfo.Count > 0 The ' Dim ti As TableLogOnInfo = reportViewer.LogOnInfo(0 ' ti.ConnectionInfo.DatabaseName = projectFil ' ti.ConnectionInfo.ServerName = Environment.MachineNam ' End I 'reportViewer.DisplayToolbar = Tru End Su 'Form overrides dispose to clean up the component list Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean If disposing The If Not (components Is Nothing) The components.Dispose( End I End I MyBase.Dispose(disposing End Su 'Required by the Windows Form Designe Private components As System.ComponentModel.IContaine 'NOTE: The following procedure is required by the Windows Form Designe 'It can be modified using the Windows Form Designer. 'Do not modify it using the code editor Friend WithEvents reportViewer As CrystalDecisions.Windows.Forms.CrystalReportViewe <System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent() Me.reportViewer = New CrystalDecisions.Windows.Forms.CrystalReportViewer Me.SuspendLayout() ' 'reportViewer ' Me.reportViewer.ActiveViewIndex = -1 Me.reportViewer.DisplayBackgroundEdge = False Me.reportViewer.DisplayGroupTree = False Me.reportViewer.Dock = System.Windows.Forms.DockStyle.Fill Me.reportViewer.EnableDrillDown = False Me.reportViewer.ImeMode = System.Windows.Forms.ImeMode.NoControl Me.reportViewer.Location = New System.Drawing.Point(0, 0) Me.reportViewer.Name = "reportViewer" Me.reportViewer.ReportSource = Nothing Me.reportViewer.RightToLeft = System.Windows.Forms.RightToLeft.No Me.reportViewer.ShowGroupTreeButton = False Me.reportViewer.Size = New System.Drawing.Size(632, 389) Me.reportViewer.TabIndex = 2 ' 'ReportViewerForm ' Me.AutoScaleBaseSize = New System.Drawing.Size(5, 13) Me.ClientSize = New System.Drawing.Size(632, 389) Me.Controls.Add(Me.reportViewer) Me.Name = "ReportViewerForm" Me.Text = "ReportViewerForm" Me.WindowState = System.Windows.Forms.FormWindowState.Maximized Me.ResumeLayout(False) End Sub #End Region Private Sub reportViewer_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) End Sub Private Sub reportViewer_Load_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles reportViewer.Load End Sub End Class
Hi Everyone, Can anyone help me resolve the following error in a CR8.5 report: "A subscript must be between 1 and the size of the array." I'm using an array in the main report to store values as a group changes. I then try to print those values on an index page. The index page is a sub report in the main report footer. Thanking you in advance for any help. MurphTheSmurf
We have developed an application that connects to our sql server using the windows authentication. 99.9% of all our pc's belong to the domain but we have a couple of XP Home laptops that need to connect but of course you can't join a domain with home edition. We are currently using this connection string but with home since it isn't part of the domain and is only logging in locally it will not authenticate with windows authentication because it isn't part of the domain and sql server won't let me add a user from a workgroup, does anyone have an idea on how to get this user authenticated. Can I look for when he opens the app and force his username and password or something. Any help would be appreciated. Thanks Me.sqlConn.ConnectionString = "initial catalog=TSQL;data source=SERVER1;Integrated Security=true;"
We have an issue with Micorsoft Windows (XP, Win2K) with respect to using an API within a VisualBASIC 6.0 application. The API we are using is requires access to several 3rd party installed programs. The problem we are having is that that the person signed on to the PC must have Administrator level privileges to access these necessary 3rd party programs. We would like to set things up so that any user of the PC has privileges to run our application including the 3rd party programs, but do not have Administrative privileges for the PC. -- varsity