Write a program to print the current folder name in the local system.

[kannan_panneerselvam]

Hi can anyone answer my question quickly please.


Question:

Write a program to print the current folder name in the local system.

[bfakruddin]

Hi, It will give you the path of a folder

Code:

dim f,fso

set fso=createobject("scripting.filesystemobject")

set f=fso.getfolder("E:\Baba_QTP\QTP\Scripts")

msgbox f

[sreekanth chilam]

Hi Kannan,

In addition to Baba's solution, You can try in the below way for Printing the required FolderName in QuickTest Print Log.

Code:

Dim f,fso
set fso=createobject("scripting.filesystemobject")
set f=fso.getfolder("C:\Documents and Settings\csreekanth\Desktop\Srirama-ELC")
Print f.Name

[azar80]

use inbuilt environment variable

[bfakruddin]

Hi,

Here is the code to get the only folder name not all the path of a folder.

Code:

Code:

dim f,fso

set fso=createobject("scripting.filesystemobject")

set f=fso.getfolder("E:\Baba_QTP\QTP\Scripts")

msgbox "Path of the Folder      :     "&f

ext=split(f,"\")

msgbox "Exact Folder Name    :   "&Exact

Function Exact()

for i=0 to ubound(ext)

Exact=ext(i)

Next

End Function

[Saket]

@D.Baba Fakruddin - The query was to get the current folder name which can be retrieved by environment variable suggested by azar80.
what you are doing is just parsing the path string which is required to be passed, right?

[bfakruddin]

Hello Saket,

Thanks for your advice. I think you do understand the question, Question is to write a script to get a Stored Folder Name. as per azar80 comments one line script. I don't think that is exact answer for this question. Any how, Ask for a question to Kannan_Paneersalvam once again and provide your valuable Answer. I am waiting for that.

I know only the above way to get a Folder Name. If you have any other way to get Folder Name other than above two ways. Please let me know.

Thanks & regards,
Baba Fakruddin.D

[gowtham.m.h]

I think this may help you

Code:

set WshShell = WScript.CreateObject("WScript.Shell")
Dir=WshShell.CurrentDirectory
arrydir=split(dir,"\")
msgbox arrydir(ubound(arrydir))

Thanks
Gowtham

[souvikghosh_diatm]

Well i have seen that commentators are arguing with their answer....actually the question is not clear.....

what exactly u want????

1. The current folder name only where you are present???
2. Or u need the full path of that folder where you are present???

The answer of 1st question is what exactly gowtham.m.h has suggested.....

and the answer of 2nd question is to use inbuilt Environment variable ("TestDir") what exactly azar80 has suggested.....

And i dont think bfakruddin has suggested any logical answer...he has just passed the string and printed that....but if i dnt know the string then what??? i guess exactly this thing is being asked in this question that how to get that string.......


So better try gowtham.m.h or azar80 suggestion as per ur need.....