Acceder a la carpeta de red compartida
Necesito acceder a través de VBA a una carpeta alojada en un servidor de archivos de red. Solo se puede acceder a la carpeta por escrito a través de una Cuenta de servicio (diferente de las cuentas de usuario normales) para la que tengo nombre de usuario y contraseña.
A través de la interfaz de usuario puedo ver esa carpeta y asignarla como una unidad local, pero para acceder a ella por escrito necesito cerrar sesión en Windows e iniciar sesión a través de la cuenta de servicio.
¿Hay alguna forma de acceder a la carpeta de red durante una sesión de usuario normal pero codificando el nombre de usuario y pwd en el código VBA?
Intenté asignar la carpeta como unidad local con:
Set WshNetwork = CreateObject("WScript.Network")
WshNetwork.MapNetworkDrive "S:", "\\corp-server\HostingFolder", False, Username, pwd
pero no funcionó (la unidad "S" no estaba asignada). Si en cambio hago lo mismo pero sin proporcionar Nombre de usuario y contraseña:
Set WshNetwork = CreateObject("WScript.Network")
WshNetwork.MapNetworkDrive "S:", "\\corp-server\HostingFolder"
Funciona perfectamente.
¿Se pregunta ahora si lo que estoy tratando de hacer es realmente posible? Si no, ¿hay alguna alternativa?
Gracias