Hi there,

I'm trying to send emails through office365, and I'm having no luck so far...

  
  dim c as new CURLSMBS
  
  dim result as new CurlEmailMBS
  
  result.SetServer("smtp.office365.com:587",true)
  
  result.SMTPUsername="aValidUserName"
  result.SMTPPassword="aPassword"
  result.Subject="subject"
  result.SetFrom("some...@somewhere.com","Some One")
  result.HTMLText="some html"
  result.PlainText="some plain text"
  result.AddTo("some...@somewhere.com","Some One")
 
  if c.SetupEmail(result) then
    dim errorCode as integer=c.Perform//=35
    dim errorMessage as string=c.LasterrorMessage//=error:140770FC:SSL 
routines:SSL23_GET_SERVER_HELLO:unknown protocol
  end if

Any pointers? Christian, I can send you the credentials if you want to take a 
stab at this...

Thanks!

Maximilian Tyrtania
http://www.contactking.de

_______________________________________________
Mbsplugins_monkeybreadsoftware.info mailing list
mbsplugins@monkeybreadsoftware.info
https://ml01.ispgateway.de/mailman/listinfo/mbsplugins_monkeybreadsoftware.info

Reply via email to