Clever Geek Handbook

Creating a shared file in a shared folder using QTP

I created a shared folder by taking the name from the DataTable:

Dim fso
Set fso = CreateObject("Scripting.FileSystemObject")
strdata = Datatable.Value("Column name", "Sheet")
fso.CreateFolder "C:\Documents and Settings\schoudar\Desktop\" & strdata

Until then I was successful, but now I want to save the file in this folder and the folder name will change when I don’t. iterations. So I tried with the file CaptureBitmap

:

Browser("Browser").CaptureBitmap "C:\Documents and Settings\Desktop\ & strdata\filename.bmp"

But it doesn't work, so please help me.

-1


source to share


1 answer


What error are you getting?

Just guess, correct the quotes and add the line:



Browser("Browser").CaptureBitmap "C:\Documents and Settings\Desktop\" & strdata & "\filename.bmp"
+4


source






More articles:


All Articles