Incor****ate Netwok Credentials into my strDBPath

The following strings allow me to connect to a remote SHARED folder

Const strDBPath As String = "\\MyServer\MyFolder\MyDB.mdb"
Const strConnect = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & 
strDBPath & ";"


Is there any way to incor****ate the network credentials into my strDBPath
without actually mapping it to a letter:

???---->"\\MyServer\MyFolder\ /user:CS\myuserid myPassword"

This, of course, so I can distribute the app (securing the code, of
course)