Miten luodatiedoston VBScript

Scripting voi ollahelppo tapa luodatekstitiedosto . numerot pimeässä kuvan .shock päässä Fotolia.com

VBScript on kevyt ohjelmointikieli Microsoftin kehittämä.Se on erittäin hyödyllistä tietää, miten ohjelma VBScript, koska sen tulkkeja kieltä on upotettu kaikki Microsoft käyttöjärjestelmissä.Ei erityisiä ohjelmointi tarvita työkaluja suorittaa tai kirjoittaa koodia VBScript.Tämä kieli voidaan käyttää client-side tai lisätä Web-sivuja.

Ohjeet

  1. hiiren kakkospainikkeella Resurssienhallinnassa, valitse \ "Uusi \" alkaen ponnahdusvalikosta ja valitse sitten\ "Tekstitiedosto \" valikkoa luoda tekstitiedosto.

  2. Avaa juuri luotu tiedosto muokkausta varten.Tämä on kontti kaikkien VBScript-koodin kirjoitat.Kussakin vaiheessa alla, näet useita rivejä koodia plain Englanti kuvaus siitä, mitä he tekevät.Kun laitat kaikki nämä riviä koodia yhdessä, voit päätyä script luoda tekstitiedosto.

  3. Luo muuttuja tiedostojärjestelmän objekti ja instantiate se (asettaa sen uusi esiintymä esineen).VBScript luot muuttujat \ "mitoituksella \"

    ne \ "Dim \" komento.Monimutkaisia ​​muuttujia (ne, jotka eivät ole jouset, kokonaislukuja tai booleans) on instantiated ennen kuin voit käyttää niitä.

    Kopioi seuraava koodi tekstitiedostoon:
    Dim objFSO "Kuten FileSystemObject
    sarja objFSO = CreateObject (\" scripting.filesystemobject \ ")

  4. Lisää merkkijono muuttuja hakemistopolku, johon haluat laittaa tiedostoja aseta se haluttuun paikkaan.

    Kopioi seuraava koodi tekstitiedostoon:
    Dim strDirectory "As String
    strDirectory = \" C: \ NewDirectory \ "

  5. Varmista että hakemistoon kansio on olemassa.Jos hakemisto ei ole olemassa, luo se käyttää tiedostojärjestelmän objekti.

    Kopioi seuraava koodi tekstitiedostoon:
    Dim objDirectory "objektina
    Jos objFSO.FolderExists (strDirectory) Sitten

    Aseta objDirectory = objFSO.GetFolder (strDirectory)

    Else

    sarja objDirectory = objFSO.CreateFolder (strDirectory)

    EndJos

  6. Tee merkkijono muuttujan tiedoston nimi ja aseta se sopiva arvo.

    Kopioi seuraava koodi tekstitiedostoon:
    Dim strfile "As String
    strfile = \" NewFile.txt \ "

  7. Luo muuttuja tekstitiedosto ja instantiate se.CreateTextFile menetelmä on valinnainen parametri korvaa tiedosto se se on jo olemassa.

    Kopioi seuraava koodi tekstitiedostoon:
    Dim objTextFile "objektina
    Dim blnOverwrite" Kuten Looginen
    blnOverwrite = True
    Aseta objTextFile = objFSO.CreateTextFile (strDirectory & amp; \ "\\" & amp; strfile, blnOverwrite)

  8. Kirjoita tiedot uusille tiedosto alla oleva koodi.On kaksi tapaa kirjoittaa tiedostoihin, \ "Kirjoita \" ja \ "WriteLine. \" Jälkimmäinen menetelmä automaattisesti sisältää uuden rivin merkki sinulle, kun taas entinen vain liittää tietoja, mikä on jo läsnä.

    Kopioi seuraava koodi tekstitiedostoon:
    objTextFile.Write (\ "Tämä on \")
    objTextFile.WriteLine (\ "uusi tekstitiedosto \")
    "Tämä johtaa merkkijonon \" Tämä on uusitekstitiedosto \ "

  9. Sulje tiedosto koodilla ja asianmukaisesti vapauttamaan kaikki objektit.

    Kopioi seuraava koodi tekstitiedostoon:
    objTextFile.Close
    sarja objTextFile = Nothing
    Aseta objDirectory = Nothing
    Aseta objFSO = Nothing

  10. Tallenna kaikki koodi loit edellisessä astuu tekstitiedosto kloalussa ja sulje tiedosto.Nimeä tiedosto \ ". VBS \" sijaan \ ". Txt \" oikealla klikkaamalla tiedostoa ja valitsemalla \ "Nimeä \" alkaen ponnahdusvalikosta.Tupla-klikkaa tiedostoa suorittamaan koodia.

Vinkkejä & amp;Varoitukset

  • korvaaminen tiedosto luo uuden tyhjän tiedoston joka kerta.Jos haluat luoda tiedoston, kuten tapahtumaloki, se on parempi asettaa arvoksi False ja varmista, että sinulla on uusi nimi joka kerta.
  • Käytä FileExists komento tiedostojärjestelmästä esineen varmista, että tiedosto on luotu onnistuneesti.
  • Jos haluat script Option Explicit päällä, poista kommentit koodi ennen jokaista \ "Koska \" julkilausuman.
  • Jos et varmista, että kansio hakemisto, johon haluat luoda tiedosto on jo olemassa, voit luoda virheitä.
854
0
3
Visual Basic Ohjelmointi