Using VB to Open a Network Share

[mannion]

:-(

Hi I'm trying to use vb to open a network share. Basically A form pops up, there is a text box, you type the users name in then, click on the button below.

For the button this is the coding I have been trying to get to work!!!


Private Sub Command2_Click()

Dim Path As String
Path = "\\xx3\" + Text1.Text
Set WshNetwork = Wscript.CreateObject("Wscript.Network&quot
WshNetwork.MapNetworkDrive "Z:", Path

End Sub


Anyone see where I have gone wrong???? :-( :-(

 

[mannion]

anyone?????

 

[Lightseeker]

Try this


Dim Path As String
Path = "\\\\xx3\\" & Text1.Text
Set WshNetwork = Wscript.CreateObject("Wscript.Network&quot
WshNetwork.MapNetworkDrive "Z:", Path




notice the double backslashes...
hope this helps

lightseeker

 

[mannion]

Ok Lightseeker, I have tried what you said, now instead of getting the yellow debug line on the second line I get it on the thired line of the script. Do you have any idea's???

This is line with the debug:

Set WshNetwork = Wscript.CreateObject("Wscript.Network&quot

Thanks for your help anyway lightseeker!! James Mannion
IT Officer
James_m_is@hotmail.com

 

[Lightseeker]

Sorry, try this

Dim Path As String
Path = "\\xx3\" & Text1.Text
Set WshNetwork = Wscript.CreateObject("Wscript.Network&quot
WshNetwork.MapNetworkDrive "Z:", Path


leave out the double backslashes and be sure to use the ampersand

lightseeker

 

[mannion]

OO frustrating still coming up with the same problem cheers anyway!!! James Mannion
IT Officer
James_m_is@hotmail.com

 

[Lightseeker]

Sorry I haven't helped...try looking at this link

http://www.annoyances.org/exec/show/wsh

lightseeker