topic VBscript Error in QlikView

VBscript Error

shumailh — Mon, 14 Dec 2009 16:33:58 GMT

I was trying to delete a file using QV macro vbscript but it showing me some error on creating object.


sub deletefile()
 dim filesys, sdir
 Set filesys = CreateObject("Scripting.FileSystemObject")
 sdir = filesys.GetParentFolderName(wscript.ScriptFullName)
 If filesys.FileExists(sdir & "\test.docx") Then
 filesys.DeleteFile sdir & "\test.docx"
 Response.Write("File deleted")
 End If
end sub

ActiveX component can't create object: 'Scripting.FileSystemObject'

Regards,
Shumail Hussain

VBscript Error

Mon, 14 Dec 2009 17:43:56 GMT

Hi,

Did you try changing security from 'Safe Mode' to 'System Access' in edit module?

Thanks

Amit

VBscript Error

shumailh — Mon, 14 Dec 2009 17:48:40 GMT

Hi Amit,

After changing my security from Safe Mode to System Access i am getting error on line 3


Object required: 'wscript'

Regards,
Shumail Hussain

VBscript Error

Mon, 14 Dec 2009 18:11:28 GMT

Try this:


sub deletefile()
dim filesys, sdir
Set filesys = CreateObject("Scripting.FileSystemObject")
set wscript = CreateObject("WScript.Shell")
sdir = filesys.GetParentFolderName("wscript.ScriptFullName")
If filesys.FileExists(sdir & "\test.docx") Then
filesys.DeleteFile sdir & "\test.docx"
Response.Write("File deleted")
End If
end sub