GetParent(GetParent(UserControl.ContainerHwnd))
Теперь осталось самое простое - напечатать документ без заголовков.
footer = RegRead("Software\Microsoft\Internet Explorer\PageSetup", "footer", HKEY_CURRENT_USER)
header = RegRead("Software\Microsoft\Internet Explorer\PageSetup", "header", HKEY_CURRENT_USER)
RegWrite "Software\Microsoft\Internet Explorer\PageSetup", "footer", "", HKEY_CURRENT_USER
RegWrite "Software\Microsoft\Internet Explorer\PageSetup", "header", "", HKEY_CURRENT_USER
IE.ExecWB 6, 2
RegWrite "Software\Microsoft\Internet Explorer\PageSetup", "footer", footer
RegWrite "Software\Microsoft\Internet Explorer\PageSetup", "header", header
Сейчас этот форум просматривают: Google-бот и гости: 40