Recent content by Elmobram22

Yeah I'm not sure what I need to do to determine variables for it. Like I said it works exactly in the other email varients. Just not this one and now it has no variables in the body anyway.

Here are how the form and email are looking...

Private Sub Command28_Click() Dim db As DAO.Database Dim rst As DAO.Recordset Dim sSql As String Dim sFirst As String Dim sLast As String Dim sEmail As String sSql = "SELECT FirstName, LastName , email, LeftAV " sSql = sSql & "FROM tblStaff " sSql = sSql & "WHERE [LeftAV] = no;" Set db =...

Hi all, I have changed some VBA code for an email within access through outlook. I have used this code succesfully before and it is tied to buttons within my database without an issue. The problem I have now though is the HTMLbody section is coming back with -1 rather than the information it...

Breakfast would be 9.30am Lunchtime 1.30pm Teatime 5.30pm Bedtime 9.30pm That's the set times I would be using.

Hi all, I am wondering of a way to create a calculator for adding up how much medication someone has at any given time. For example. If Bill collects 28 days supply of medication on a monday morning consisting of... Paracetamol 500mg x 224 (two to be taken at breakfast, dinner, teatime and...

Good call. I'll give it a go :)

Nice one!!! Works like a dream!!!! :):):):):):):):):)

It is a yes/no box. getting runtime error 91 object variable not set Set rst = db.OpenRecordset(sSql, dbOpenSnapshot) for this

Private Sub Command6_Click() Dim db As DAO.Database Dim rst As DAO.Recordset Dim sSql As String Dim sFirst As String Dim sLast As String Dim sEmail As String sSql = "SELECT FirstName, LastName , email, LeftAV " sSql = sSql & "FROM tblStaff " sSql = sSql & "WHERE [LeftAV] = no;" Set rst =...

This is what I have used for a similar purpose but where I pull the data from selections on the form. The table is tblStaff and the fields FirstName, LastName and email would be what I would use.

Set myOlApp = CreateObject("Outlook.Application") Set myItem = myOlApp.CreateItem(olMailItem) Dim strPath As String strPath = "\\server\resident_wsrp\WSRP (" & [pbLastName] & " " & [pbFirstName] & " - " & [pbDay].Column(1) & "-" & [pbMonth].Column(1) & "-" & [pbYear].Column(1) & ")\12...

Hi all, I'm after creating a button which will allow me to email my staff a specific file. Each staff member has a file for each month with their timesheet. I'm going to build a form with two variables. Year and month. Once you have chosen them press the button and it will email out the...

No more suggestions on this?

I'm also not suggesting I save a calculation. Just the answer to the calculation.