EXPÉDIER UN EMAIL : VFPWINSOCK / VFPSENDMAIL : EXPÉDITION DE MAIL DIRECTEMENT EN APPELANT WINSOCK

* exemple d'appel simplifié 
  o=CREATEOBJECT("VFP_Winsock_Send_Mail")
  o.TO        = "destinataire@email.com"
  o.Subject   = "Hello World"
  =o.send()
  o=Null

* exemple exédition mhtml + pièce jointe
  o=CREATEOBJECT("VFP_Winsock_Send_Mail")
  o.TraceFile = "c:\temp\VFPsendmail.txt"
  o.smtp_host = "MON_SERVEUR_DE_MAIL"
  o.from = "MON_EMAIL"
  o.to = "TON_EMAIL"
  o.Subject = "Test Mhtml + joint"
  o.data_mhtml= "exemple.mht"
  o.attachment = "c:\temp\renard.jpg"
  IF not o.send()
    ? "Erreur : " + o.Erreur
  ENDIF
  o=Null