Dim fso1,f1,app,wb,ws
Set fso1= CreateObject("Scripting.FileSystemObject")
Set f1=fso1.OpenTextFile("D:\"& mydate &"_" & myhour & "_.log",1,true)
Set app = CreateObject("Excel.Application")
Set wb = app.Workbooks.Open("D:\online_user2.xls")
Set ws = wb.Worksheets(1)
Dim line1, params1,row,temp
row = ？ ————————————————————————————这个地方想赋于，excel表格中已经使用到的最后一行，比如“online_user2.xls”表格中有值的有5行，这里返回就是6.要怎么写。。
