| Instructions using Blat2vfp
In your startup prg, put the following command.
IF
file("blat.dll")
DECLARE Integer Send IN "blat.dll" STRING
ELSE
m_question=MESSAGEBOX("The file Blat.dll is
missing" ; +CHR(13)+"You cant send email without
it";
+CHR(13)+"Please check with your admin to"+
;
+"get a copy",1,"Missing blat.dll file")
IF m_question = 2
do shutoff
ENDIF
endif
either drop the class email on a form
or call it from a prg like
oemail=create("blat")
oemail.to="someone@somwhere.com"
oemail.subject="subject of Email"
oemail.message="blat.txt" &&
your email ** message.
and finally, either in code, or in a form control
oemail.send()
release oemail
I have included a sample of how someone could write
an install program, and a simple sample of a email
sending utility which works. |
