Answer Posted / vasanth

Sub Screen_Resolution
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer
& "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * From
Win32_DisplayConfiguration")
For Each objItem in colItems
'msgbox "Name: " & objItem.DeviceName
'msgbox "Color depth: " & objItem.BitsPerPel
'msgbox "Horizontal resolution: " & objItem.PelsWidth
'msgbox "Vertical resolution: " & objItem.PelsHeight
If objItem.PelsWidth <> 1024 Or objItem.PelsHeight <> 768
Then
MsgBox "Current screen resolution is "
&objItem.PelsWidth& " by " &objItem.PelsHeight
MsgBox "Scripts cannnot be executed, We only support 1024
by 768 "
ExitAction()
End if
Next
End Sub

Explain about constants in vb script?

971

---

What is the use of the date function in the vbscript language?

953

---

What are the disadvantages of vbscript?

1168

---

Explain about filter expression?

939

---

Which in-built function is used to format the number in the vbscript language?

952

---

Explain some uses of vb script?

921

---

I need to get some data from data base and store this (retrieved) data in a excel sheet using VB script in QTP9.0 I have created connection for data base I have created as excels sheet by using Set XL=CreateObject("Excel.Application") XLworksheet.cells(1,1).value= rs.fields.item("<>") I have taken a for loop and changed the cells values (1 as i and another 1 as j) But still I am not able to get Plz kindly tell me know this . It is very urgent

2191

---

write any ttest cases using check points and parameterization

2221

---

Mention how to assign a date value to a variable?

1024

---

What is Procedure or Subroutine in VB Script?

1070

---

Is vbscript a case-sensitive or case-insensitive?

1206

---

what is the object hyrarchy in QTP for a web based application

2320

---

Which constant is used for print and display functions and works as same as pressing enter key?

949

---

Explain the arrays in vb script?

1003

---

Explain the support of asp for vb script functionality?

1015

---