Search results

Thank you The_Doc_Man, I've also tried the case which I also did not think about at first but I the cancel=1- is new to me so that you for that!

OMG I was really thinking to hard. It was that simple. Thank you so much Gasman!

Good day Smart people, I have a report grouped by building which generates all equipment associated with that building. Right now, the report detail has an on-format event where: if the Equipment type is A then show me 1a 2a 3a... if the Equipment type is B then show me 1b 2b 3b... But how do I...

Will do! Thanks Mark

Thank you Guys it's all working now. I formatted the date as suggested. You guys rock!

OMG That was exactly the problem. but how what if I want the date to appear at the end of my FilePath. Should I write like: FilePath = "P:\Internal\Integration\Arlette\Licensing\Corporate\Certificates" & FileName & Date & ".pdf" or how should I implement the Date()

Good day all my smart people, Here is my code: Private Sub cmdEmailRpt_Click() Dim FileName As String Dim FilePath As String Dim oOutlook As Outlook.Application Dim oEmailItem As MailItem 'Save the report as a pdf file to a folder FileName = Me.cboAdmin.Column(1) & Date FilePath =...

Thanks JHB that link helped. My query uses JOINs so I used a workaround and create another table. It now works! Thanks Guys

I can see the file path in the Immediate window, but It does not update in the ProcDocs field and it has something to do with the Recordset not being updateable and I don't know what that intels?

Hello Guys, Here is my code: Private Sub cmdUpCert_Click() 'Dim rs As Recordset Dim objUpCert As Object Dim strFile As String Dim strFolder As String Dim varItem As Variant 'Set rs = CurrentDb.OpenRecordset("Qry_Renew", dbOpenDynaset, dbSeeChanges) Set objUpCert = Application.FileDialog(3)...

Thank you...It worked

Hello Guys, Here my code: Private Sub Command131_Click() DoCmd.OpenForm "Frm_CorpUpdateLogin", , , "[ID]=" & Me.ID & "" And "CorpLicID=" & Me.CorpLicID & "" And "StateLic=" & Me.StateLic & "" End Sub I get error code type mismatch the ID is an autonumber all the rest are numbers. I've tried...

OK JHB Now I've gotten somewhere. Once I commented out that like it gave me error code Item was not found in this collection because one of my rs!Field was misspelled. I am so happy right now. Thank you so much guys It's works!!

Yes I check and did it again. That query returns records. When I place this same code into a click event button, it works I just want to call that procedure so when a document is uploaded it will send an email. I just stepped through it again and once I'm at the call CertificateEmail it jumps...

The email dialog is still not open I've changed my Query to show only where Email is not Null so I did not have to do that test but the email dialog is still not opening. Here is what I have for the email Sub now Private Sub CertificateEmail() On Error GoTo Exit_Sub: Dim oOutlook As...

Good day all, I have a cmd bttn with the following code: Private Sub cmdUpCert_Click() Dim objCert As Object Dim strFile As String Dim strFolder As String Dim varItem As Variant Set objCert = Application.FileDialog(3) objCert.allowMultiSelect = True If...

Great Thank you

Hello Guys, I need quick help. Here is my code Private Sub Command8_Click() DoCmd.OpenForm "Frm_RMFCommunicationList", acNormal, , "[ORGANIZATION]='" & Me.txtOrg & "'" End Sub What operator should I use if I want the return records that has the word entered within that string? For instance...

Thank you very much. It works. I had to revert to the original format for the AutoNumber. I had "AirTravelReq"000000 in the format. I changed it back to increment. Thanks again for your help!

The source of the form is a table The field Control source is RequestID from that table and it has I've created this increment format "AirTavelReq"0000000...Would that make a difference?