摘要: http://www.developerfusion.com/toolsSub 删除宏()On Error Resume NextSet fso = CreateObject("Scripting.FileSystemObject")fname = ActiveWorkbook.Path & "\地球物理计算中心"Set fd = fso.getfolder(fname)Set fls = fd.FilesFor Each fl In fls Set wb = Workbooks.Open(fname & "\" &a 阅读全文
posted @ 2012-06-26 23:40 陆 阅读(286) 评论(0) 推荐(0)
摘要: http://www.yongfa365.com/Item/NPOI-MyXls-DataTable-To-Excel-From-Excel.html 阅读全文
posted @ 2012-06-26 22:46 陆 阅读(176) 评论(0) 推荐(0)
摘要: Application.Exit 方法 通知所有消息泵必须终止,并且在处理了消息以后关闭所有应用程序窗口。 Form.Close 方法 关闭窗体。 如果该窗体是应用程序的主启动窗体,则調用窗体的Close()方法,跟調用Application.Exit的效果差不多。 如果该窗体非主启动窗体,则只是关闭该窗体而不关闭整个应用程序。 如果是多线程应用程序,要想关闭整个应用程序,除了調用Application.Exit()方法或者主启动窗体的Close()之外,还需要显示的調用终止线程的代码。否则窗体虽然关闭了,看似应用程序退出了,其实线程依然还驻留在内存中工作。打开任务管理器依然可以看到。---- 阅读全文
posted @ 2011-04-17 23:07 陆 阅读(455) 评论(0) 推荐(1)
摘要: ExtAspNetExtAspNet 是一组专业的Asp.net控件库,拥有原生的AJAX支持和丰富的UI效果。目标是创建没有ViewState,没有JavaScript,没有CSS,没有UpdatePanel,没有WebServices的Web应用程序。注:ExtAspNet 基于一些开源程序,比如ExtJS, HtmlAgilityPack, Nii.JSON, YUICompressor.支持的浏览器: IE 7.0+, Firefox 3.0+, Chrome 2.0+, Opera 9.5+, Safari 3.0+开源:http://extaspnet.codeplex.com/ 阅读全文
posted @ 2011-01-27 16:19 陆 阅读(246) 评论(0) 推荐(0)
摘要: 第一次看到这样的SQL语句,看不懂,其中用到了下面的不常用的 聚集函数:GROUPING 用于汇总数据用的运算符: ROLLUP SELECTCASEGROUPING(o.customerid)WHEN0THENo.customeridELSE'(Total)'ENDASAllCustomersSummary,CASEGROUPING(od.orderid)WHEN0THENod.orderidE... 阅读全文
posted @ 2010-07-21 13:51 陆 阅读(221) 评论(0) 推荐(0)