Macro Open folder passing Parameters

[demcug82]

Hi All,

i create a text object that launches a macro to open a folder on server.

When i'm on server (Remote Desktop) and click on link , the macro works.

When i'm on Access Point (from my pc NTNAME e Password) and click on object (run macro) the link not works.

It does not recognize my NTNAME and Password, and then I get the msg "Access denied"

How can I do to pass the credentials windows in the macro ?

Code of MACRO

sub openFolder

Dim shell

Set shell = CreateObject("Shell.Application")

shell.Open "\\********\bbbb\dati_QlikView\aaaaaa\Source File"

end sub

Thanks

Demetrio