Recent content by Timoty

  1. T

    RTF emailing as Plain Text

    If anyone can give me a hand it would be appreciated. This code was working prior to my upgrade to Access 2003. Now, my email ends up containing all the RTF as plain text with code along with the narative as opposed to a nicely formated RTF email. The code exports a form to an RTF file and...
  2. T

    Upgrade 2 XP and 2003 messed up email

    Sorry, I was away for the Canadian Thanksgiving weekend. I will take a look and get back.
  3. T

    Upgrade 2 XP and 2003 messed up email

    Good day all. I had a small database that worked perfectly fine. My organization just 'upgraded' from Windows 2000 to XP and from Office 2000 to Office 2003. One of the functions was to generate a report and send the information to a set of email recipients at the click of a buton. The...
  4. T

    Disappearing default date =-)

    Point well taken. For those that forget to put in a date, well they will be logged in teh background and managemnet can deal with them.
  5. T

    Disappearing default date =-)

    The thing is, if the person doesn't touch the box, it will stay at today's date and if the date was supposed to be something other than that day's date it will remain incorrect. The only solution I can think of is to have a code that on got focus inputs that days date and asks then pops up a...
  6. T

    Disappearing default date =-)

    Is there a way on a form, to have the filed default to today’s date when a person enters that field. A confirmation asks if you want to keep that days date, and if they select no it clears the space? I want a form to default with that days date. However, I don’t want it to stay at that date...
  7. T

    Error for record counter on first entry

    For those interested, I figured out a solution. I added: If Me.RecordsetClone.RecordCount = 0 Then Forms!main!DocNum.SetFocus Else Me!txtCurrent = Me.CurrentRecord Me.RecordsetClone.MoveLast Me!txtTotal = Me.RecordsetClone.RecordCount End If
  8. T

    Error for record counter on first entry

    I have a form that needs to be locked up tight so I created a record counter instead of using the one that is built into Access. In order for this to work there is code for the on current action for the form. This works without error. However, I stripped all of the 'test'data out of the...
  9. T

    Supress error if file not found.

    I have a buton that does a number of things including sending an email. However, if, for whatever reason, a file wasn't deleted on a previous action I get an error message. I tried to fix that but then if there is no file I get an error message that there is no file found. Is there a way to...
  10. T

    Information to Email NOT as attachment

    Well that about does it. Just have to clean it up, lock it up, and make it pretty. Thank you both for your time. I have learned some really interesting and usefull tricks from this. I was able to send emails before but always had to 'code' in the addresses of the person(s) receiving the...
  11. T

    Information to Email NOT as attachment

    Well that got me a bit further. Now I get an error that says: Runtime error 3265 Item not found in this collection. When I click debug it refers me to the line: strEmail = strEmail & rstEmail("EmailAddresses") & ";" BTW, you were right about it beginning with Microsoft. The number was...
  12. T

    Information to Email NOT as attachment

    What happens if DAO object library isn't an option?
  13. T

    Information to Email NOT as attachment

    Error Sorry to carry this on but I have received the following error message that I am not sure how to fix. Compile Error: User-defined type not defined The area highlighted is: Dim rstEmail As DAO.Recordset I have attached a screenshot.
  14. T

    Information to Email NOT as attachment

    Thanks again. I am truely out of my league here. I appreciate you taking the time to explain it to me. No point in just copying and pasting. I like to understand things.
  15. T

    Information to Email NOT as attachment

    Perplexed Bob, I am somewhat perplexed. The DB is working well now but I like to understand things. What does this code actually do? Open "h:\email.rtf" For Input As #1 Do Until EOF(1) Line Input #1, strTemp strBody = strBody & strTemp & vbCrLf Loop Close #1...
Back
Top Bottom