-
- 加为好友
- 发送私信
- 在线聊天
mygod_cx- 等级:
- 可用分等级：
- 总技术专家分：
- 总技术专家分排名：
|
| 发表于：2007-10-12 14:28:013楼 得分:0 |
思路可行的，将页面1导出到WORD（页面2）并打印：
先创立记录集rs,保存查询出来的记录集，然后
try{
ResultSetMetaData rsmd=rs.getMetaData();
int no=1;
while(rs.next()){
out.println(" <tr>");
out.println(" <td height='25' align='center' bgcolor='#FFFFFF'>"+no+" </td>");
for(int i=2;i <=rsmd.getColumnCount();i++){
%>
<td align="center" bgcolor="#FFFFFF"> <%=rs.getString(i)%> </td>
<%
}
out.println(" </tr>");
no++;
}
}catch(Exception e){
System.out.println(e.getMessage());
}
使用下面函数将页面信息输出到WORD
<script language="javascript">
function outDoc(){
var table=document.all.customer;
row=table.rows.length;
column=table.rows(1).cells.length;
var wdapp=new ActiveXObject("Word.Application");
wdapp.visible=true;
wddoc=wdapp.Documents.Add(); //添加新的文档
thearray=new Array();
//将页面中表格的内容存放在数组中
for(i=0;i <row;i++){
thearray[i]=new Array();
for(j=0;j <column;j++){
thearray[i][j]=table.rows(i).cells(j).innerHTML;
}
}
var range = wddoc.Range(0,0);
range.Text="客户信息列表"+"\n";
wdapp.Application.Activedocument.Paragraphs.Add(range);
wdapp.Application.Activedocument.Paragraphs.Add();
rngcurrent=wdapp.Application.Activedocument.Paragraphs(3).Range;
var objTable=wddoc.Tables.Add(rngcurrent,row,column) //插入表格
for(i=0;i <row;i++){
for(j=0;j <column;j++){
objTable.Cell(i+1,j+1).Range.Text = thearray[i][j].replace(" ","");
}
}
wdapp.Application.ActiveDocument.SaveAs("customerList.doc",0,false,"",true,"",false,false,false,false,false);
wdapp.Application.Printout();
wdapp=null;
}
</script>
通过链接 <a href="#" onClick="outDoc();">打印 </a>调用打印。。。。。。 | | |
修改
删除
举报
引用
回复
| |
