Recent content by Dachande

OK, sorry I took your comment the wrong way. I think I am beginning to see your points. The reason I wanted to generate a table and not just use sales information was for instances (for whatever reason) when a working day does not have any sales in it. If this happened and I then tried to...

Hello, Can you not just abandon the On Timer event and get it to automatically send the reports out as soon as the database opens. I know that this is not ideal but its how I do it currently as it is effectively on a timer already seeing as its a scheduled task. Either have the Form load on...

I know how to send emails using Access but I have no idea how to receive them. I have attached a file with the code I use to send emails. I found it on this site and just modified it for my use. It also adds attachments which you may or may not want. I hope this helps Mark

Are you trying to send emails from Access? If so then I have something that would be of use. Mark

Thanks very much Tim that works great :) Mark

Hello, This should work as a fixed export location. Just put this code on an On Click event procedure. You just need to make sure that you have created a export specification. Dim DateText As String DateText = Left(Date, 2) & Mid(Date, 4, 2) & Right(Date, 4) DoCmd.TransferText...

Hello, I am trying to add a date and time stamp to a field in a form once somebody clicks on a check box to say that the problem has been resolved. This works fine if I start from scratch on a new form but when I try to add this to an existing form it adds the correct date in but a totally...

Hello, I have a loop code that steps through and creates a string from the counter, for example it goes P01, P02, P03 etc until it gets to 12. This is fine. But I want to use this as criteria in an update query (this works as well) and also the field name, as I have 12 fields in a table which...

I have just tried this and it came back with the same error. It does not see that they exist as when you write "email3" it does not correct this to "Email3" (to reflect what the rst reads). Thanks Mark

Hello, There are 5 email addresses because there is upto 5 people to email the reports to. The code is as follows. Dim recip(5) As Variant recip(0) = rst![Email1] recip(1) = rst![Email2] recip(2) = rst![email3] recip(3) = rst![email4] recip(4) = rst![email5] it recognises the first 2 and...

Hello, I have created a recordset and am trying to reference fields within it. This works upto a certain number of fields (upto [Email2]) but then it does not recognise anything after that. The code is as follows rst.Open "SELECT TableTest.[CI Code], TableTest.[Old CI Code]...

Ok I will do that in future, thanks very much for your help. Mark

Hello Mile, It seems that the code is actually working and sending the emails but coming up with the error at the end. How can I prevent this? Thanks Mark

Thank you for your reply Mile, I have been getting no errors at all. With regards to the weird table name that is because somebody setup a wholesaler targets file and decided to call it that, I have no idea why and do not want to change it as so many people seem to link into it. As I was...

Sorry Mile was in too much of a rush, Private Sub Email_Click() Dim conn As ADODB.Connection Dim rst As ADODB.Recordset Dim CICODE As String Set conn = CurrentProject.Connection Set rst = New ADODB.Recordset rst.Open "SELECT Target_June2003.[CI Code]...