QTP Script To Get Abbreviated Name of Month-VB Script To Get Abbreviated Name of Month

QTP Script To Get Abbreviated Name of Month


Dim a
a=MonthName(1,true)
MsgBox(a)

Output-Jan

Dim a
a=MonthName(2,true)
MsgBox(a)

Output-Feb

QTP Script To Get Abbreviated Name of Current Weekday-VB Script To Get Abbreviated Name of Current Weekday

QTP Script To Get Abbreviated Name of Current Weekday


Dim a

a=WeekDayName(Weekday(date),true)

MsgBox(a)


Output-Wed

QTP Script To Get Abbreviated Name of Weekday-VB Script To Get Abbreviated Name of Weekday

QTP Script To Get Abbreviated Name of Weekday

Dim a
a=WeekDayName(1,true)
MsgBox(a)

Output-Sun

Dim a
a=WeekDayName(2,true)
MsgBox(a)

Output-Mon

QTP Script to Get Last Modified Date and Time of a Folder-VB Script to Get Last Modified Date and Time of a Folder

QTP Script to Get Last Modified Date and Time of a Folder-VB Script to Get Last Modified Date and Time of a Folder

How to get Last Modified date and time of a particular folder?



Dim a,b,c

Set a = CreateObject("Scripting.FileSystemObject")

Set b = a.GetFolder("C:\QTP")

c= "Folder was Last Modified on: " & b.DateLastModified

MsgBox(c)