Try running vfp8.exe with the /regserver switch, i.e.
"c:\program files\microsoft visual foxpro 8\vfp8.exe" /regserver
I think VFP8 is not registered correctly on your machine. Did you by any chance install an earlier version of VFP after installing VFP8?
>Thanks for posting Jim,
>
>Running this code gives me this error message:
>
>OLE error code 0x8002801d: Library not registered.
>
>at this line of code:
>_VFP.ACTIVEPROJECT.FILES.ADD('testxx.prg')
>
>
>
>
>
>>Something else must be going on. This works fine for me:
>>
>>
>>erase testxx.pj?
>>CREATE PROJECT testxx nowait
>>TEXT TO lcText NOSHOW
>> do testxx2.prg
>> MESSAGEBOX('test')
>>endtext
>>DELETE FILE testxx.prg
>>DELETE FILE testxx2.prg
>>StrToFile('x = 1','testxx2.prg',0)
>>?STRTOFILE(lcText,'testxx.prg',0)
>>_vfp.ActiveProject.files.add('testxx.prg')
>>_vfp.ActiveProject.files.add('testxx2.prg')
>>_vfp.ActiveProject.close
>>clear all
>>modify project testxx nowait
>>with _vfp.ActiveProject
>> for each oFile in _vfp.ActiveProject.Files
>> cDir=JustPath(ofile.name)
>> endfor
>>endwith
>>_vfp.ActiveProject.close
>>return
>>
>>
>>Can you try this code?
Jim Saunders
Microsoft
This posting is provided “AS IS”, with no warranties, and confers no rights.