查看单个帖子
旧 2009-04-12, 08:48 PM   #1
yang686526
高级会员
 
注册日期: 06-11
帖子: 14579
精华: 1
现金: 224494 标准币
资产: 234494 标准币
yang686526 向着好的方向发展
默认 【转帖】edrawings active x - printing muliple pages

edrawings active x - printing muliple pages
hello all,
i have a vb.net application i have written to open drawings using the api and then print them to my default printer which is a tif printer.
everything is working fine except when i have a drawing that has multiple pages. it will open the drawing and just print the first page and ignore the rest of the pages in the file.
if i open the same drawing with the edrawings program and print it, i have the option to select "all" to get all the pages. by selecting "all" it will print all the pages.
i need this to print all the pages using the api calls.
can anyone help with this issue?
regards,
travis
try these codes..
***********
sub main()
dim retval as string
set swapp = application.sldworks
set swmodel = swapp.activedoc
if swmodel is nothing then msgbox "no document loaded!", vbcritical: end
if swmodel.gettype = swdocdrawing then
retval = swmodel.printout2(0, 0, 1, false, 0, 0, false, 0)
end if
end sub
deepak gupta
sw2007 sp5.0
sw2009 sp2.1
yang686526离线中   回复时引用此帖
GDT自动化论坛(仅游客可见)