Ako pre prístup k vzdialeným Systémové informácie vo VB6

Visual Basic 6 ( VB6 ) môžu programátori vytvárať siete - aware aplikácie , ktoré získavanie informácií vzdialeného počítača a zobraziť ho užívateľmi . Tieto programy sú vytvorené pre sieťových administrátorov , ktorí potrebujú spravovať viac počítačov . Jazyk VB6 má niektoré funkcie a nástroje , ktoré umožňujú získavanie informácií zo vzdialeného počítača v sieti . Môžete vytvoriť tento kód do vašich Microsoft VB6 editora . Pokyny dovolená 1

Dvakrát kliknite na súbor VB6 projektu na vašom počítači . Váš VB6 pracovnej plochy automaticky načíta a VB6 otvorí editor .
2

Vytvorenie pripojenia k vzdialenému počítaču . Nasledujúci kód vytvorí pripojenie k " mycomputer " počítača : Autor

Set WMI = GetObject ( " winmgmts : { ImpersonationLevel = impersonate } \\ \\ počítač \\ root \\ cimv2 " )

3

Prihlásiť sa k vzdialenému počítaču . Musíte sa prihlásiť pomocou konta správcu na získavanie informácií z počítača . Nasledujúce vás prihlási k počítaču . Zadajte ju do VB6 priestoru :

Set lokátor = CreateObject ( " WbemScripting.SWbemLocator " )

Set service = locator.ConnectServer ( " mycomputer " , " root \\ cimv2 " , " správca " , " heslo " )
4

Zobrazenie informácií o vzdialené počítače . V tomto príklade je meno služby systému Windows sa zobrazí užívateľovi . Služba je program , pozadia , ktorý beží na počítači s Windows . Zobrazia sa nasledujúce informácie o počítači :

Set dotaz = _ service.ExecQuery ( " SELECT * FROM Win32_Process " )

Wscript.echo " Process Name : " & query.Name

5

Kliknite na " Súbor " položku menu a zvoľte možnosť " Uložiť " . Ak chcete vyskúšať nový kód , kliknite na tlačidlo VB6 " Run " pre spustenie programu v počítači .

• Predchádzajúca strana: Ako naprogramovať tlačidlá Vypočítať v Vb.Net 
• Ďalšia strana: VBA makrá Školenia