<HTML><HEAD><title>WEB页面导出为EXCEL文档的方法</title></HEAD><body><BR><tableid="PrintA"width="100%"border="1"cellspacing="0"cellpadding="0"bgcolor="#61FF13"><TRstyle="text- "><TD>单元格A</TD><TD>单元格A</TD><TD>单元格A</TD><TD>单元格A</TD></TR><TR><TDcolSpan=4style="text- "><fontcolor="BLUE"face="Verdana">单元格合并行A</FONT></TD></TR></TABLE><BR><tableid="PrintB"width="100%"border="1"cellspacing="0"cellpadding="0"><TRstyle="text- "><TD>单元格B</TD><TD>单元格B</TD><TD>单元格B</TD><TD>单元格B</TD></TR><TR><TDcolSpan=4style="text- ">单元格合并行B</TD></TR></TABLE><br><br><br><inputtype="button"onclick="j();"value="导出页面指定区域内容到Word"><inputtype="button"onclick="j();"value="导出页面指定区域内容到Excel"><inputtype="button"onclick="j();"value="导出表单单元格内容到Excel"><SCRIPTLANGUAGE="javascript">//指定页面区域内容导入ExcelfunctionAllAreaExcel(){varoXL=newActiveXObject("Excel。
Application");varoWB=oXL。Workbooks。Add();varoSheet=oWB。ActiveSheet;varsel= eateTextRange(); veToElementText(PrintA); lect();sel。
execCommand("Copy");oSheet。Paste();oXL。Visible=true;}//指定页面区域“单元格”内容导入ExcelfunctionCellAreaExcel(){varoXL=newActiveXObject("Excel。
Application");varoWB=oXL。Workbooks。Add();varoSheet=oWB。ActiveSheet;varLenr= ws。length;for(i=0;i<Lenr;i++){varLenc= ws(i)。
cells。length;for(j=0;j<Lenc;j++){oSheet。Cells(i+1,j+1)。value= ws(i)。cells(j)。innerText;}}oXL。Visible=true;}//指定页面区域内容导入WordfunctionAllAreaWord(){varoWD=newActiveXObject("Word。
Application");varoDC=oWD。Documents。Add("",0,1);varoRange=oDC。Range(0,1);varsel= eateTextRange(); veToElementText(PrintA); lect();sel。
execCommand("Copy");oRange。Paste();oWD。Application。Visible=true;// ose();}</SCRIPT></body></html>。
答：创建EXCEL数据源， 创建新数据源——MICROSOFT EXCEL DRIVER（*。XLS）——ODBC MICROSOFT ACCESS——选择你创建的...详情>>
