		DO wwSmtp.prg
		LOCAL loSmtp as wwSmtp
		loSmtp = CREATEOBJECT("wwSmtp")

		*loSmtp.cMailServer = "Localhost"
		loSmtp.cMailServer = "mail.tovacompu.com:26"
		loSmtp.lUseSsl = .T. && Google requires TLS

		*** Optional authentication if server requires it
*!*			loSmtp.cUsername = "eddytorres@tovacompu.com"
*!*			loSmtp.cPassword = "3ddy2010"

		loSmtp.cSenderName= "Eddy Torres"
		loSmtp.cSenderEmail = "eddytorres@tovacompu.com"

		*loSmtp.cRecipient = "ricks22@hotmail.com,admin@mydomain.com"
		*loSmtp.cCcList = "admin2@mydomain.com,admin@monitor.com"
		
		loSmtp.cRecipient = "mreddytorres@gmail.com"

		*** Optional - custom content type - text/plain by default
		loSmtp.cContentType = "text/html"

		loSmtp.cSubject = "Activación Visual FAC - "
		loSmtp.cMessage = "<b>Empresa: </b>"
		

		*** Optionally attach files
		*loSmtp.cAttachment = "c:\rick4453.jpg,c:\sailbig.jpg"

		*** Optional - a couple of options
		*loSmtp.cReplyTo = "james@cranky.com"
		loSmtp.cPriority = "High"

		loSmtp.Connect()

*!*			*** Send many messages to different addresses
*!*			SCAN 
*!*			   ? loSmtp.SendMessage( TRIM(Email) )
*!*			   ? loSmtp.cErrorMsg
*!*			ENDSCAN

		loSmtp.SendMessage( 'eddytorres@tovacompu.com' )

		loSmtp.Close()
