topic Re: Declaring Variables in VBScript in QlikView

Declaring Variables in VBScript

Tue, 19 Jul 2016 15:25:07 GMT

Hi all,

This is driving me crazy...... I wish to set a variable in VBScript but it's not working.

This is my code....

I am creating a number of folders and I wish to set each folder path as a variable:

' set ocr path

SUB Ocr (objVariable)

ON ERROR RESUME NEXT

SET objShell = CREATEOBJECT("Shell.Application")

SET objFolder = objShell.BrowseForFolder (WINDOW_HANDLE, TITLE, OPTIONS, ROOT)

SET objFolderItem = objFolder.Self

ocrFolder = objFolderItem.Path

SET objSavePath = ActiveDocument.Variables(objVariable)

objSavePath.SetContent ocrFolder, TRUE

ON ERROR GOTO 0

'create folders

Dim oFSO

Set oFSO = CreateObject("Scripting.FileSystemObject")

' Create OCR folder

oFSO.CreateFolder ocrFolder & "\OCR"

oFSO.CreateFolder ocrFolder & "\OCR\Output"

oFSO.CreateFolder ocrFolder & "\OCR\Output\Single_File"

oFSO.CreateFolder ocrFolder & "\OCR\Staging"

oFSO.CreateFolder ocrFolder & "\OCR\Archive"

dim outputFolder

outputFolder = ocrFolder & "\OCR\Output\Single_File"

dim stagingFolder

stagingFolder = ocrFolder & "\OCR\Staging"

dim archiveFolder

archiveFolder = ocrFolder & "\OCR\Archive"

end sub

ocrFolder is defined (e.g. c:mydocs\myfolder)

My issue is that outputFolder , stagingFolder & archiveFolder are not being created?

What am I doing wrong?

Re: Declaring Variables in VBScript

marcus_sommer — Tue, 19 Jul 2016 17:31:52 GMT

The reason could be the use of relative paths. For this topic see also: Using relative paths in variables.

- Marcus

Re: Declaring Variables in VBScript

Anonymous — Tue, 19 Jul 2016 17:53:02 GMT

Haven't tested but what happens if you try setting the oFSO.CreateFolder commands to a variable and call it directly?

i.e.

'create folders

Dim oFSO

Set oFSO = CreateObject("Scripting.FileSystemObject")

' Create OCR folder

set f1 = oFSO.CreateFolder ocrFolder & "\OCR"

set f2 = oFSO.CreateFolder ocrFolder & "\OCR\Output"

set f3 = oFSO.CreateFolder ocrFolder & "\OCR\Output\Single_File"

set f4 = oFSO.CreateFolder ocrFolder & "\OCR\Staging"

set f5 = oFSO.CreateFolder ocrFolder & "\OCR\Archive"

CreateFolderF1 = f1.Path

CreateFolderF2 = f2.Path

CreateFolderF3 = f3.Path

CreateFolderF4 = f4.Path

CreateFolderF5 = f5.Path

Re: Declaring Variables in VBScript

Wed, 20 Jul 2016 11:04:49 GMT

Thanks for the replies - I couldn't get it to work.

So I just had to use the variable + 'the end folder path (hard coded)', throughout my code.

Re: Declaring Variables in VBScript

Wed, 20 Jul 2016 14:29:29 GMT

Hi Jammy,

From the script it looks like you are using "BrowseForFolder " which will give you a pop up to select the path. If you cancel that pop up it will create folders in default location may be in "C:" or "C:\Program Files\QlikView".

You can check the above mentioned folders, all the folders which you were creating using macro must have been created somewhere in your machine.

PS: As per your script, ocrFolder is nothing but a variable which is already appended before the folder path, I am not sure why are you adding another variable.

Hope it helps.

Regards,

Sakir

Re: Declaring Variables in VBScript

marcus_sommer — Thu, 21 Jul 2016 05:47:59 GMT

Like in my link from above the logic could be like relative paths even if the in the end used path is a full-path (and therefore is no need to hard-code the paths).

- Marcus