>This code seemed to work OK:
>
>lcheck = FILETOSTR('C:\Temp\Project2.mpp')
>llcontinue = .F.
>FOR i = 1 TO 6000
> IF UPPER(SUBSTR(lcheck,i,17)) = 'MICROSOFT PROJECT'
> lcFound = SUBSTR(lcheck,i,21)
> EXIT
> ENDIF
>ENDFOR
>
>IF NOT EMPTY(lcFound)
> RETURN(lcFound)
>ELSE
> RETURN('Unknown')
>ENDIF
>
>Now I just need to get this into a FoxWeb call and test it against my Cold Fusion web site. Thanks again.
Bret,
What kind of performance were you getting with this? One other question is why are you loading the whole MPP into memory? Some of our projects are huge (over 2 MB) so loading it into memory would take an excessive amount of time.
Larry Miller
MCSD
LWMiller3@verizon.netAccumulate learning by study, understand what you learn by questioning. -- Mingjiao