Hi all,
Is there an alternative to using the mailto function that will still open up outlook?
The problem right now is that the body length is too long, so the traditional string = "mailto:joeshmoe@blah.com?subject=test" will NOT work when attaching a message body that is over I think 220 characters or something.
I need to be able to still open up outlook with an extra long message body. Is this possible? Thanks.
I have a .csv file where I need to parse out the information.
I have imported the .csv file into access and all the data is in [Field1]
Instead of using query design, I want to create a user interface [Form] where anyone can input in the textbox the position and length of a mid function.
Example:
Last name: Position = 1 Length =15
First Name: Position = 15 Length = 30
Is it possible for users to input the numbers in texboxes to extract the data to another table?
How do you make a mass table change from http:// to mailto:. I made the field hyperlink but I wanted it to be able to email the contact.
Please help. :confused:
Hi. I have a database which store the subject title of the mailto link using the upload form. I would like to construct a mailto link that picks up the suject title from my database. However, there are spaces in the subject and the mailto link cuts off at the first spacing. In my display page, I would like to replace the spaces with %20 but have had no success with any attempts.
This is the code that add the data to the database
rs.AddNew
rs("File Name") = fileName
rs("File Size") = fileSize
rs("File Data").AppendChunk fileData
rs("Content Type") = contentType
rs("Title") = "<td valign=top><table width=100% border=0 cellspacing=3 cellpadding=0><tr><td valign=top bgcolor=#a1be1e><font color =white><span class=mainNav4 style5>" & Title & " </span><span class=bodyC2 style5> </span></font color></tr>"
rs("Text") = "<tr><td valign=top><span class=bodyC2>" & Text & " </span>"
rs("Price") = "</span> <span class=style6><strong><font color=#FF6600> " & Price & "**each</font></strong></span>"
rs("Note") = "<br><span class=style6><em><font color=#a1be1e> Note:** " & Note & " </font></em></span><span class=bodyC2></span></td></tr>"
rs("Button") = "<tr><td><br><a href=mailto:GM@acx.com.sg?subject=" & Button & " class=outlinerCen> Enquire </a><br><br></td></tr></table></td></tr><tr><td colspan=2 valign=top><span class=dottttt>.................................................. .................................................. ...</span></td></tr></table><br>"
And this is to display
If NOT rs.EOF Then
Response.Write "<body><table width=350 border=0 cellpadding=0 cellspacing=5><tr><td width=5 valign=top><table border=0 cellpadding=0 cellspacing=0 class=outlinerProducts><tr><br><td><img src=""file.asp?ID=" & rs("Id") & """width=130 height=130></td></tr></table></td>"
Response.Write rs ("Title") & "<br>"
Response.Write rs ("Text") & "<br>"
Response.Write rs ("Price") & "<br>"
Response.Write rs ("Note") & "<br>"
Response.Write rs ("Button") & "<br>"
rs.MoveNext
end if
Some assistance would be appreciated. Thank you.
Wolf
MS Access 2000 - Quite simply, on a form I have an Email field and I have the "Is Hyperlink" property set to yes. In the On-Click event of this email field I use this single line of code below to open a new outlook (2007) email with the address already entered. Staff will be entering the email address themselves as part of the clients contact details Form.
Code:
FollowHyperlink "mailto: " & [Email]
This is all fine, however access also tracks [URL] .... onto the end of the email address and tries to also open a web page which obviously fails.
Is there something somewhere I can tweak that tells access to always only treat the text in this field as an email address, and when clicked open an email?
I have a form where the user puts in a email address, eg test @ myserver.net
So the link opens a new mail it has to be prefixed by mailto:
How can I automatically replace the address the user enters with the format mailto:test@myserver.net
I'm wanting to use a cell from a table for the body of an email I am sending
I am trying to use the following code right now:
.Body =
but I'll change it if you have something better!
thanks
I have searched (not knowing what to search for), tried Access help and most importantly experimented, but alas no luck.
I have a header section and body/main section of a form.
I want the background image to fill the body/main section only, but instead it seems to cover the whole form, including the header section.
Is it possible to limit an image to the body section of a form only.
Thank you in advance
I almost have what I need, but I am not quite there. I am a VBA novice and need help. I couldnt understand some of the code I have searched for on this topic.
I have a query that returns exactly the results I want. By using a SendObject macro I can accomplish sending the message with a .txt file attached. What I want to do is instead of having the attachment I want to send my query "FaxReportQueryReport" in the body of the email. No set address, just a set RE: line of "Today's Deliveries".
I can create PDF's, DOCX's retaining the PDF formatting save them back to different network locations and then retrieve and attach to emails that are generated for different areas, however I have been asked to scrap the attachment and insert the content of the attachment directly into the body of the email. I have had a good browse around the net with no real approach. The code below simply gets the recepients email address adds the subject and then is looking for the .HTMLBody which simply comes through in the body as
"O:divAKLResgroupE - ReportsHTML FilesDRAFT TEST .html".
.To = RScoloumdetail(2) ' Gets Email Address
.CC = ""
.BCC = ""
[code]....
Hey, I was wondering how I would tell Access to set bold on my email message. I use this code to generate the email:
Private Sub Email_Click()
strToWhom = [EMAIL]
strMsgBody = "This is my email body, I would like this word bold"
DoCmd.SendObject , , , strToWhom, , , "Subject", strMsgBody, True
End Sub
Thanks for any help provided.
Could you please help me and advise if it's possible to send report from MS Access by mail - having report as a content of an e-mail instead of attachement?
View 2 Replies View RelatedI have a query table in Access 2007 with requests pending an individuals review and approval. I would like to create an automatic email each day to that individual which includes the actual query table impeded as part of the body of the email (not as an attachment).
View 1 Replies View RelatedI'm trying to put multiple records of data from a subform in a single e-mail, and my Outlook calendar. I have a contracting business, and on my Orders form (which details a single client), I have a sub-form that lists all the items to be done at that client's home (a different record for each work item). When I send an e-mail, or post the appointment to the Outlook calendar, I am trying to list all those records in the body of the e-mail, and/or in the Notes section of the appointment. I created the query to call the records, but have not figured out a way to use it in the code.
View 14 Replies View RelatedWith the code below , I send the report: “ESERT4H”, in email body. How I could add yet another report on the same body of the email ?
DoCmd.OutputTo acOutputReport, "ESERT4H", "HTML(*.html)", "D:Access empESERT4H.html", False, "", 0, acExportQualityScreen
Dim Out As Outlook.Application
Dim NS As Outlook.NameSpace
Dim Folder As MAPIFolder
Dim Mens As MailItem
[Code] ....
I currently have a form with the below fields (example names)
FRMFormName001
Field001
Field002
Field003
Field004
RPTReportName001
Once the info is filled out we click a button that converts it into a report and once the information is confirmed correct you have to click another button Email it off, this is currently done by a macro creating the report as a attachment PDF File.
The system has now changed and they now want the details in the body of an Email, is it possible to make the details be copied straight into an Email body by a simple macro button click or similar?
I placed all of the fields in the Form Header. I found this when I tried to view the form in Form View I could not scroll down because of the scroll bars were missing even though the properties indicated they were both enabled.
My question is how do I move everything from the Form Header into the body? When I right click on the form and try to deselect Form Header I get a warning message saying everything will be deleted. how to copy and paste?!
I have a database to send e-mails from access trough Outlook. The issue is that I would like the body of the e-mail to have hyperlinks, colours, bolds and that I can get it from plain text.
This is the code I have:
Dim MyDB As Database
Dim MyRS As Recordset
Dim MyTable As Recordset
Dim objOutlook As Outlook.Application
Dim objOutlookMsg As Outlook.MailItem
Dim objOutlookRecip As Outlook.Recipient
Dim objOutlookAttach As Outlook.Attachment
[Code] ....
How can I make the body to be HTML format, or, can I have a e-mail template storaged in my PC and then indicate to use it whenever the e-mail is sent?
I made a form in Acces now i want to make a button in that form that if a user click on it it wel open a new email message with the form in it.. so NOT if a attachement but directly in the email body.
I'm sure there is a way to do this true vba or something else...
NameStr As String
I have made a name string
Now I would like to add the nameStr near "Dear " how can i do this?
strbody = "<H3><B>Dear [I want the placed nameStr here] </B></H3>" & _
bodyStr & _
"<br><br><B>Thank you</B>"
I am trying to work my way into putting the content of my report into the body of an e-mail. I have used the following code to do so but I keep on getting the error: "An Expression You Entered Is the Wrong Data Type for one of the Arguments"
Code:
Private Sub Command278_Click()
On Error GoTo ER
Dim db As Database
Dim rstOpenPurchaseOrders As Recordset
Dim strSQL As String
[Code] .....
how to properly get my email body to format correctly? I am obviously misusing the .HTMLbody/tags incorrectly. The email generates with the attachments as expected, but the email body message is just runon.
Code:
Private Sub Command29_Click()
Dim appOutLook As Outlook.Application
Dim MailOutLook As Outlook.MailItem
Set appOutLook = CreateObject("Outlook.Application")
[code]....
I have a query where I collect data for different vendors and their purchase orders, products deadlines etc.
Is it possible via access to generate a report and via outlook send in the email body a message where is showing the purchase order date of delivery and priority? Or can that be done via a form?
I need to send different reports to a bunch of different persons every hour... I had several macros that did it for me, But Then they wanted me to include a e-mail body that was more than 255chars, so i had to go VBA and i have this (for every set of persons and Reports):
Private Sub Command38_Click()
On Error GoTo ErrorHandler
DoCmd.SendObject acReport, "REPORT NAME", "Extension", "EMAILS", "", "SUBJECT", "EMAIL BODY", True, ""
ExitHandler:
Set rs = Nothing
Set db = Nothing
Exit Sub
ErrorHandler:
[code]....
so everything is good, but NOW they want the body of the email to contain another paragraph totally separated from the first one and they want it highlited and also in Red, How can i add Html to this or do i have to use another method?
I have tried this:
Public Sub TestEmail()
Dim appOutLook As Outlook.Application
Dim MailOutLook As Outlook.MailItem
Set appOutLook = CreateObject("Outlook.Application")
[code]...
But it keeps on giving me errors, about objects not being defined.
With this very simple command, I have the ability to send emails to several clients, reporting many things, quotations etc.
Private Sub Command84_Click()
DoCmd.SendObject , , , , , , "SOMETHING", [SalesGroupingField] & "" & [1], True, ""
End Sub
Now, i want, on the body of the emai, to display many records, it is from Nothwind, how can i display on the body of the email all records from this report?
I have copied a VBA from the net and it is working fine and producing my report on outlook body text but one problem me facing is that it is pasting only first page if the second page is there it is not coming in outlook text body this what i want rest every thing is correct the code is:
Private Sub Command88_Click()
Const ForReading = 1, ForWriting = 2, ForAppending = 3
Dim fs, f
Dim RTFBody, strTo
Dim MyApp As New Outlook.Application
Dim MyItem As Outlook.MailItem
[Code] .....