vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
TOP-Angebot: 17 bzw. 24 Entwickler-Vollversionen zum unschlagbaren Preis!  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2025
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Visual-Basic Einsteiger
Re: Dateien auslesen 2.Teil 
Autor: jinx
Datum: 03.07.02 19:24


hier ist der Anhang,der Anhang ist verkurzt,
wie zu sehen ist, kann man aus 2 Registryeinträgen 3 Werte eines gerätes auslesen
share name
printer driver
port

dann kommt der nächste drucker und so weiter

aufgabe ist eben die 3 werte jedes druckers auszulesen in einer zeile , nächste zeile nächster drucker bis ende

falls bei der lesung z.bsp:
port=(kein Eintrag)also keine angaben

diese in der jeweiliger liste mit *** auszugeben

alle 10 aufgelistete drucker
2 zeilenabstände wegen übersichtlichkeit

letzte aufgabestellung:
die gesammelte werden in einem neuen datei schreiben(neuen Ordner)

Soweit bin ich mit Code aber der läuft nicht richtig(achso Ausgabe erstmal in Textfeld des programmes, aber wenn der läuft soller in einem extra ordner gespeichert weren)

===================================
REGEDIT4

[HKEY_LOCAL_MACHINESYSTEMCurrentControlSetControlPrintPrinters]

[HKEY_LOCAL_MACHINESYSTEMCurrentControlSetControlPrintPrintersFBDA002]
"ChangeID"=dword:
"Status"=dword:
"Name"="FBDA002"
"Share Name"="FBDA002"
"Print Processor"="winprint"
"Datatype"="RAW"
"Parameters"=""
"Description"=""
"Printer Driver"="Kyocera FS-680"
"Default DevMode"=hex:46,00,42,00,44,00,41,00,30,00,30,00,32,00,00,00,00,00,00,
00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,
00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,01,04,01,03,dc,
00,70,00,03,63,01,00,01,00,09,00,00,00,00,00,00,00,01,00,0f,00,58,02,02,00,
01,00,58,02,02,00,00,00,41,00,34,00,00,00,74,00,65,00,72,00,00,00,00,00,00,
00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,
00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,
00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,
00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,
00,20,00,ff,ff,ff,ff,c6,03,00,00,00,00,00,00,ff,ff,ff,ff,ff,ff,ff,ff,00,00,
1a,00,04,00,1b,00,04,00,00,00,00,00,07,00,01,00,ff,ff,04,00,01,00,00,00,ff,
ff,01,00,02,00,ff,ff,ff,ff,ff,ff,ff,ff,ff,ff,ff,ff,ff,ff,ff,ff,ff,ff,ff,ff,
ff,ff,ff,ff,ff,ff,ff,ff,ff,ff,00,00,00,00,18,00,00,00,00,00,10,27,10,27,10,
27,00,00,10,27,00,00,00,00,00,00,00,00
"Priority"=dword:00000001
"Default Priority"=dword:00000000
"StartTime"=dword:00000000
"UntilTime"=dword:00000000
"Separator File"=""
"Location"=""
"Attributes"=dword:00000008
"txTimeout"=dword:0000afc8
"dnsTimeout"=dword:00003a98
"Security"=hex:01,00,04,80,d0,00,00,00,e0,00,00,00,00,00,00,00,14,00,00,00,02,
00,bc,00,05,00,00,00,00,09,24,00,00,00,00,10,01,05,00,00,00,00,00,05,15,00,
00,00,3f,5c,83,71,c1,48,fe,71,ae,09,1b,16,00,02,00,00,00,02,24,00,0c,00,0f,
00,01,05,00,00,00,00,00,05,15,00,00,00,3f,5c,83,71,c1,48,fe,71,ae,09,1b,16,
00,02,00,00,00,02,24,00,08,00,02,00,01,01,00,00,00,00,00,01,00,00,00,00,3f,
5c,83,71,c1,48,fe,71,ae,09,1b,16,00,02,00,00,00,09,24,00,00,00,00,10,01,01,
00,00,00,00,00,03,00,00,00,00,3f,5c,83,71,c1,48,fe,71,ae,09,1b,16,00,02,00,
00,00,02,24,00,00,00,02,00,01,01,00,00,00,00,00,03,00,00,00,00,3f,5c,83,71,
c1,48,fe,71,ae,09,1b,16,00,02,00,00,01,02,00,00,00,00,00,05,20,00,00,00,20,
02,00,00,01,05,00,00,00,00,00,05,15,00,00,00,3f,5c,83,71,c1,48,fe,71,ae,09,
1b,16,00,02,00,00
"SpoolDirectory"=""
"TotalJobs"=dword:000000df
"TotalBytes"=hex:6c,27,7d,01,00,00,00,00
"TotalPages"=dword:00000075
"Port"="155.55.85.137:LPT1"

[HKEY_LOCAL_MACHINESYSTEMCurrentControlSetControlPrintPrintersFBDA002PrinterDriverData]
"Country"=dword:00000031
"Model"="Kyocera FS-680"
"TrayFormTable"=hex(7):41,75,74,6f,00,41,34,00,30,00,4b,61,73,73,65,74,74,65,
20,31,20,28,69,6e,74,65,72,6e,29,00,30,00,30,00,4b,61,73,73,65,74,74,65,20,
32,00,30,00,30,00,4d,61,6e,75,61,6c,20,50,61,70,65,72,20,66,65,65,64,00,30,
00,30,00,45,6e,76,65,6c,6f,70,65,2c,20,4d,61,6e,75,61,6c,20,46,65,65,64,00,
30,00,30,00,00
"FreeMem"=hex:00,08,00,00
"RasddFlags"=hex
"FontCart"=hex(7)

[HKEY_LOCAL_MACHINESYSTEMCurrentControlSetControlPrintPrintersFBDA007]
"ChangeID"=dword
"Status"=dword
"Name"="FBDA007"
"Share Name"="FBDA007"
"Print Processor"="winprint"
"Datatype"="RAW"
"Parameters"=""
"Description"=""
"Printer Driver"="Kyocera FS-680"
"Default DevMode"=hex:46,00,42,00,44,00,41,00,30,00,30,00,37,00,00,00,00,00,00,
00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,
00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,01,04,01,03,dc,
00,70,00,03,63,01,00,01,00,09,00,00,00,00,00,00,00,01,00,0f,00,58,02,02,00,
01,00,58,02,02,00,00,00,41,00,34,00,00,00,74,00,65,00,72,00,00,00,00,00,00,
00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,
00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,
00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,
00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,
00,20,00,ff,ff,ff,ff,c6,03,00,00,00,00,00,00,ff,ff,ff,ff,ff,ff,ff,ff,00,00,
1a,00,04,00,1b,00,04,00,00,00,00,00,07,00,01,00,ff,ff,04,00,01,00,00,00,ff,
ff,01,00,02,00,ff,ff,ff,ff,ff,ff,ff,ff,ff,ff,ff,ff,ff,ff,ff,ff,ff,ff,ff,ff,
ff,ff,ff,ff,ff,ff,ff,ff,ff,ff,00,00,00,00,18,00,00,00,00,00,10,27,10,27,10,
27,00,00,10,27,00,00,00,00,00,00,00,00
"Priority"=dword:00000001
"Default Priority"=dword:00000000
"StartTime"=dword:00000000
"UntilTime"=dword:00000000
"Separator File"=""
"Location"=""
"Attributes"=dword:00000008
"txTimeout"=dword:0000afc8
"dnsTimeout"=dword:00003a98
"Security"=hex:01,00,04,80,e4,00,00,00,f4,00,00,00,00,00,00,00,14,00,00,00,02,
00,d0,00,08,00,00,00,00,0a,14,00,00,00,02,00,01,01,00,00,00,00,00,03,00,00,
00,00,00,09,14,00,00,00,00,10,01,01,00,00,00,00,00,03,00,00,00,00,00,00,14,
00,08,00,02,00,01,01,00,00,00,00,00,01,00,00,00,00,00,0a,14,00,00,00,00,20,
01,01,00,00,00,00,00,01,00,00,00,00,00,00,18,00,0c,00,0f,00,01,02,00,00,00,
00,00,05,20,00,00,00,20,02,00,00,00,0b,18,00,00,00,00,10,01,02,00,00,00,00,
00,05,20,00,00,00,20,02,00,00,00,00,18,00,0c,00,0f,00,01,02,00,00,00,00,00,
05,20,00,00,00,23,02,00,00,00,0b,18,00,00,00,00,10,01,02,00,00,00,00,00,05,
20,00,00,00,23,02,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,
00,00,00,00,00,00,00,01,02,00,00,00,00,00,05,20,00,00,00,20,02,00,00,01,05,
00,00,00,00,00,05,15,00,00,00,3f,5c,83,71,c1,48,fe,71,ae,09,1b,16,00,02,00,
00
"SpoolDirectory"=""
"TotalJobs"=dword:00000036
"TotalBytes"=hex:6a,27,20,00,00,00,00,00
"TotalPages"=dword:00000049
"Port"="155.55.85.133:LPT1

=======================================

Bis dann
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
Dateien auslesen 2.Teil55jinx03.07.02 17:35
Re: Dateien auslesen 2.Teil271ModeratorDieter03.07.02 19:05
Re: Dateien auslesen 2.Teil37jinx03.07.02 19:24
Re: Dateien auslesen 2.Teil29jinx03.07.02 23:15
Re: Dateien auslesen 2.Teil31jinx03.07.02 23:18

Sie sind nicht angemeldet!
Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden.

Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  GesamtübersichtSuchen 

nach obenzurück
 
   

Copyright ©2000-2025 vb@rchiv Dieter Otter
Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel