FS106

BarryStevens

I do this:

ControlsOCXFolder="D:\Revsoft\Controls"
utility("MAKEDIR",ControlsOCXFolder)

//******SRP OLE******//
errCodes=''
Ok=CopyOSFile('SRPControls.OCX', ControlsOCXFolder, 1)
if Ok else
status = Get_Status(errCodes)
if status then
FsMsg(errCodes)
end
end

then get message FS106 Access denied by operating system.
Tried different folders and drives.

What have I done wrong. (where could some windows/OI setting be screwed)

DonBakke

Does the target folder actually get created?

BarryStevens

Yes and I can manually copy/paste

BarryStevens

Different PC, same error
Will try a completely different file

DonBakke

Will try a completely different file

Good idea. If that also fails, try using the Windows Temp folder as another comparison test.

BarryStevens

Ok=CopyOSFile('c:\temp\New Text Document.txt', ControlsOCXFolder, 1)

Fail

Ok, back to what I have been doing for years. (Yes have UAC - exclude etc etc)

BarryStevens

this works:

osread OcxFile from 'SRPControls.OCX' then
oswrite OcxFile to ControlsOCXFolder:"\SRPControls.OCX"
end