nKB

nKB

シンプルにいこうよ

VBScript

・主プログラムは途中で処理を抜けれるようにする為、テキトーなSubプロシージャを作り、その中に記載する。

main

Sub main()  
  Exit Sub
End Sub  

変数の宣言を強制させる

Option Explicit

省略

WScript.CreateObject(XXX)
↓ CreateObject(XXX)

WScriptは省略しても動く。なんでも省略できるんだっけかなぁ

Openでファイルを開く(テキスト、CSVの読み込み)
https://www.sejuku.net/blog/34458

Hey, Scripting Guy!:Microsoft TechNetに掲載されているコラム

改行コード

vbCrLf
vbCr
vbLf

サンプル

テキストファイルを読み込む

'Read a text file

'iomode
Const ForReading = 1, ForWriting = 2, ForAppending = 8

txtFile = "txtfile.txt"

Set fso = WScript.CreateObject("Scripting.FileSystemObject")
Set f = fso.OpenTextFile(txtFile, ForReading)

Do Until f.AtEndOfStream
  line = f.ReadLine
  msgbox line
Loop

f.Close

テキストファイルに書き込む

'Write to a text file

'iomode
Const ForReading = 1, ForWriting = 2, ForAppending = 8

txtFile = "txtfile.txt"

Set fso = WScript.CreateObject("Scripting.FileSystemObject")
Set f = fso.OpenTextFile(txtFile, ForWriting, True)

f.WriteLine "test"
f.Close


リンク集

VBScript関数リファレンス