<script language=javascript>
var xlApp,xlBook,xlSheet;
xlApp = new ActiveXObject("Excel.Application");
xlBook = xlApp.Workbooks.Add();
xlSheet = xlBook.Worksheets(1);
xlSheet.Cells(1,1).Value = "测试";
xlSheet.Application.Visible = true;
xlApp.DisplayAlerts = false;
xlBook.Close();
xlApp.DisplayAlerts = true;
xlApp.Quit();
</script>
脚本运行完毕之后，还有一个excel大约20M的进程在内存中运行，怎么办？
解决办法
<HTML>
<BODY>
<INPUT type="button" value="Automate Excel" name=AutomateExcel onclick="StartExcel()">
<SCRIPT LANGUAGE=Javascript>
var idTmr = "";
function StartExcel() {
var oExcel;
oExcel = new ActiveXObject("Excel.Application");
oExcel.Quit();
oExcel = null;
idTmr = window.setInterval("Cleanup();",1);
}
function Cleanup() {
window.clearInterval(idTmr);
CollectGarbage();
}
</SCRIPT>
</BODY>
</HTML>
参见
http://support.microsoft.com/kb/266088/en-us
--------------------------------------------------------------------------------
分享到：
相关推荐
vb/vba 引用excel对象后通过 xlapp.quit set xlapp=nothing 无法关掉excel进程的解决方法
xlApp.Visible = False '设置EXCEL不可见 Set xlBook = xlApp.Workbooks.Open(App.Path & "\data.xls") '打开EXCEL工作簿 Set xlsheet = xlBook.Worksheets(1) '打开EXCEL工作表 'xlsheet.Activate '激活工作表 ...
excel1.Quit(); System.Runtime.InteropServices.Marshal.ReleaseComObject(excel1); excel1 = null; System.GC.Collect(); ``` 这段代码将保存Excel文件到指定的路径。 关闭Excel 使用C#操作Excel函数关闭Excel...
最后，我们使用 SaveDialog 组件来让用户选择保存文件的路径和名称，并使用 Quit 方法来关闭 Excel 应用程序。 使用 Delphi 语言将 DBGrid 中的数据导出到 Excel 2010 中是非常简单的。我们只需要创建 OLE 对象，...
public void print(DataGridView dataGridView1) { //导出到execl ... //确保Excel进程关闭 excel.Quit(); excel = null; } catch (Exception ex) { MessageBox.Show(ex.Message, "错误提示"); } }
Excel.Quit; savedialog.free; //screen.cursor:=crDefault; Exit; end; except Excel.Quit; savedialog.free; screen.cursor:=crDefault; Exit; end; filename:=savedialog.FileName; end; ...
qt写入excel 基本的操作， QString fileName = QFileDialog::getSaveFileName(NULL,"Save File",".","Excel File (*.xls)"); fileName.replace("/","\\");... _excel.dynamicCall("Quit (void)");
在每个文件前加上“On Error Resume Next”将有助于改善这种情况，因为它会不管文件是否产生错误都坚持执行到“Application.Quit”，保证每次程序执行完不留下死进程。 补充两点： 1、其他Excel具体操作可以通过录制...
xlApp.Visible = True '设置EXCEL对象可见（或不可见） Set xlSheet = xlBook.Worksheets("表名") '设置活动工作表 xlSheet.Cells(row, col) =值 '给单元格（row,col）赋值 xlSheet.PrintOut '打印工作表 xlBook....
range.NumberFormatLocal = "@"; //设置单元格格式为文本 range = (Range)worksheet.get_Range("A1", "E1");... excel.Quit(); // 退出 Excel excel = null; // 将 Excel 实例设置为空 } } } }
Range range1 = (Range)workSheet.Cells[2, 2];//选择操作块 range1.NumberFormatLocal = ... //这一句是非常重要的，否则Excel对象不能从内存中退出 excelApp = null; GC.Collect();//强制对所有代进行垃圾回收。
Excel Application对象应用大全 [完美Excel]本文以MSDN中的技术文章《Developers Guide to the Excel 2007 Application Object》为线条，参考了一系列相关技术文章和图书资料，全面整理和...• 关闭Excel（Quit方法）
* MESSAGEBOX("出生日期字段不满足格式要求，不能导入，请将出生日期字段修改为:"+CHR(13); +"mm.dd.yy的格式,如:05.19.83 表示1983年5月19 然后再运行此导入程序") * RETURN *ENDIF inf(1)=substr(objexcel....
恶搞自杀小程序源码，执行程序和源码，这个exe没有写入注册表启动项。按quit退出。用完还是删掉吧。 http://blog.csdn.net/simpledrunk/article/details/16911761
复制代码 代码如下:#-*- coding:utf-8 -*-...name) app.Visible = True time.sleep(0.5) app.Quit() if __name__ == ‘__main__’: ””’ 通过python启动办公软件的应用进程， 其中wpp、et、wpp对应的是金山文件、表格
Quit Smoking
private void Save2Excel() { //string file = "F:\\11\\ck.xlsx"; //string path = "F:\\11\\excel\\"; string time = DateTime.Now.ToString("yyyyMMdd"); string file = System.Windows.Forms....
用面向对象的方法写的数三退一 希望能给大家提供帮助
btinsert(createbutton(521,330,521+BUTTON_W,330+BUTTON_H,"结束进程",quit_PCB)); btinsert(createbutton(521,390,521+BUTTON_W,390+BUTTON_H,"退出程序",quit)); b=btlist->next; while(b!=NULL) { button_...