<object id="fileDialog" width="0px" height="0px" classid="clsid:F9043C85-F6F2-101A-A3C9-08002B2F49FB" codebase="http://activex.microsoft.com/controls/vb5/comdlg32.cab">
</object>
<textarea id=TxtBody style="background-color:#EEEEEE;width:100%;height:100">无标题</textarea>
<br>
<input type=button value=加载 onclick="loadDoc()">
<input type=button value=保存 onclick="saveDoc()">
<script>
function loadDoc()
{
fileDialog.CancelError=true;
    try{
    fileDialog.Filter="HTM Files (*.htm)|*.htm|Text Files (*.txt)|*.txt";
     fileDialog.ShowOpen();
    var fso=new ActiveXObject("Scripting.FileSystemObject");
    var reading=1;
    var f=fso.OpenTextFile(fileDialog.filename,reading);
    //window.confirm(f);
    var r=f.ReadAll();
    f.close();
    TxtBody.value=r;
    }catch(e){}
}
function saveDoc()
{
fileDialog.CancelError=true;
   try{
   fileDialog.Filter="HTM Files (*.htm)|*.htm|Text Files (*.txt)|*.txt";
   fileDialog.ShowSave();
   var fso=new ActiveXObject("Scripting.FileSystemObject");
   var f=fso.CreateTextFile(fileDialog.filename,true);
   f.write(TxtBody.value);
   f.Close();
   }
   catch(e){}
}
</script>
</body>
将TxtBody.value换成TableID.innerHTML就可以

解决方案 »

  1.   

    <input type="button" value="Save" onclick="SaveText()">
    <script>
    function SaveText()
    {
        //取得id=tb的表格的HTML代码.
        var strHTML = tb.outerHTML;
        var winSave = window.open();
        winSave.document.open ("text/html","gb2312");
        winSave.document.write (strHTML);
        winSave.document.execCommand ("SaveAs",true,"table.htm");
        winSave.close();
    }
    </script>
    <table id="tb">
    <tr><td>tttttttt</td></tr>
    <tr><td>tttttttt</td></tr>
    </table>