¿Cómo puedo imprimir automáticamente la página web abierta con un objeto explorer

[Miguel A.]

Efectivamente amigos, creo un objeto explorer con el siguiente código

 

objeto=Createobject("InternetExplorer.Application")
objeto.Visible =.T.
objeto.navigate2("http://www.xxx.es/")
ObjTexto ='Cargando la página intermedia.'
Do While objeto.busy .or. objeto.readystate#4
 Wait Window ObjTexto Time(0.5)
 ObjTexto= ObjTexto+'.'
Enddo
objeto.visible=.t.

 

Y necesito imprimir la página.

Guardo el contenido html en un campo memo y si lo imprimo me crea una página similar, pero tienen muchos botones y código javascript y no se ve bien, por lo que no encuentro otra solución que imprimirla automáticamente, preferentemente en un fichero pdf.

 

Agradezco sus ideas al respecto.

Un saludo,

 

Miguel A.

 

[Ricardo Pina]

Hola Miguel

 

En el link te explica como podes lograrlo

 

http://support.microsoft.com/kb/265126/es

 

Saludos

--

            

                   Ricardo Pina

Desarrollo y Servicios Informáticos

                  Profesionales
               www.dsip.com.ar

 

 

[Miltiño]

Suponiendo que tienes insertado el objeto internet (oIE) explorer en un Formulario, deberías llamar a imprimir con el siguiente comando, que podría estar en el evento click() de un botón de comando.

ThisForm.oIE.Document.execCommand("Print",.F.,0)

Espero te sirva.

Att.

ING. Milton Cachipuendo
ServySistem OnLine

[Miguel A.]

Muchas gracias a ambos.
Miguel A.