Recent content by jrollins

The table structure is beyond my control. I tried this but it didn't work either: =Sum(DLookUp("[RT1 TOTAL]","SELECT2 RT1")+DLookUp("[RT2 TOTAL]","SELECT2 RT2")+DLookUp("[RT3 TOTAL]","SELECT2 RT3")+DLookUp("[RT4 TOTAL]","SELECT2 RT4")+DLookUp("[RT5 TOTAL]","SELECT2 RT5")+DLookUp("[RT6...

I have a multiple-record report with a calculated control containing the following expression: =DLookUp("[RT1 TOTAL]","SELECT2 RT1")+DLookUp("[RT2 TOTAL]","SELECT2 RT2")+DLookUp("[RT3 TOTAL]","SELECT2 RT3")+DLookUp("[RT4 TOTAL]","SELECT2 RT4")+DLookUp("[RT5 TOTAL]","SELECT2 RT5")+DLookUp("[RT6...

DLookup worked! Tried a list box, used Expression Builder to select the field in the query that I want to display but when I opened the form the list box was blank.

I created a select query that produces the correct dataset when the query is run directly. I have a text box on a form to display the query results. I went into the ControlSource property in the text box and used Expression Builder to select the field within the query that I want to display...

VBSlammer - I can't get your code to work. It doesn't seem to be reading any groups. The code is as shown, followed by the Debug.Print results: Function InGroup(ByVal strGroup As String) As Boolean Dim varGroups As Variant Dim i As Integer varGroups = Split(GetCurrentUserGroups()...

When attempting to send an e-mail using the following code, Outlook hangs up when the .Send attempts to execute. After clicking anywhere on my open Access form, I receive this error message : This action cannot be completed because the Microsoft Outlook application (Microsoft Outlook) is not...

FYI I finally fixed this problem my making my forms 'skinnier' (fewer graphics and controls, fewer forms open simultaneously. Apparently, Outlook 2000 doesn't manage GDI memory very well. My original code and forms execute perfectly in Outlook 2002. Microsoft has no fix for this problem in...

It's my understanding that this method 'Send now cbrSend.Execute won't work after you've installed the Outlook E-mail Security Update.

I agree that objOutlook is causing the problem. This database is on the LAN and every workstation that opens it gets the same error at the same point. I tried the objOutlook.quit suggestion but it didn't work. One curiosity: If you're on SR1-A or SP3, you get a security warning when you try to...

I copied the following code directly from MS Knowledge Base Article - 209948. I only call the sub SendMessage one time when a user changes the value in a combo box. Public objOutlook As Outlook.Application Public objOutlookMsg As Outlook.MailItem Public objOutlookRecip As Outlook.Recipient...

Yep. Still get the same error.

I was using DoCmd.SendObject to send e-mails from Access. It performed erratically and I discovered it's a known bug. Following the instructions in MS Knowledge Base Article - 209948, I switched to using Automation to send the e-mails. It worked fine but I soon started getting the error message...

I agree. It works! A star from me, too.

I have two side-by-side workstations looking at the database on the network. When I change the selection in a combobox on the first workstation, the data doesn't update on the second workstation until I select a different record on the first workstation. Placing Me.Requery in the AfterUpdate...

Thanks. I'll go thru this and report back. I think I understand why you're at the top of the experts list.