MyCity » Visual Studio -> Visual Basic » Citanje Registry Kljuceva Iz VB

Citanje Registry Kljuceva Iz VB

Napisano na dan: 25.2.2004

Citanje Registry Kljuceva Iz VB
Sledeća strana Pagination

Idi na vrh

Poslao: 25 Feb 2004 03:28
Idi na vrh
offline
  • Pridružio: 25 Feb 2004
  • Poruke: 35
  • Gde živiš: BiH-RS

Question Zanima Me kako da napisem kod, u VB, da mogu da iscitavam podatke iz "Registry Baze", i da te Podatke ispisem npr. u "text1.text".

Nasao sam neki, Mnogo Komplikovan kod, Koji i cita i pise i brise, Registry Kljuceve, ali ne mogu da se snadjem u njemu.

Taj kod je tipa modula klase i ako nekom trba:
[Link mogu videti samo ulogovani korisnici]

Ako neko ima, neko malo jednostavnije Rjesenje, Molim pomoc Exclamation Exclamation


_________________________________________

sove



Registruj se da bi učestvovao u diskusiji. Registrovanim korisnicima se NE prikazuju reklame unutar poruka.
Poslao: 28 Feb 2004 02:42
Idi na vrh
offline
  • Pridružio: 25 Feb 2004
  • Poruke: 35
  • Gde živiš: BiH-RS

Rijesio sam Problem.



Poslao: 28 Feb 2004 09:42
Idi na vrh
offline
  • Goran 
  • Prof.Mr.Dr.Sci. Traumatologije
  • Pridružio: 05 Maj 2003
  • Poruke: 9977
  • Gde živiš: Singidunum

Bilo bi lepo da napišeš ovde kako si to uradio da ako nekom zatreba može da pročita. Wink

BTW: Dobro nam došao Sove! Wink

Poslao: 29 Feb 2004 08:49
Idi na vrh
offline
  • Pridružio: 25 Feb 2004
  • Poruke: 35
  • Gde živiš: BiH-RS

Na standard exe Formu postavite jedno dugme i jedan text box.

Naprvite "Class Module" i imenujte ga sa "Reg".
U njega smjestite kompletan kod koji downloadujete sa:
[Link mogu videti samo ulogovani korisnici]

kod:

Private Sub Command1_Click()
Dim Registri
Dim S As Variant

Set Registri = New Reg

Registri.hkey = &H80000002

'Odredjuje Promjenjivu "hkey" u "HKEY_LOKAL_MASHINE".
'Ostale Konstante:
'HKEY_CLASSES_ROOT = &H80000000
'HKEY_CURRENT_USER = &H80000001
'HKEY_LOCAL_MACHINE = &H80000002
'HKEY_USERS = &H80000003
'HKEY_PERFORMANCE_DATA = &H80000004
'HKEY_CURRENT_CONFIG = &H80000005
'HKEY_DYN_DATA = &H80000006
'Imaju sve definisane u "Reg"
'----------------------------------------------
Registri.KeyRoot = "SOFTWARE"

'Definise Pocetni Kljuc U "hkey-u"
'----------------------------------------------
Registri.Subkey = "Microsoft\Windows NT\CurrentVersion"

'Definise Put do odredjenog kljuca
'Ako koristite Win98 ili WinMe, Onda je:
'Registri.Subkey = "Microsoft\Windows\CurrentVersion"
'----------------------------------------------
S = Registri.GetRegistryValue("ProductId")

'Poziva Funkciju za citanje vrijednosti kluceva i
'Promjenjivoj "ValueName"- (Ime Registry Kljuca),
'Dodjeljuje Vrijednost "ProductId"
'----------------------------------------------

Text1.Text = S

End Sub

___________________________________________________________
Sove

MyCity » Visual Studio -> Visual Basic » Citanje Registry Kljuceva Iz VB

Ko je trenutno na forumu
 

Ukupno su 1019 korisnika na forumu :: 102 registrovanih, 7 sakrivenih i 910 gosta   ::   [ Administrator ] [ Supermoderator ] [ Moderator ] :: Detaljnije

Najviše korisnika na forumu ikad bilo je 3466 - dana 01 Jun 2021 17:07

Korisnici koji su trenutno na forumu:
Korisnici trenutno na forumu: 357magnum, 8u47, Abebe Bikila, AleksandarV, Asteker, Automaticar, babaroga, baltazar01, bavar357, boban977, Bobrock1, boj.an, Bojan198527, Boris BM, boromir, Bosnjo, BOXRR, brkan1, Car89, cemix, Cili, debeli, Deki Duga Devetka, deLacy, dj.ape, draganl, dragon_hv, dukajov, ElGenius, Frunze, Georgius, Giro77, Gogi_avio, goran.vvv, HogarStrashni, HrcAk47, Ivan Campo, Jakonjveliki, jarovitt, jmsk, Joja2, Jozo74, K-1A, kaskadija, kenny74, koliko, KonstantinR, Kototamopeva, kovinacc, kybonacci, M74AB3, Macalone, Marko Marković, max power, MDrasko, medaTT, mercedesamg, Mercury, milenko crazy north, milutin134, N.e.m.a.nj.a., N95, nebidrag, nemkea71, opt1, Orc, Paklenica, pandur, Pangea, Papadubi, pein, peradetlić, PlayerOne, Pohovani_00, Prašinar, PrincipL, procesor, raf87, RajkoB, redstar72, ruma, SamostalniReferent, Sančo, sickmouse, sombrero, sova72, SOVO515, Strasni JA, tamno.nebo, Tandrkalo, TBoy, trajkoni018, vaso1, Veselimalisa, VOŽD, vukajlo71, vuksa72, wolf431, Zmaj Tolak, zoran ns, |_MeD_|, šumar bk2