pepperoni 10 Geschrieben 16. Februar 2005 Melden Geschrieben 16. Februar 2005 Ja ich glaub du musst dann nochmal diese Zeile Set oDrives = WshNetwork.EnumNetworkDrives vor dieser Schleife For i = 0 to oDrives.Count - 1 Step 2LAUFWERKE = LAUFWERKE & oDrives.Item(i) & " = " & oDrives.Item(i+1) & vbcrlf next For i = 0 to oPrinters.Count - 1 Step 2 PRINTER = PRINTER & oPrinters.Item(i) & " = " & oPrinters.Item(i+1) & vbcrlf next einfügen, um das oDrives Object mit den aktuellen Daten neu zu laden. Probier es jetzt gleich nochmal aus wenn ich etwas Luft hab.
pepperoni 10 Geschrieben 16. Februar 2005 Melden Geschrieben 16. Februar 2005 PS: Set oPrinters = WshNetwork.EnumPrinterConnections dann wahrscheinlich auch noch.
schmida 10 Geschrieben 16. Februar 2005 Autor Melden Geschrieben 16. Februar 2005 funktioniert :D danke !
pepperoni 10 Geschrieben 16. Februar 2005 Melden Geschrieben 16. Februar 2005 :D Immer wieder gern. :D
Empfohlene Beiträge
Erstelle ein Benutzerkonto oder melde dich an, um zu kommentieren
Du musst ein Benutzerkonto haben, um einen Kommentar verfassen zu können
Benutzerkonto erstellen
Neues Benutzerkonto für unsere Community erstellen. Es ist einfach!
Neues Benutzerkonto erstellenAnmelden
Du hast bereits ein Benutzerkonto? Melde dich hier an.
Jetzt anmelden