Visual Basic - Entrar a carpeta compartida

Estoy desarrollando un programa en(vb6) el cual necesito guardar varios archivos en una carpeta compartida. El programa podra ser usado en la pc que funcionara como servidor (Windows 2000 pro) o en las maquinas clientes.

el detalle es para accesar desde otra maquina ya que necisito capturar el nombre de usuario y contraseña para tener acceso a la carpeta.

Existira alguna forma posible de hacerlo a traves del programa (desarrollado en VB6), para que el usuario no necesite hacerlo manualmente?

gracias de antemano

El usuario conectado lo puedes obtener con:

Public Declare Function GetUserName Lib "advapi32.dll" Alias "GetUserNameA" (ByVal lpBuffer As String, nSize As Long) As Long

La contraseña creo que no es posible, igualmente si el usuario y contraseña del usuario conectado tienen permiso para acceder al recurso compartido no deberías volver a ingresarlo.

Igualmente para conectar un recurso compartido puedes usar:

Public Declare Function WNetAddConnection Lib "mpr.dll" Alias "WNetAddConnectionA" (ByVal lpszNetPath As String, ByVal lpszPassword As String, ByVal lpszLocalName As String) As Long

Public Declare Function WNetAddConnection2 Lib "mpr.dll" Alias "WNetAddConnection2A" (lpNetResource As NETRESOURCE, ByVal lpPassword As String, ByVal lpUserName As String, ByVal dwFlags As Long) As Long