游客

标题:asp读取Excel类
正文:
<%'***************************************************************************************'surnfu 2009-11-18 surnfu@126.com'使用说明'Dim excel'set excel=new ReadExcel' excel.Path="/sys/exam/excel/1E65F051-E664-4D63-821B-F13D9709E1C1DB8A6827-5FCC-4F01-A40E-08F9DC2CC9E0.xls"' excel.Open()' if excel.Excelexist then' excel.OpenSheet("训后评估结果")' if excel.Sheetexist then' excel.readArea="C7:H23"' excel.reAllocation=false' Dim data : data=excel.Data()' response.Write(excel.MinRowNo &"<br>")' &nbs
[<<][[1]][2][3][>>]

查看评论(0)
发表评论



首页