Interested to Buy Any Domain ? << Click Here >> for more details...
How to store the iterations value in some variable/ in
excel?
Dim objExcel, ObjFolder, objPath, objWorkbook, objSheet,
ObjFSo, ObjFolderName, strExcelPath
Const xlExcel7 = 39
ObjFolderName = "Testing" & Hour(time()) & Minute(time())
&Second(time())
objPath = "D:\"
strExcelPath = objPath & ObjFolderName & "\testing.xls"
Set ObjFSo = CreateObject("Scripting.FileSystemObject")
Set objFolder = objFSO.CreateFolder(objPath & ObjFolderName)
On Error Resume Next
Set objExcel = CreateObject("Excel.Application")
If (Err.Number <> 0) Then
On Error GoTo 0
Wscript.Echo "Excel application not found."
Wscript.Quit
End If
On Error GoTo 0
Set objWorkbook = objExcel.Workbooks.Add()
Set objSheet = objExcel.ActiveWorkbook.Worksheets(1)
Dim arr1, arr2, arr3
Set outputLines = CreateObject
("System.Collections.ArrayList")
arr1 = 123arr2 = 99
arr3 = 10
outputLines.Add arr1
outputLines.Add arr2
outputLines.Add arr3
outputLines.Sort()
For Each outputLine in outputLines
WScript.Echo outputLine
' how to store this value in excel/ variable?
Next
objExcel.ActiveWorkbook.SaveAs strExcelPath, xlExcel7
objExcel.ActiveWorkbook.Close
objExcel.Application.Quit
This above code is working fine but the qs is is there any
way to store the sort data in variables / in the excel and
how?
- 0 Answers
- 2821 Views
- Wipro, I also Faced
- E-Mail Answers
No Answer is Posted For this Question
Be the First to Post Answer
How to change winform look?
Can Any one suggest how we connect QTP and Mainframe and do validation from Mainfram screen
Hi, My name is satish kumar dega I am learing QTP I have one doubt. I need to count the radio buttons in a particular page. In QTP how to write descriptive progming and how I will get all the radiobuttons count.In a paricular page having two WebRadioGroups under each group having 3 radiobuttons.I need to count all the radio buttons could you plz help me regarding this one
how to use textfile for taking value for parametrization instead of datatable or global sheet
can everyone explain this code Private Sub DrawRect(rectSource As RECT, lngColour As Long) Line (rectSource.Left, rectSource.Top)-(rectSource.Left, rectSource.Bottom), lngColour Line (rectSource.Left, rectSource.Top)- (rectSource.Right, rectSource.Top), lngColour Line (rectSource.Right, rectSource.Bottom)- (rectSource.Right, rectSource.Top), lngColour Line (rectSource.Right, rectSource.Bottom)- (rectSource.Left, rectSource.Bottom), lngColour End Sub
write the vbscript code to print the following pattern :- 1 + (1 + 2) +(1+2+3).....
write a vb script to check equal two 2*2 matrix
how to write a program to accept names and marks of 10 students from the user and display the names and markes of only the passed students. Marks greater than or equal to 35 is considered as pass.
In QTP one function can return more than one value?
how to use the GetTickCount() properly and what is that procedure for?
what does mbln in mblnrects mean? my boolean?
what is the full form of dim?
PHP Code 
