MB Software Solutions wrote: > Grigore Dolghin wrote: > >> Make sure you don't have two consecutive spaces anywhere. >> >> > That would cause it to fail? Also, must I wrap directory/folder > locations in quotes for scenarios where it's "Documents and > Settings\Mike\MyFile.txt" ?? > > Hi MB,
Not sure about the two spaces but I have a test program that I use and keep changing until it works, then paste this into my real program (see below). As my code is set up you will not get two spaces together. I used to use -f and -i together but then wanted something different with -replyto Have you got the syntax.txt that comes with the DLL? You will need to make sure paths are delimited. See the attach bit below. HTH Peter cEmailto='[EMAIL PROTECTED]' cCCto='' cBCCto='' lcResult = "FAILED" cEmailSubject='this is the subject of a test email' *cEmailFrom='operasystem' cEmailFrom='[EMAIL PROTECTED]' cAttach='my long file name.doc,and another long name.txt' cEmailbody='this is the body' lcFile='xtradata.dir' && does not get sent * now sort out attachments as maybe more than one. cTemp1='' cTemp2='' IF !EMPTY(cAttach) IF ',' $ cAttach DO while ',' $ cAttach * get first part of string cTemp1 = SUBSTR(cAttach,1,AT(',',cAttach)-1) * add to new string cTemp2 = cTemp2 + [ -attach ] + '"'+cTemp1+'"' * chop this off original string cAttach = SUBSTR(cAttach,AT(',',cAttach)+1) ENDDO * do last entry cTemp2 = cTemp2 + [ -attach ] + '"'+cAttach+'"' cAttach = cTemp2 ELSE cAttach = [ -attach ] + '"'+cAttach+'"' ENDIF ENDIF lcSend = lcFile + ; IIF(EMPTY(cEmailto),'',[ -to ] + Chr(34) + AllTrim(cEmailTo) + Chr(34)) + ; IIF(EMPTY(cCCto),'',[ -cc ] + Chr(34) + AllTrim(cCCTo) + Chr(34)) + ; IIF(EMPTY(cBCCto),'',[ -bcc ] + Chr(34) + AllTrim(cBCCTo) + Chr(34)) + ; [ -subject ] + Chr(34) + AllTrim(cEmailSubject) + Chr(34) + ; [ -f [EMAIL PROTECTED] + ; [ -replyto ] + Chr(34) + AllTrim(cEmailFrom) + Chr(34) + ; [ -server 192.168.0.9] + ; [ -body ] + Chr(34) + AllTrim(cEmailBody) + Chr(34) + ; [ -u ] + Chr(34) + "myusername" + Chr(34) + ; [ -pw ] + Chr(34) + "mypassword" + Chr(34) + ; cAttach Declare Integer Send In system\blat.DLL STRING blatstring lcSendCmd = "Send(lcSend)" If &lcSendCmd == 0 WAIT WINDOW "Success" ELSE WAIT WINDOW "Failed to Send" ENDIF _______________________________________________ Post Messages to: ProFox@leafe.com Subscription Maintenance: http://leafe.com/mailman/listinfo/profox OT-free version of this list: http://leafe.com/mailman/listinfo/profoxtech Searchable Archive: http://leafe.com/archives/search/profox This message: http://leafe.com/archives/byMID/profox/[EMAIL PROTECTED] ** All postings, unless explicitly stated otherwise, are the opinions of the author, and do not constitute legal or medical advice. This statement is added to the messages for those lawyers who are too stupid to see the obvious.