Present version of VB Script is 5.6.
We can findout the version of vbscript you are using by going through the location
C:\Windows\System32, search for the file vbscript.dll, and right click on it and choose the properties. Move to the version tab.
You can findout the version number.
Wednesday, October 15, 2008
Wednesday, October 8, 2008
Can a function return dictonary object
Yes.
Functions can return a dictonary object.
Dim dicObj
Set dicObj = CreateObject("Scripting.Dictionary")
Set obj=getname
MsgBox(obj.item("name"))
Public Function getname()
dicObj.add "name","Uday Kumar"
Set getname=dicObj
End function
Functions can return a dictonary object.
Dim dicObj
Set dicObj = CreateObject("Scripting.Dictionary")
Set obj=getname
MsgBox(obj.item("name"))
Public Function getname()
dicObj.add "name","Uday Kumar"
Set getname=dicObj
End function
Thursday, September 25, 2008
How the Message Boxes Close Automatically
The following script shows a message box that disappears after the specified timeout (in seconds). The script execution then continues.
If TimeOut is 0, it behaves just like a normal message box. If TimeOut is greater than 0, the dialog box disappears after the specified number of seconds.
Set wShellObj=createobject("WScript.shell")
wShellObj.popup "Hello Uday, How are you",10,"This is sample" ' Displays like this:

The message box automatically closes after 10 sec.s
Even we can handle the error messages from the error handling mechanism like this:
Set fileSysObj=createobject("Scripting.filesystemobject")
On Error resume next
fileSysObj.opentextfile("c:\uday.txt")
str=Err.description
wShellObj.popup str,3,"This is for file not found"
If TimeOut is 0, it behaves just like a normal message box. If TimeOut is greater than 0, the dialog box disappears after the specified number of seconds.
Set wShellObj=createobject("WScript.shell")
wShellObj.popup "Hello Uday, How are you",10,"This is sample" ' Displays like this:
The message box automatically closes after 10 sec.s
Even we can handle the error messages from the error handling mechanism like this:
Set fileSysObj=createobject("Scripting.filesystemobject")
On Error resume next
fileSysObj.opentextfile("c:\uday.txt")
str=Err.description
wShellObj.popup str,3,"This is for file not found"
How can I remove test result files from old tests?
You can use the Test Results Deletion Tool to view a list of all the test results in a specific location in your file system or in a Quality Center project. You can then delete any test results that you no longer require.
The Test Results Deletion Tool enables you to sort the test results by name, date, size, and so forth, so that you can easily identify the results you want to delete.
You can find this utility in Start > Programs > QuickTest Professional > Tools > Test Results Deletion Tool.
By using this tool, we can choose the test, for which you want to delete all the result folders.
Here we can select the result folders and delete that folders.
The Test Results Deletion Tool enables you to sort the test results by name, date, size, and so forth, so that you can easily identify the results you want to delete.
You can find this utility in Start > Programs > QuickTest Professional > Tools > Test Results Deletion Tool.
By using this tool, we can choose the test, for which you want to delete all the result folders.
Here we can select the result folders and delete that folders.
How can I configure the report to show only errors by default?
You can configure the report to show only errors by default by adding the following section to the QTReport.ini file in your \bin folder.
[FilterDialog]
ReportAppDefaultFilter=1 # for error only
ReportAppDefaultFilter=3 # shows all messages (default)
[FilterDialog]
ReportAppDefaultFilter=1 # for error only
ReportAppDefaultFilter=3 # shows all messages (default)
Subscribe to:
Comments (Atom)