Follow along with the video below to see how to install our site as a web app on your home screen.
Note: This feature may not be available in some browsers.
Dim dlg As Dialog
Set dlg = Dialogs(wdDialogConnect)
dlg.drive = 0 ' select first available drive letter
dlg.Path = "\\server\drive"
dlg.Password = "yourpassword"
dlg.Execute
Set dlg = Nothing
Dim wshNetwork As New IWshRuntimeLibrary.IWshNetwork_Class
wshNetwork.MapNetworkDrive "R", "\\myserver\myshare", True
Automation error.
The specified device name is invalid.
sub lookforandmapadrive()
dim fso a new filesystemobject, wshN as new iwshruntimelibrary.iwshnetwork_class
if fso.driveexists("R")=false then
wshN.mapnetworkdrive "r:","\\myserver\myshare",true
end if
end sub