關於buildDoc函數的一點改進,增強分頁列印效果

來源:互聯網
上載者:User
列印|分頁|函數 本文首發於我的Blog:http://nice90.blogone.net
http://www.blogcn.com/user2/nice90/main.asp?id=1657409
buildDoc函數在網路上很出名了,這個函數是將web頁面中某個Table的內容全部匯入到Word文檔中進行分頁列印。但是有一個缺陷是原來的buildDoc程式產生的Table在列印的時候不會列印出來Table的Border。於是我將該程式進行了修改,使得列印的時候能夠列印出來黑色的Border。主要是在程式中加入了下面兩句:
以下內容為程式碼:

objWordDoc.Application.ActiveDocument.Tables(1).Borders.InsideLineStyle = True
objWordDoc.Application.ActiveDocument.Tables(1).Borders.OutsideLineStyle = True


完整的程式如下:toWord.htm

<html>
<head>
<title>Build Document by Script</TITLE>
</HEAD>
<body>
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/office97/html/output/F1/D4/S5AB0B.asp
<br>
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/office97/html/output/F1/D4/S5AC00.asp
<br>
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/office97/html/output/F1/D4/S5A856.asp
<br>
<Table id="myData" border="0" cellpadding="5" cellspacing="1" bgcolor="#000000">
<Tr align=center bgcolor="#ffffff">
<Td>產品名稱</Td>
<Td>產品描述</Td>
<Td>產品單價</Td>
<Td>產品等級</Td>
</Tr>
<Tr align=center bgcolor="#ffffff">
<Td>產品一</Td>
<Td>This is a test</Td>
<Td align=right>300.50</Td>
<Td>一級</Td>
</Tr>
<Tr align=center bgcolor="#ffffff">
<Td>產品二</Td>
<Td>This is a test</Td>
<Td align=right>300.50</Td>
<Td>一級</Td>
</Tr>
<Tr align=center bgcolor="#ffffff">
<Td>產品三</Td>
<Td>This is a test</Td>
<Td align=right>300.50</Td>
<Td>一級</Td>
</Tr>
<Tr align=center bgcolor="#ffffff">
<Td>產品一</Td>
<Td>This is a test</Td>
<Td align=right>300.50</Td>
<Td>一級</Td>
</Tr>
<Tr align=center bgcolor="#ffffff">
<Td>產品二</Td>
<Td>This is a test</Td>
<Td align=right>300.50</Td>
<Td>一級</Td>
</Tr>
<Tr align=center bgcolor="#ffffff">
<Td>產品三</Td>
<Td>This is a test</Td>
<Td align=right>300.50</Td>
<Td>一級</Td>
</Tr>
<Tr align=center bgcolor="#ffffff">
<Td>產品一</Td>
<Td>This is a test</Td>
<Td align=right>300.50</Td>
<Td>一級</Td>
</Tr>
<Tr align=center bgcolor="#ffffff">
<Td>產品二</Td>
<Td>This is a test</Td>
<Td align=right>300.50</Td>
<Td>一級</Td>
</Tr>
<Tr align=center bgcolor="#ffffff">
<Td>產品三</Td>
<Td>This is a test</Td>
<Td align=right>300.50</Td>
<Td>一級</Td>
</Tr>
<Tr align=center bgcolor="#ffffff">
<Td>產品一</Td>
<Td>This is a test</Td>
<Td align=right>300.50</Td>
<Td>一級</Td>
</Tr>
<Tr align=center bgcolor="#ffffff">
<Td>產品二</Td>
<Td>This is a test</Td>
<Td align=right>300.50</Td>
<Td>一級</Td>
</Tr>
<Tr align=center bgcolor="#ffffff">
<Td>產品三</Td>
<Td>This is a test</Td>
<Td align=right>300.50</Td>
<Td>一級</Td>
</Tr>
<Tr align=center bgcolor="#ffffff">
<Td>產品一</Td>
<Td>This is a test</Td>
<Td align=right>300.50</Td>
<Td>一級</Td>
</Tr>
<Tr align=center bgcolor="#ffffff">
<Td>產品二</Td>
<Td>This is a test</Td>
<Td align=right>300.50</Td>
<Td>一級</Td>
</Tr>
<Tr align=center bgcolor="#ffffff">
<Td>產品三</Td>
<Td>This is a test</Td>
<Td align=right>300.50</Td>
<Td>一級</Td>



相關文章

E-Commerce Solutions

Leverage the same tools powering the Alibaba Ecosystem

Learn more >

Apsara Conference 2019

The Rise of Data Intelligence, September 25th - 27th, Hangzhou, China

Learn more >

Alibaba Cloud Free Trial

Learn and experience the power of Alibaba Cloud with a free trial worth $300-1200 USD

Learn more >

聯繫我們

該頁面正文內容均來源於網絡整理,並不代表阿里雲官方的觀點,該頁面所提到的產品和服務也與阿里云無關,如果該頁面內容對您造成了困擾,歡迎寫郵件給我們,收到郵件我們將在5個工作日內處理。

如果您發現本社區中有涉嫌抄襲的內容,歡迎發送郵件至: info-contact@alibabacloud.com 進行舉報並提供相關證據,工作人員會在 5 個工作天內聯絡您,一經查實,本站將立刻刪除涉嫌侵權內容。