How to update Pass/Fail in Excel using Vbscript

[ritesh]

Hi Vinod,

Can u please explain in little bit detail. Bcoz i'm getting output as 'Running'.

I use the following steps to update the result in excel:
1) I have written a function called ResultEntry() and saved it inside a VB file.
2) I call this function at the end of each test case.

Here is the ResultEntry function

Code:

Public Function ResultEntry(TestCaseId, TestCase, Desc, Result)
   MyTime=Now
   MyFile.Write(TestCaseId)
   MyFile.Write(",")
   MyFile.Write(TestCase)
   MyFile.Write(",")
   MyFile.Write(Desc)
   MyFile.Write(",")
   MyFile.Write(Result)
   MyFile.WriteLine("")
End Function

And I call this function at the end of the each test case inside the If loop like:

Code:

If (Pass condition) Then
ResultEntry "ID", "Test Case", "Description", "Pass"
Else
ResultEntry "ID", "Test Case", "Description", "Fail"

Please let me know if I'm wrong or even if I can improve the steps what i'm following.