Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit
GELÖST

Mit VBS CDROM-Firmware aus der Registry auslesen

Frage Entwicklung VB for Applications

Mitglied: elionora72

elionora72 (Level 1) - Jetzt verbinden

30.10.2008, aktualisiert 02.11.2008, 4435 Aufrufe, 2 Kommentare

Hallo liebe Kollegen,

ich brauche dringend Eure professionelle Hilfe.

Ich möchte mit VBS die Firmware-Version eines CD-ROM Laufwerkes auslesen und mit Messagebox ausgeben.

Die Firmware-Version ist bestandteil eines Registry-Schlüsselnamens(nicht Schlüsselwertes):

"HKLM\SYSTEM\CurrentControlSet\Enum\IDE\CdRomHL-DT-ST_DVDRAM_GSA-H10N________________JL10____"

JL10 ist hier die Firmware-Version.

Könnt ihr mir hier etwas weiterhelfen? Vielleichtr habt ihr Teile davon, schon in ähnlich Scripten verwendet. Wäre ganz toll, was von Euch zu hören!!!

Viele Grüße!!!!
Mitglied: waldgnarf
01.11.2008 um 13:20 Uhr
Hallo Kollege =),
ich hoffe das hilft dir weiter

01.
Const HKEY_LOCAL_MACHINE = &H80000002 
02.
 
03.
strComputer = "." 
04.
 
05.
Set oReg=GetObject("winmgmts:{impersonationLevel=impersonate}!\\" & _  
06.
    strComputer & "\root\default:StdRegProv") 
07.
  
08.
strKeyPath = "SYSTEM\CurrentControlSet\Enum\IDE" 
09.
oReg.EnumKey HKEY_LOCAL_MACHINE, strKeyPath, arrSubKeys 
10.
  
11.
For Each subkey In arrSubKeys 
12.
 
13.
    If Instr(subkey, "CdRomHL-DT-ST")>0 Then 
14.
        subkeysplit=Split(subkey,"________________") 
15.
        subkeypart=Split(subkeysplit(1),"____") 
16.
        wert=subkeypart(0) 
17.
    End If 
18.
 
19.
Next 
20.
 
21.
msgbox wert
Gruß waldgnarf
Bitte warten ..
Mitglied: elionora72
02.11.2008 um 18:14 Uhr
Hallo waldgnarf,

einfach genial.
Genau das was ich brauche.

Vielen,vielen Dank.

Viele Grüße!!!!

elionora72
Bitte warten ..
Ähnliche Inhalte
VB for Applications
gelöst Bestimmte Spalten aus CSV-Datei auslesen (VBS) (9)

Frage von Gurkenhobel zum Thema VB for Applications ...

Batch & Shell
Eventlog Druckjobs mit VBS auslesen (4)

Frage von joni2000de zum Thema Batch & Shell ...

Entwicklung
Zählerstände über SNMP und VBS auslesen (4)

Frage von motofuzy zum Thema Entwicklung ...

Windows Systemdateien
gelöst Registry-Schlüssel per Batch auslesen und in Datei schreiben (9)

Frage von Philzip zum Thema Windows Systemdateien ...

Heiß diskutierte Inhalte
Exchange Server
gelöst Email in Exchange an 2ten Empfänger senden (18)

Frage von MultiStorm zum Thema Exchange Server ...

Weiterbildung
Gehaltsvorstellungen (14)

Frage von SYS64738 zum Thema Weiterbildung ...

Verschlüsselung & Zertifikate
gelöst Festplattenverschlüsselung im Ausland (13)

Frage von Nicolaas zum Thema Verschlüsselung & Zertifikate ...

Windows Server
gelöst Microsoft-Lizenz CALs und passendes Server-Betriebssystem (13)

Frage von planetIT2016 zum Thema Windows Server ...