If any one out there has managed to stop the print & save dialogue boxes from being displayed could they PLEASE contact me.
I am writing an automation process using IE6. I am using an OLEVariant and all other features of the app are perfect, except the print & save functions, which require confirmation each time. I am using the execCommand method, in which I am setting the display dialog parameter to False, as well as setting the application objects Silent property to True as well! Still the dialogs appear. :-((
As the system design is to be unattended it is crucial I find some fix/way around. Here is an example of what I am doing:
procedure TForm1.btnTestClick(Sender: TObject);
var
ovIE: OLEVariant;
begin
ovIE:=CreateOLEObject('InternetExplorer.Application');
Try
ovIE.Visible:=True;
ovIE.Silent:=True;
ovIE.Navigate(' Repeat
Sleep(250);
Until Not ovIE.Busy;
{...
Do my processing of required pages
...}
ovIE.Document.execCommand('Print',False,Null); {Same prob with save command!}
Except
ovIE.Quit;
End;
end;
ANYONE with ANY ideas of how I might fix or get around the problem PLEASE PLEASE contact me. The program is only waiting for this issue and it can be implemented.
TIA
Ian.
I am writing an automation process using IE6. I am using an OLEVariant and all other features of the app are perfect, except the print & save functions, which require confirmation each time. I am using the execCommand method, in which I am setting the display dialog parameter to False, as well as setting the application objects Silent property to True as well! Still the dialogs appear. :-((
As the system design is to be unattended it is crucial I find some fix/way around. Here is an example of what I am doing:
procedure TForm1.btnTestClick(Sender: TObject);
var
ovIE: OLEVariant;
begin
ovIE:=CreateOLEObject('InternetExplorer.Application');
Try
ovIE.Visible:=True;
ovIE.Silent:=True;
ovIE.Navigate(' Repeat
Sleep(250);
Until Not ovIE.Busy;
{...
Do my processing of required pages
...}
ovIE.Document.execCommand('Print',False,Null); {Same prob with save command!}
Except
ovIE.Quit;
End;
end;
ANYONE with ANY ideas of how I might fix or get around the problem PLEASE PLEASE contact me. The program is only waiting for this issue and it can be implemented.
TIA
Ian.