This code is part of a email package that sends out emails automatically to our salesreps - and has worked great in other systems here...

but..

the latest one I released to production just blew up when run for the 1st time (at least that I've been told).

Here is the code..

*****************************
IF pbMailSent
	*-- Read Log File
	nFileHandle = FOPEN(sLogFile, 10)
	nFileEnd = FSEEK(nFileHandle, 0, 2)
	nFileBeg = FSEEK(nFileHandle, 0)
	IF nFileEnd > 0
--->Bad Line--->  sFileData = FREAD(nFileHandle, nFileEnd)
	ELSE
		sFileData = ''
	ENDIF
	nFileClose = FCLOSE(nFileHandle)
		
	DO LogMail WITH sFileData, .T.
 	*=MESSAGEBOX('Email sent successfully!' , 48, 'RSVP')
WAIT WINDOW 'Email sent successfully to ' + SUBSTR(psMailTo,2,LEN(psMailTo)-2) NOWAIT
Else
	WAIT CLEAR
  =MESSAGEBOX('Email not sent.  There was an error', 48, 'RSVP')
ENDIF
*********************************


In the bad line above I get the error message 'Function argument, type, or count is invalid'.

These are the values

nfileHandle = 49
nfileEnd    = 81500

They are numeric....  

so any ideas???

Thanks a heap!
Tommy

Tommy Tillman A+ NetWork+ MCP