pepperoni 10 Geschrieben 16. Februar 2005 Melden Teilen 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. Zitieren Link zu diesem Kommentar
pepperoni 10 Geschrieben 16. Februar 2005 Melden Teilen Geschrieben 16. Februar 2005 PS: Set oPrinters = WshNetwork.EnumPrinterConnections dann wahrscheinlich auch noch. Zitieren Link zu diesem Kommentar
schmida 10 Geschrieben 16. Februar 2005 Autor Melden Teilen Geschrieben 16. Februar 2005 funktioniert :D danke ! Zitieren Link zu diesem Kommentar
pepperoni 10 Geschrieben 16. Februar 2005 Melden Teilen Geschrieben 16. Februar 2005 :D Immer wieder gern. :D Zitieren Link zu diesem Kommentar
Empfohlene Beiträge
Schreibe einen Kommentar
Du kannst jetzt antworten und Dich später registrieren. Falls Du bereits ein Mitglied bist, logge Dich jetzt ein.