Recent content by Bar_NZ

  1. Bar_NZ

    Form data, create PDF(s) and e-mail

    OK, change of tack, re-written the code with some google assistance. My last item to achieve is to have it send from a specific e-mail account, not my default account. Commented out line, does not seem to function, any ideas please? Private Sub Command18_Click() Dim MyOutlook As...
  2. Bar_NZ

    Form data, create PDF(s) and e-mail

    Updated to include specific info in body and subject line. Private Sub Command18_Click() Dim db As DAO.Database Dim MailList As DAO.Recordset Dim MyOutlook As Outlook.Application Dim MyMail As Outlook.MailItem Dim Subjectline As String Dim BodyFile As String Dim MyBodyText As String Dim rsemail...
  3. Bar_NZ

    Form data, create PDF(s) and e-mail

    OK, I'm back now and have made some progress, also revisited an older thread we had discussion in. So i can create the email and send, but what I cant seem to do is.... 1: Have it create a separate email for each recipient 2: Have it attach the subs invoice, ensuring its the right invoice for...
  4. Bar_NZ

    Form data, create PDF(s) and e-mail

    Code used to create the files Private Sub Command6_Click() Dim sReportName As String Dim sCriteria As String sReportName = "Subs" '' name of the predefined report Dim rs As Recordset Set rs = Me.Recordset rs.MoveFirst Do While Not rs.EOF sCriteria =...
  5. Bar_NZ

    Form data, create PDF(s) and e-mail

    I have managed to save the files, to a network drive T:\BCE-Subs_Export, they are named with the members ID (1234.PDF). So, What I need to do is for each one, create a separate e-mail and then attach the previously created Subs PDF that is equal to their MemberNumber. So If there is a file...
  6. Bar_NZ

    Form data, create PDF(s) and e-mail

    Well, that works perfect now! Thanks. Just need to figure out the, click a button, to Create an email to that specific member and attach the correct invoice that was just created.... Knowing that my test data included only 9 e-mail addresses but the real tables have 995 records, lol. My...
  7. Bar_NZ

    Form data, create PDF(s) and e-mail

    Yeah the flickering not so much of an issue at this point, but each PDF output contains all records, they should only contain the relevant record for that member. I have tested again with commented out line un-commented out and same result. I can't upload a sample as it's to big, lol What...
  8. Bar_NZ

    Form data, create PDF(s) and e-mail

    OK, so maybe I don't have the exporting to PDF sorted, I get 995 separate PDF files, each contain all records.... Private Sub Command6_Click() Dim sReportName As String Dim sCriteria As String sReportName = "Subs" '' name of the predefined report Dim rs As Recordset...
  9. Bar_NZ

    Form data, create PDF(s) and e-mail

    Hi All, wondering if you could assist me please. I have a table created from a query which contains member names and e-mail addresses and fee they have to pay. There are currently 995 records in this table. Each member has a MemberNumber (Fieldname) which is unique, but not sequential. What...
  10. Bar_NZ

    Table data into BCC for emailing multiple recipients in one email.

    That’s great, works a treat, thank you very much :)
  11. Bar_NZ

    Table data into BCC for emailing multiple recipients in one email.

    Hi all, I'm trying to get Access to send out one email to multiple recipients using Bcc and pull the email address from a table. I do not want to send any attachments directly from Access, these will be attached, once the e-mail opens and is ready to send. Table Name: Just_Email Column Name...
  12. Bar_NZ

    Sending multiple email code not working

    Hi, sorry to re-open this forum, but I used this code and am getting a Complie error: Variable not defined and the debugger takes me to the strSubject line. Private Sub Command4_Click() Dim rst As DAO.Recordset Dim strEmailAddress Set rst = CurrentDb.OpenRecordset("Just_Email") Do Until rst.EOF...
  13. Bar_NZ

    Change focus and copy if text field is empty.

    Hot chocolate, no problem..
  14. Bar_NZ

    Change focus and copy if text field is empty.

    Hey Paul, that worked a treat, thank you very much. Next time your in town, I'll buy you a coffee. Cheers
  15. Bar_NZ

    Change focus and copy if text field is empty.

    Hey Paul, havnt had a chance to try this today, but hopefully over the weekend. I am so happy you enjoyed your time here, yes the trip from Greaymouth to Christchurch was the one I recommend. Next time you come, call into Wellington and I'll buy you a coffe for your help.
Top Bottom