摘要:
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)

浙公网安备 33010602011771号