展开全部
其实视图就是一个文档的集合；
1、只要将视图中的文档用While或其他循环方式逐个取出，用print在代理中拼出就可以啦！
2、如下所示：
Print "<html>"
Print "<head>"
Print "</head>"
Print "<body>"
Print "<table width=100%>"
Print "<tr>"
Print "<td width=5% class=td1></td>"
Print "<td width=10% class=td1>列1</td>"
Print "<td width=10% class=td1>列2</td>"
Print "<td width=40% class=td1>列3</td>"
Print "<td width=20% class=td1>列4</td>"
Print "<td width=15% class=td1>列5</td>"
Print "</tr>"
'例如docCol.count就是为该视图的文档数目，那么如下逐个取出并print
For i=1 To docCol.count
Set sDoc=docCol.getNthDocument(i)
Set sDoc=view.getDocumentByKey(sDoc.UniversalID,True)
If Not sDoc Is Nothing Then
Print "<tr>"
Print "<td class=tdx><a href=/"+"该文档的连接/"+sDoc.UniversalID+"?opendocument target=_blank><img src="+DOC_LINK_PIC+" border=0 ></a></td>"
Print "<td>"+sDoc.列1(0)+"</td>"
Print "<td >"+sDoc.列2(0)+"</td>"
Print "<td >"+sDoc.列3(0)+"</td>"
Print "<td >"+sDoc.列4(0)+"</td>"
Print "<td >"+sDoc.列5(0)+"</td>"
Print "</tr>"
End If
Next
Print "</table>"
Print "</body>"
Print "</html>"
1、只要将视图中的文档用While或其他循环方式逐个取出，用print在代理中拼出就可以啦！
2、如下所示：
Print "<html>"
Print "<head>"
Print "</head>"
Print "<body>"
Print "<table width=100%>"
Print "<tr>"
Print "<td width=5% class=td1></td>"
Print "<td width=10% class=td1>列1</td>"
Print "<td width=10% class=td1>列2</td>"
Print "<td width=40% class=td1>列3</td>"
Print "<td width=20% class=td1>列4</td>"
Print "<td width=15% class=td1>列5</td>"
Print "</tr>"
'例如docCol.count就是为该视图的文档数目，那么如下逐个取出并print
For i=1 To docCol.count
Set sDoc=docCol.getNthDocument(i)
Set sDoc=view.getDocumentByKey(sDoc.UniversalID,True)
If Not sDoc Is Nothing Then
Print "<tr>"
Print "<td class=tdx><a href=/"+"该文档的连接/"+sDoc.UniversalID+"?opendocument target=_blank><img src="+DOC_LINK_PIC+" border=0 ></a></td>"
Print "<td>"+sDoc.列1(0)+"</td>"
Print "<td >"+sDoc.列2(0)+"</td>"
Print "<td >"+sDoc.列3(0)+"</td>"
Print "<td >"+sDoc.列4(0)+"</td>"
Print "<td >"+sDoc.列5(0)+"</td>"
Print "</tr>"
End If
Next
Print "</table>"
Print "</body>"
Print "</html>"
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
