51Testing软件测试论坛

标题: 请高手们来谈谈如何不使用DATAPOOL而调用外部文件的数据,请我们初学者也长长知识^_^ [打印本页]

作者: lfcooleres    时间: 2007-11-28 21:32
标题: 请高手们来谈谈如何不使用DATAPOOL而调用外部文件的数据,请我们初学者也长长知识^_^
  如题!!!!
作者: 村上舞!舞!舞    时间: 2007-11-29 22:30
标题: 调用Excel文件的数据
调用Excel文件的数据.论坛中有很多相关的例子,你可以去搜索看下..
作者: caesarqth    时间: 2007-11-29 23:36
从论坛上找的,可以参看一下   
on error resume next
    Set excel = GetObject(,"excel.application")
    if(excel Is Nothing) then
        Set excel = CreateObject("excel.application")
        if(excel Is Nothing) then
            MsgBox "Couldn't find Excel!"
            Exit Sub
        End if
    End if
   
    Set book = excel.Workbooks.Open("Your Book1.xls")
    Set worksheet = book.Worksheets("Your Excel sheet's name")
        
    For count=1 To 2
       name = worksheet.Cells(1,count).Value
       pass = worksheet.Cells(2,count).Value      
    Next count
    'Quit Excel'''''''''''''''''''''
    excel.Quit
    Set excel = Nothing
作者: lfcooleres    时间: 2007-11-30 21:09
谢谢了^_^




欢迎光临 51Testing软件测试论坛 (http://bbs.51testing.com/) Powered by Discuz! X3.2