Recent content by scclem

Ben, This section of your code: strBaseMessage = MailItem.Body 'Empty The strChrPos String strChrPos = "" 'While There Are Line Breaks In The String Remove Them & Then Exit The Loop Do While...

K, Something along this line should work. Public Sub ReOrder1() Dim db As Database ' current database Dim recAssigned As Recordset ' recordset of items to order Dim objOutlook As New Outlook.Application ' outlook object Dim...

If I am posting this in the wrong area, please let me know. I am having a problem with a specific PC that when starting any Access Db that has either an Autoexec macro or forms set to start in the Startup settings, is giving me the following error message: MSACCESS caused an invalid page fault...

Here's a function that I use for this purpose. This is written for Crystal v8.5 and works great in Access 2000. You'll need references set for the Crystal Reports 8.5 ActiveX Designer Runtime Library (craxdrt.dll) and Crystal Report Export (sviewhlp.dll). Also, appropriate error trapping and...

Graham, Here's the entire function coding. Hope it helps you. Function PrintIt() 'sFiletoOutput As String, sFaxTo As String, sFaxNo As String Dim wApp As New Word.Application Dim wDoc As Word.Document On Error GoTo Error_PrintIt Set wDoc = wApp.Documents.Open(CurrentProject.Path &...

Sorry Tom, After posting I noticed typos. Statement should be: me!txtIndustry = DLOOKUP("[Industry]","Client Industry", "[ClientId]=[forms]![frmEnterIndustry]![cboClient]) Scott

Tom, You should be able to do this with a simple DLOOKUP() command associated with your text box statement. me!txtIndustry = DLOOKUP("[Industry]","Client Industry", "[ClientId])=[forms]![frmEnterIndustry]![cboClient])) Much easier than involving an SQL statement...

Following is a section of the code I have that works to print without user intervention. 'All setting of main document, etc is done prior to here. ' Execute the mail merge. wDoc.MailMerge.Destination = wdSendToNewDocument wDoc.MailMerge.Execute 'execute data merge...

First, I am not a VB developer, but am fairly adept at using VBA in MS-Access databases. While developing reports using CR8.5, I was successful in creating Access databases that contained forms using the CRViewer control along with coded instructions to the craxdrt.dll to open and view CR rpt...

I several fields in the detail of a report that are the result of formula fields. I am trying to then summarize the detail items either as SUM or AVE in group footers. I am able to use the Insert/Summary command for some of them, but for other the option is not available. All results are...

I am trying to export a cross-tab report to Excel. The x-tab has a column header with Column #1 Name and Column #2 Name. When exported to Excel the Column #1 Name data does not show. Ex: In CR INIT INSN 6/27/02 7/04/02 Excel only shows: 6/27/02...

Thanks, Mike. I ended up with this statement replace({fieldname}, chr(13)+ CHR(10), " ") and it works great. Scott

I am pulling data from an Oracle database that is a varchar(300) text field. I have gotten around the size of the field by creating a view that breaks the data into smaller part so I can use Crystal formulas to check the data. The main application creating this data allows for a CR/LF to be...

I have been working with v8.5 using the PDF export through RDC and really like it. Does anyone know if there is a way to use the bookmarks feature that is in Adobe Acrobat in order to bookmark the groups in the Crystal report that is being exported? Are there properties of the ExportOptions...

Thank you for your suggestion. Even though it didn't quite work, it got me pointed in the right direction. I ended up recording a macro to see how Excel would write the code. From there I was able to adapt it to my code. In the end: objXLApp.Application.Visible = True was replaced by...