1. 程式人生 > >.net 以table輸出格式匯出excel

.net 以table輸出格式匯出excel

 <script language="javascript" type="text/javascript">function ExportExcel(){var oXL = new ActiveXObject("Excel.Application");var oWB = oXL.Workbooks.Add();var oSheet = oWB.ActiveSheet;var oTable = document.getElementById("dataTable");for(var i=0; i<oTable.rows.length; i++){    for(var j=0; j<oTable.rows[i].cells.length; j++)    {        oSheet.Cells(i+1,j+1).Value = oTable.rows[i].cells[j].innerText;    }}oXL.Visible = true;oXL.UserControl = true;}function ExportExcelWithFormat(){var oXL = new ActiveXObject("Excel.Application");var oWB = oXL.Workbooks.Add();var oSheet = oWB.ActiveSheet;var oTable = document.getElementById("dataTable");var sel=document.body.createTextRange();sel.moveToElementText(oTable);sel.select();sel.execCommand("Copy");oSheet.Paste();oXL.Visible = true;oXL.UserControl = true;}</script>--- table <div>    <table width="500" border="0" align="center">    <tr>        <td align="center"><input type="button" onclick="ExportExcel()" value="匯出純文字資料到Excel" /> </td>        <td align="center"><input type="button" onclick="ExportExcelWithFormat()" value="匯出帶格式的資料到Excel" /> </td>    </tr></table>        <asp:Button runat="server" ID="btnexprot" Text="匯出" onclick="btnexprot_Click" />        <asp:Literal runat="server" ID="lttable" />        <table id="dataTable" width="200 " border="1 ">            <tr>                <td>                    我是中國人                </td>                <td>                    11                </td>            </tr>            <tr>                <td>                    22                </td>                <td>                    22                </td>            </tr>            <tr>                <td>                    33                </td>                <td>                    33                </td>            </tr>            <tr>                <td>                    44                </td>                <td>                    44                </td>            </tr>        </table>    </div>"本地Intranet"內“對沒有標記為安全的ActiveX控制元件進行初始化和指令碼執行”這一項設定為“啟用”就可以了