by kAOs (9 Submissions)
Category: Windows System Services
Compatability: VB 6.0
Difficulty: Unknown Difficulty
Originally Published: Wed 31st January 2001
Date Added: Mon 8th February 2021
Rating: (1 Votes)
if it's email u want this is what u r looking 4...CDO 2000 LIB...send mail using CDO SMTP allowing [from], [to], [subject],
API Declarations
'Reference CDO for Windows 2000 lib
Dim cdo2configuration As New CDO.Configuration
Dim cdo2fields As ADODB.Fields
Dim cdo2message As New CDO.Message
Set cdo2fields = cdo2configuration.Fields
With cdo2fields
.Item(cdoSMTPServer) = "mail.server.com.au"
.Item(cdoSendUsingMethod) = cdoSendUsingPort
.Update
End With
Set cdo2message.Configuration = cdo2configuration
cdo2message.From = "[email protected]"
cdo2message.To = "[email protected]"
cdo2message.Subject = "Subject"
cdo2message.AddAttachment "C:\file.att"
cdo2message.Send
end function
No comments have been posted about if it's email u want this is what u r looking 4...CDO 2000 LIB...send mail using CDO SMTP allowing . Why not be the first to post a comment about if it's email u want this is what u r looking 4...CDO 2000 LIB...send mail using CDO SMTP allowing .