Ho scritto queste righe:
Sub Globals
'Declare the global variables here.
Dim number, name, files(0) As string, binary(0) As byte
End Sub
Sub App_Start
reg.New1
reg.RootKey(reg.rtLocalMachine)
number = reg.GetValue("Software\OEM", "SysLang") 'Number Of Items is of type REG_DWORD
name = reg.GetValue("Software\Comm", "AutoRun") 'User Name is of type REG_SZ
files() = reg.GetValue("Software\Drivers\BuiltIn", "IClass") 'Recent file is of type REG_MULTI_SZ (multi - string)
binary() = reg.GetValue("Software\AudioCompressionManager\Dri verCache\msacm.msg711","aFormatTagCache") 'BinaryValue is of type REG_BINARY
Msgbox(number, "DWORD")
Msgbox(name, "STRING")
Msgbox(files(), "MULTISTRING")
Msgbox(binary(), "BINARY")
End Sub
Mi viene restituito l'errore di "chiave non trovata" sulla lettura della DWORD; se provo ad escludere la riga, stessa cosa per la STRING.
La cosa pių strana č che ho copiato pari pari l'esempio del Manuale; l'unica variazione č stata effettuata sui path delle variabili del registry da leggere.
Premetto che ho usato una sintassi simile per leggere keys su HKCU (anzichč HKLM) senza problemi di sorta... sono di nuovo costretto a chiedervi aiuto
