Scalabium Software
Knowledge for your independence'.
Home Delphi and C++Builder tips

#153: To open the password-protected xls-file and save without password

Today I want to show how you may load some xls-file that is password-protected, and how to save xls into another file but without protection.

var
  xls, xlw: Variant;
begin
  {load MS Excel}
  xls := CreateOLEObject('Excel.Application');

  {open your xls-file}
  xlw := xls.WorkBooks.Open(FileName := 'd:\book1.xls', Password := 'qq',
ReadOnly := True);
  {save with other file name}
  xlw.SaveAs(FileName := 'd:\book2.xls', Password := '');

  {unload MS Excel}
  xlw := UnAssigned;
  xls := UnAssigned;
end;

Just replace there file names and password

Published: December 30, 1899

See also

	DBLoad
	Mail parser (ActiveX)
	Excel Reader (dll)
	Paradox ActiveX
	SMReport
	Paradox Viewer
	ABA Picture Convert
	Paradox to MS Access converter
	ABA Document Convert
	Viewer for MS Outlook Messages

Contact to webmaster