Questione : VB6: Lima di HTML di stampa alla singola pagina

La nostra applicazione VB6 genera una lima di HTML per stampa e per inviare con la posta elettronica. Tutto sta funzionando perfettamente. Tranne, naturalmente, il tabulato va ad una seconda pagina. Il testo è soltanto alcune linee e un piccolo grafico… Ciò è la linea che usiamo alla maniglia di print.

ShellExecute, “STAMPA„, app. Percorso &„ \ rc.htm ", "", "", SW_HIDE

Is là un parametro che può essere fissato per forzare la pagina per rendere ad un singolo foglio di carta? class= del

Risposta : VB6: Lima di HTML di stampa alla singola pagina

Usare il controllo di web browser preferibilmente
WB.Visible=False
WB.Navigate app. Percorso & “\ rc.htm„
Fare mentre WB.ReadyState<4>   DoEvents
Ciclo
'O persino migliorare - senza lima:
'WB.Navigate “about.blank„
“Fare il whilw WB.ReadyState<4>  „ DoEvents
'Ciclo
'WB.Document.body.innerHtml=YourFormattedHtmlString
WB.ExecWB (OLECMDID_PRINT, OLECMDEXECOPT_DONTPROMPTUSER, 1)
'OLECMDID_PRINT = 6
'OLECMDEXECOPT_DONTPROMPTUSER = 2
'OLECMDEXECOPT_PROMPTUSER = 1