Thread: Launch notepad file by using QTP

Question asked by visitor sivareddy

How to launch the notepad file by using QTP, which library function we can use

Hi Geek Guest,

I am not getting your question.

You can use:
01. SystemUtil.Run "notepad.exe","","","open"

02. Dim fso, f
Set fso = CreateObject("Scripting.FileSystemObject")
Set f = fso.GetFile("D:\Sample.txt")

Please let me know if this is not that you were looking for.

Regards,
Ganesh SM

Same way for notepad as it was for Excel

Dim excelobj, count

count1 = 2

Set excelobj = createobject("Excel.Application")



excelobj.create("C:\x.xls")



excelobj.workbooks.open("C:\Rag.xls")

Set y = excelobj.Activeworkbook.worksheets("RRR")

While not isempty(excelobj.cells(Count1,1))

d=excelobj.cells(count1,1).value
e=excelobj.cells(count1,2).value
msgbox("User Name="&d&"Password="&e)

count1=count1+1

Wend


excelobj.workbooks.Close("C:\Rag.xls")

hi this is vijay give systemutil.run("path")

Hi
You can also do this with shell scripting

Dim shell
Set shell = createobject("wscript.shell")
shell.run"notepad.exe"