GeoffS Level: VB Lord

 Registered: 29-09-2004 Posts: 538
|
Re: to check file exist and send email
You don't say which App you are using, but try this for MSAccess
Dim strFile As String
strFile = "C:/My Documents/MyFile.txt" -- (backslash keeps getting removed when I post??)
If Dir(strFile) <> "" Then
DoCmd.SendObject acSendNoObject, , , "myemailaddress@myisp.net", , , "File Found", "Full message detail here", False
End If
[Edited by GeoffS on 07-08-2008 at 01:17 PM GMT]
____________________________
multi-tasking - the ability to hang more than one app. at the same time.
|