Sub mail..??

Sub sendmail(strEpost, strKlubbNamn, strPass)
Dim MyBody
Dim MyCDONTSMail

Set MyCDONTSMail = CreateObject("CDONTS.NewMail")
    MyCDONTSMail.From= "icaaq@icqmail.com"
MyCDONTSMail.To= strEpost
MyCDONTSMail.Subject="testar"
MyBody = vbCrLf & vbCrLf
MyBody = MyBody & "testar lite till " 
MyCDONTSMail.Body= MyBody
MyCDONTSMail.Send
set MyCDONTSMail=nothing
    
End Sub

skulle inte detta funka........

[redigerat]
strKlubbNamn och strPass har jag avsikligt tagit bort(dem finns med i bodyn annars)
[/redigerat]
[redigrat2]
när jag anropar suben använder jag

Call sendmail(strEpost, strKlubbNamn, strPass)

[/redigerat2]
------------------
ibland tror jag att jag kan lite för lite än vad jag kan ....

[Redigerat av icaaq den 15 maj 2001]

[Redigerat av icaaq den 15 maj 2001]

får du något felmeddelande?

är strEpost en giltig e-postadress?

------------------
<A HREF="http://cartman.nu" TARGET=_blank>
nobody expects the spanish inquisition!</A>

inge felmess.....det ser ut att gå som det ska....

men jag får inga mail.... :(

------------------
ibland tror jag att jag kan lite för lite än vad jag kan ....

strEpost är en giltig epost adress...

varför funkar det inte...

det måste väl gå att ha CDONTS i en sub

:e :e

------------------
ibland tror jag att jag kan lite för lite än vad jag kan ....