/ Forside / Teknologi / Udvikling / VB/Basic / Nyhedsindlæg
Login
Glemt dit kodeord?
Brugernavn

Kodeord


Reklame
Top 10 brugere
VB/Basic
#NavnPoint
berpox 2425
pete 1435
CADmageren 1251
gibson 1230
Phylock 887
gandalf 836
AntonV 790
strarup 750
Benjamin... 700
10  tom.kise 610
Net Use i VB6
Fra : Lars Thomsen Nielsen


Dato : 05-11-02 22:35

Jeg ønsker at anvende den gamle DOS kommando Net Use i VB6, men
jeg ved ikke helt hvordan jeg programmerer det, ej heller om det
kan lade sig gøre. Kort fortalt vil jeg, når jeg trykker på en
commandbutton på en form, gerne have programmet til at gøre
følgende:

Net Use Z: \\NetDrev

Kan nogen hjælpe?

mvh

Lars Thomsen Nielsen

********************************************************
This emails is made by 100% recycled electrons
********************************************************


 
 
CADmageren ApS (06-11-2002)
Kommentar
Fra : CADmageren ApS


Dato : 06-11-02 17:11

Hej Lars

Som svar på dit spørgsmål skal du bruge Shell kommandoen.
Men hvis du har installeret WScript på din maskine, vil jeg istedet foreslå
følgende kald:


Option Explicit

Sub main()
Dim net As Object
Set net = CreateObject("WScript.Network")
net.MapNetworkDrive "E:", "\\Michael_Dell\DXF"
End Sub


Med venlig hilsen
www.cadmageren.dk

Michael Christoffersen




Helge Bjørkhaug (06-11-2002)
Kommentar
Fra : Helge Bjørkhaug


Dato : 06-11-02 17:46

On Wed, 6 Nov 2002 17:11:29 +0100, "CADmageren ApS"
<news@cadmageren.dk> wrote:

>Hej Lars
>
>Som svar på dit spørgsmål skal du bruge Shell kommandoen.
>Men hvis du har installeret WScript på din maskine, vil jeg istedet foreslå
>følgende kald:
>
>
>Option Explicit
>
>Sub main()
>Dim net As Object
> Set net = CreateObject("WScript.Network")
> net.MapNetworkDrive "E:", "\\Michael_Dell\DXF"
>End Sub

Eventuelt API.
<http://www.allapi.net/apilist/WNetAddConnection2.shtml>
Link til eksempel nederst på siden.....

--
Snutten
Reply-to adressen er gyldig inntil spam er mottatt

Søg
Reklame
Statistik
Spørgsmål : 177557
Tips : 31968
Nyheder : 719565
Indlæg : 6408881
Brugere : 218888

Månedens bedste
Årets bedste
Sidste års bedste