accessman2
Registered User.
- Local time
- Today, 11:31
- Joined
- Sep 15, 2005
- Messages
- 335
When I send e-mail from Access via outlook with a link, there are warning message when the user click the link to open the file:
WARNING: web pages, executables, and other attachments may contain viruses or scripts that can be harmful to your computer. It is important to be certain that this file is from a trustworthly source.
What would you like to do with this file?
Open it
Save it to disk.
(E drive is sharing drive)
Dim MiOutlook As Outlook.Application
Dim MiCorreo As Outlook.MailItem
Dim NombreFichero As String
Dim NombreFicheroConRuta As String
Set MiOutlook = New Outlook.Application
Set MiCorreo = MiOutlook.CreateItem(olMailItem)
With MiCorreo
.To = "alan@yahoo.com"
.Subject = "Test"
.BodyFormat = olFormatHTML
.HTMLBody = "<A HREF='E:\db1.mdb' >Open database</A>"
.Send
End With
Set MiCorreo = Nothing
Set MiOutlook = Nothing
How can I disable this warning message?
Does anybody know?
Please let me know, thanks.
WARNING: web pages, executables, and other attachments may contain viruses or scripts that can be harmful to your computer. It is important to be certain that this file is from a trustworthly source.
What would you like to do with this file?
Open it
Save it to disk.
(E drive is sharing drive)
Dim MiOutlook As Outlook.Application
Dim MiCorreo As Outlook.MailItem
Dim NombreFichero As String
Dim NombreFicheroConRuta As String
Set MiOutlook = New Outlook.Application
Set MiCorreo = MiOutlook.CreateItem(olMailItem)
With MiCorreo
.To = "alan@yahoo.com"
.Subject = "Test"
.BodyFormat = olFormatHTML
.HTMLBody = "<A HREF='E:\db1.mdb' >Open database</A>"
.Send
End With
Set MiCorreo = Nothing
Set MiOutlook = Nothing
How can I disable this warning message?
Does anybody know?
Please let me know, thanks.