We need to use Apollo (Delphi4) to display data which was created using a Clipper program.
It uses the SixNSX driver, and one of 2 tables is encrypted. Both tables have production indexes with 2 tags.
We have no problem opening and browsing the unencrypted table, but are having problems with the encrypted file. It doesn't seem to assign a tagarea number to the tag and can't find records when seeked.
The code used is:
ApTbl2.close;
ApTbl2.TableName := sDataSource+'TManu.dbf';
ApTbl2.OEMTranslate := True;
ApTbl2.Open;
ApTbl2.SetPassword('EAGLE');
ApTbl2.refresh;
i := ApTbl2.SetOrder( ApTbl2.TagArea( 'MCODE' )); ApTbl2.GoTop;
if ApTbl2.seek(s) then.......
Now if we use an enencrypted version of the table and take out the SetPassword line it works OK. That isn't an option when the program goes live though.
Can anyone out there help by letting us know where we are going wrong?
Many thanks
Roger
It uses the SixNSX driver, and one of 2 tables is encrypted. Both tables have production indexes with 2 tags.
We have no problem opening and browsing the unencrypted table, but are having problems with the encrypted file. It doesn't seem to assign a tagarea number to the tag and can't find records when seeked.
The code used is:
ApTbl2.close;
ApTbl2.TableName := sDataSource+'TManu.dbf';
ApTbl2.OEMTranslate := True;
ApTbl2.Open;
ApTbl2.SetPassword('EAGLE');
ApTbl2.refresh;
i := ApTbl2.SetOrder( ApTbl2.TagArea( 'MCODE' )); ApTbl2.GoTop;
if ApTbl2.seek(s) then.......
Now if we use an enencrypted version of the table and take out the SetPassword line it works OK. That isn't an option when the program goes live though.
Can anyone out there help by letting us know where we are going wrong?
Many thanks
Roger