topic ServerSideExportEx in QlikView

ServerSideExportEx

Mon, 26 Jan 2026 18:19:17 GMT

Hi all,

i am using below macro for creating "tabdelimited" text files in user selected location. In desktop app it is working fine but

in IE Server app it is not creating text file in selected folder.

What might be the problem and please any suggestions on this ?

Function Export()

fName=InputBox("Please enter your filename")

if (fName ="") then

Msgbox "Query has Cancelled"

else

Dim objShell

Dim ssfWINDOWS

Dim objFolder

Set objShell = CreateObject("Shell.Application")

Set objFolder = objShell.BrowseForFolder(0, "Example Select Folder", 0, strRootPath)

If (Not objFolder Is Nothing) Then

Set obj1= ActiveDocument.GetSheetObject("CH01")

obj1.ServerSideExportEx objFolder.ParentFolder.ParseName(objFolder.Title).Path&"\"&fName&replace(Date(),"/","")&"_"&replace(Time(),":","")&".txt"," ",1

MSGBOX "Data has been Transfered to "& objFolder.ParentFolder.ParseName(objFolder.Title).Path&"\"&fName&"_"&replace(Date(),"/","")&"_"&replace(Time(),":","")

End If

Set objFolder = Nothing

Set objShell = Nothing

end if

End Function

Thanks in advance.

Regards

Veera

Re: ServerSideExportEx

Wed, 11 Apr 2012 08:56:48 GMT

Hi all,

Consider current app(sample.qvw file) is stored in Server machine that is located in some other branch of my company.

Now i am connected from IE server to other branch server machine. And i opened to "Sample.qvw file" from IE server in my local machine.

In that file i am having an action export button, when i click on that export button then it is asking for the

1.) Type FileName

2.) Opening "Folder Dialog box" of my local machine and i'm selecting the destination location.

3.) And displaying the message "Text File is created in selected destination location".

but i'm not able to see any text file in my destination folder.

Please can anyone help on this process.

And please check the below macro used in "Export button" and suggest if any modification required on this.

Function Export()

fName=InputBox("Please enter your filename")

if (fName ="") then

Msgbox "Query has Cancelled"

else

Dim objShell

Dim ssfWINDOWS

Dim objFolder

Set objShell = CreateObject("Shell.Application")

Set objFolder = objShell.BrowseForFolder(0, "Example Select Folder", 0, strRootPath)

If (Not objFolder Is Nothing) Then

Set obj1= ActiveDocument.GetSheetObject("CH01")

obj1.ServerSideExportEx objFolder.ParentFolder.ParseName(objFolder.Title).Path&"\"&fName&replace(Date(),"/","")&"_"&replace(Time(),":","")&".txt"," ",1

MSGBOX "Data has been Transfered to "& objFolder.ParentFolder.ParseName(objFolder.Title).Path&"\"&fName&"_"&replace(Date(),"/","")&"_"&replace(Time(),":","")

End If

Set objFolder = Nothing

Set objShell = Nothing

end if

End Function

Thanks in advance.

Re: ServerSideExportEx

Wed, 11 Apr 2012 11:42:09 GMT

Hi all,

Still looking for any suggestion on this.

Thanks in advance.