Krijg de waarde van de subkey "oeminformation" niet terug

[hanonymouss]

Hallo allemaal,

Ik probeer de waarde van de subkey "oeminformation" te verkrijgen, maar het leukt gewoon niet.

Ik heb het geprobeerd bij andere subkeys en daar krijg ik de waarde wel terug.

[CPP] Dim leeswaarde As String
leeswaarde = My.Computer.Registry.GetValue _
("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\OEMInformation", "Manufacture", Nothing)
TextBox2.Text = leeswaarde[/CPP]

bijvoorbeeld met deze subkey werkt het wel:

[CPP] Dim leeswaarde As String
leeswaarde = My.Computer.Registry.GetValue _
("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\.NETFramework", "DbgManagedDebugger", Nothing)
TextBox2.Text = leeswaarde[/CPP]

Iemand een idee hoe dat komt?

 

[Ellasar]

Misschien een hele domme vraag maar... staat er wel wat in? en heeft het account waar je het script/programma mee start de juiste rechten op de desbetreffende key

 

[JoZ1]

Je krijgt dus geen foutmelding? Zo niet, dan kan het niet aan de rechten liggen.

 

[Ellasar]

Je krijgt dus geen foutmelding? Zo niet, dan kan het niet aan de rechten liggen.

Ik zie niet hoe hij zijn foutafhandeling heeft geregeld maar fouten zijn prima af te vangen

 

[JoZ1]

Dat klopt, maar dan wordt er wél een exception afgegeven. Dat bedoelde ik

 

[hanonymouss]

@ellasar:ik heb geen try catch of option strict on gebruikt. voor het verkrijgen van het register waarde hoeft het programma of de account geen administrator rechten te hebben. Tenzij je een wijziging of een nieuw key aanmaakt in desbetrefende pad behalve "current user " omdat je alleen wijziging aanbrengt op de settings dat jouw account gebruik maakt .
Graag zou ik willen of jullie het probleem ook krijgen als je een van de waarde van de subkey "oeminformation" aanroept. Ik kan andere waarde wel verkrijgen behalve op die ene sub. Dat maakt me nou ambetant
Graag suggesties voor dit probleem
JoZ1: IK gebruik voor de zekerheid altijd administrator rechten

 

[Ellasar]

Je zit in Local machine te grasduinen en niet in Current user. (voor lees acties heb je nog steeds geen hogere rechten nodig.

Maar ik zie wel waarom je geen waarde terug krijgt. De key die je uitleest bestaat niet (iig niet op een standaard machine) en ook niet op de corporate machines die ik hier heb staan...

("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\OEMInformation", "Manufacture", Nothing)

Onderstaande zal je wel kunnen ophalen denk ik

("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\OEMInformation", [B]"Manufacture[COLOR="#FF0000"]r[/COLOR]", [/B]Nothing)

 

[hanonymouss]

Je hebt het dus geprobeerd ?
Wat is eigenlijk het verschil tussen die code die je me gaf ? Ze zien hetzelfde uit. Maar waarom lukt het wel als ik een nieuw sleutel aanmaak in de hklm dam krijg ik de waarde wel terug ?

 

[MartinJM]

Het verschil zit hem in de 'r' die in de naam staat...
Een klein verschil in de naam en het werkt niet meer....

Maar is het nu opgelost?

 

[hanonymouss]

Ik krijg niets terug

 

[MartinJM]

Dubbel gecheckt of de naam echt klopt??

 

[hanonymouss]

Manufacturer is niet alleen het probleem maar:

Logo
Model
SupportHours
SupportPhone
SupportURL

 

[hanonymouss]

Dubbel gecheckt of de naam echt klopt??

jaja, werkt dit bij u?

 

[hanonymouss]

Ik heb een computer met een 64 bit systeem. Nu als ik een subkey aanmaak in de sector HKLM onder "SOFTWARE" dan schrijf hij alles naar Wow6432Node, maar ik wil dat hij hem maakt in HKEY_LOCAL_MACHINE\SOFTWARE in de plaats van HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node

iemand suggesties ?

 

[Ellasar]

Leuk dingetje,
vanuit een VBS werkt het wel metde volgende code:

[CPP]const HKEY_LOCAL_MACHINE = &H80000002

strComputer = "."

Set oReg=GetObject("winmgmts:{impersonationLevel=impersonate}!\\" &_
strComputer & "\root\default:StdRegProv")


strKeyPath = "SOFTWARE\Microsoft\Windows\CurrentVersion\OEMInformation"
strValueName = "Manufacturer"
oReg.GetStringValue HKEY_LOCAL_MACHINE,strKeyPath,strValueName,strValue
msgbox "Current Value: " & strValue[/CPP]

Maar onder VB niet.....

Of toch wel
BJe loopt tegen hetzelfde probleem aan van de wow6432node (zet daar de SOFTWARE\Microsoft\Windows\CurrentVersion\OEMInformation + manufacturer key onder en het werkt wel)

Je project als x64 compilen werkt

 

[hanonymouss]

Ik wil dat het programma voor 64 als 32 werkt.

 

[MartinJM]

Eerst checken of het 64-bits is of niet en op basis daarvan naar de verschillende registery keys kijken??

Voor het checken van 64-bits of niet: http://stackoverflow.com/questions/601089/detect-whether-current-windows-version-is-32-bit-or-64-bit

 

[hanonymouss]

Opgelost !

Na lang zoeken in mijn instellingen ben ik op de tab "advanced compile option en heb voor anycpu gekozen en nu werkt het uitstekend :thumb:

Toch bedank voor jullie hulp