程式頭'首先宣告**容器
protected withevents phcontainer as system.web.ui.webcontrols.placeholder
'每個**中的記錄數量
private const itempertable as integer = 20
關鍵的實現部分
'建立乙個符合列印要求的**
tabpageprint = newprinttable()
'將表頭新增到此**中
call addtabletitle(tabpageprint)
'初始化記錄器
i = 0
iitemindex = istartpoint
for each clsitem in clsalldata.errorcollection
if i > 0 and i mod itempertable = 0 then
'新增**控制項到頁面中
phcontainer.controls.add(tabpageprint)
'在頁面中新增乙個換行符
call addpagebreak()
'建立新一輪的**
tabpageprint = newprinttable()
call addtabletitle(tabpageprint)
end if
'將記錄新增到**中
call additemtotable(iitemindex, tabpageprint, clsitem)
iitemindex = iitemindex + 1
i = i + 1
next
'新增**控制項到頁面中
phcontainer.controls.add(tabpageprint)
支援函式
'功能:新增頁的換行符
private sub addpagebreak()
dim ltbreak as literalcontrol
ltbreak = new literalcontrol("")
phcontainer.controls.add(ltbreak)
end sub
'功能:建立乙個符合列印要求的**
private function newprinttable() as table
dim tabsrc as new table()
tabsrc.width = unit.percentage(100)
tabsrc.attributes("border") = "1"
tabsrc.cellpadding = 4
tabsrc.cellspacing = 0
tabsrc.borderwidth = unit.pixel(2)
tabsrc.bordercolor = color.black
tabsrc.style.add("font-size", "12px")
newprinttable = tabsrc
end function
WEB 列印的相關技術分析
web 列印的相關技術分析 程式頭 首先宣告 容器 protected withevents phcontainer as system.web.ui.webcontrols.placeholder 每個 中的記錄數量 private const itempertable as integer 20...
《WEB 列印的相關技術分析》
程式頭 首先宣告 容器 protected withevents phcontainer as system.web.ui.webcontrols.placeholder 每個 中的記錄數量 private const itempertable as integer 20 關鍵的實現部分 建立乙個符...
WEB 列印的相關技術分析
程式頭 首先宣告 容器 protected withevents phcontainer as system.web.ui.webcontrols.placeholder 每個 中的記錄數量 private const itempertable as integer 20 關鍵的實現部分 建立乙個符...