2014年3月17日

摘要: Const ForReading = 1 CLineCount = 14LineCount = 8 LineCount_1 = 2Index = 0 Index_1 = 0row_no=13 strProgramPath = "C:\SUN\config\test.xls"Set objExcel = CreateObject("Excel.Application")objExcel.Visible = falseobjExcel.DisplayAlerts = FALSESet oShell = CreateObject( "WScript. 阅读全文
posted @ 2014-03-17 11:07 程序员乌鸦 阅读(1752) 评论(0) 推荐(0)

导航