Datamaskin
  | Hjem | Hardware | Nettverk | Programmering | Software | Feilsøking | Systems | 
Programmering  
  • C /C + + Programming
  • Computer Programmeringsspråk
  • Delphi Programming
  • Java Programming
  • JavaScript Programmering
  • PHP /MySQL programmering
  • Perl Programming
  • Python Programming
  • Ruby Programming
  • Visual Basics Programming
  •  
    Datamaskin >> Programmering >> Visual Basics Programming >> Content
    Finne ut om en registernøkkel finnes i VBScript
    Peering inn i systemet registret gir deg et glimt inn i operativsystemets kritiske innstillinger . Disse innstillingene , som kalles nøkler , kontrollere måten Windows fungerer . Utviklere bruker VBScript og andre verktøy for å undersøke og endre nøklene. Hvis du trenger å kontrollere at en bestemt nøkkel finnes før du utfører et register drift, kan du lage en kort VBScript funksjon som spør registret. Instruksjoner
    en

    Åpne Notepad eller en tekst editor og lim inn følgende VBScript kode i et nytt dokument : en

    Option Explicit

    Dim KeyName

    KeyName = " HKEY_CURRENT_USER \\ Software \\ Microsoft \\ Windows \\ CurrentVersion \\ Explorer \\ Wallpapers \\"
    p Hvis KeyFound ( KeyName ) = True Deretter

    Wscript.echo " Key finnes"
    < p > Else Wscript.echo " Key finnes ikke"

    End If

    variabelen " KeyName " holder navnet på registernøkkelen som du trenger for å søke . Erstatt " Name" med en nøkkel av ditt valg. Den neste kodelinje passerer det navnet til en funksjon som heter " KeyFound . " At funksjonen sjekker for å se om nøkkelen finnes
    2

    Legg denne koden under koden vist i det siste trinnet : .

    Funksjon KeyFound ( ByVal KeyName )

    keyFound = false

    Dim rightCharacter

    rightCharacter = høyre ( KeyName , 1 )

    hvis rightCharacter < > "\\ " Da KeyName = KeyName & " \\ "

    på feil fortsette neste

    CreateObject ( " WScript.Shell ") regRead trim ( KeyName )

    velg tilfelle feile

    saken 0 : . keyFound = true

    slutt velger

    end funksjon

    Dette er " KeyFound "-funksjonen . Det legger en skråstrek på slutten av nøkkelen hvis ingen eksisterer og utfører " regRead " metoden. Den "på feil " statement gjør at programmet kan fortsette å kjøre selv om " regRead "-metoden ikke klarer å finne ønsket registernøkkelen. Hvis metoden finner en nøkkel, setter kode verdien av " keyFound " til sann .
    3

    Lagre filen med VBS forlengelse. For eksempel, hvis du ønsker å gi den navnet " CheckKeys , " lagre som " CheckKeys.vbs . "
    4

    Start Windows Utforsker og finn filen . Dobbeltklikk filen for å kjøre programmet . Det utfører og viser " Key finnes" hvis den finner nøkkelen eller " Key finnes ikke" hvis den ikke gjør det .

    früher :

     Weiter:
      Relatert Artike
    ·Hvordan endre fargeinnstillinger i Visual Basic 
    ·Case funksjoner i VBA 
    ·Hvordan å sende kommandoer til et program ikke er i fo…
    ·Slik bruker du en ekstern Debugger 
    ·Hvordan Ping en liste over datamaskiner med VBScript 
    ·Hvordan lage et spill trener i Visual Basic 2008 
    ·Overbelastning metoder i Visual Basic 
    ·Visual Basic Strengfunksjoner 
    ·Visual Basic Tutorial på Sentence Space 
    ·Hvordan sende Vars Fra VBScript til en batch fil 
      Anbefalte artikler
    ·Hvordan Rund desimaler i C + + 
    ·Opplæring for LiveWires Python 
    ·Hvordan erstatte 1,6 i Java String 
    ·Jeg kan ikke skrive ut rader med en Java applet 
    ·Hvordan Kommentar i en Java Script 
    ·Hvordan skrive en fil i Visual Basic 6 
    ·Hvordan Test FFmpeg i PHP 
    ·Slik bruker du Add Forms Logg Dialog i Visual Basic 6.0…
    ·CURL & HTTP Kunne ikke løse Host 
    ·Forskjellen mellom OnBeforeUnload & onunload 
    Copyright ©  Datamaskin  http://www.datamaskin.biz/