Visual Basic - Problema con identificación del servidor

Hola;


Les escribo porque tengo un problema que viene molestándome de hace rato, por mas que eh buscado no encuentro nada... Mi problema es el siguiente, necesito conectarme a una carpeta compartida de un servidor con USUARIO Y CLAVE, la idea es que el usuario entre a la carpeta y busque el archivo que necesita... tengo el codigo listo pero salvo el de identificación hacia el servidor, si pudieran ayudarme se los agradecería bastante.


Dim openFileDialog1 As New OpenFileDialog()
Dim file As New IO.FileInfo("\\192.168.0.54\bitacoras")
OpenFileDialog1.InitialDirectory = "\\192.168.0.54\bitacoras"
OpenFileDialog1.Title = "Browse Text Files"
OpenFileDialog1.CheckFileExists = True
OpenFileDialog1.CheckPathExists = True
OpenFileDialog1.DefaultExt = ""
OpenFileDialog1.Filter = "|*.txt"
OpenFileDialog1.FilterIndex = 2
OpenFileDialog1.RestoreDirectory = True
OpenFileDialog1.ReadOnlyChecked = False
OpenFileDialog1.ShowReadOnly = True
If OpenFileDialog1.ShowDialog() = DialogResult.OK Then
Me.RichTextBox1.LoadFile(OpenFileDialog1.FileName, RichTextBoxStreamType.PlainText)
End If



Necesito que este mismo código se logee con el servidor, eh visto algunos métodos usando SHELL pero no logro insertarlo en este código, si pueden ayudarme con algún método de acceso estaría muy agradecido, gracias.