このページで使用している開発言語について。
| VisualBasicScript | IE5以降やWindows98以降にこっそり付属。拡張子はVBS。Windows以外の環境では動かないと思われ。 | フリー |
| VisualBasic4.0 | 市販の開発言語。現在VBは4→5→6→.NETと進化しているので3世代前のバージョンになるか。実行ファイル化可能。学割で10000円ぐらいで買った記憶が。 | 市販 |
| 99BASIC | フリーの開発言語。1980年代的な言語仕様が特徴。拡張子はb99。 | フリー |
| QXマクロ | araken氏作のシェアウェア『QXエディタ』用のマクロ。 | シェア |
| 例 | Set FSO=WScript.CreateObject("Scripting.FileSystemObject") |
| VB4 | VBS |
| FineNum=FreeFile | Const ForReading=1,ForWriting=2,ForAppending=8
Set FSO=WScript.CreateObject("Scripting.FileSystemObject") |
| Open filename For Output As #FileNum | Set TFS=FSO.OpenTextFile(filename,ForReafing) |
| Print#FileNum,textdata | TFS.WriteLine textdata |
| Close#FileNum | TFS.Close |
※Print#FileNum,textdata;に相当するのはTFS.Write textdataかな？
| VB4 | VBS |
| FineNum=FreeFile | Const ForReading=1,ForWriting=2,ForAppending=8
Set FSO=WScript.CreateObject("Scripting.FileSystemObject") |
| Open filename For Output As #FileNum | Set TFS=FSO.OpenTextFile(filename,ForWriteing) |
| Do Until Eof(FileNum) | Do Until TFS.AtEndOfStream |
| Line Input#FileNum,textdata | textdata=TFS.ReadLine |
| Loop | Loop |
| Close#FileNum | TFS.Close |
※TFS.ReadAllのほうが楽。
| 例 | 出力 |
| FSO.DriveExists("B:") | （一般的な環境では）False |
| FSO.FolderExists("C:\Windows") | （一般的な環境では）True |
| FSO.FileExists("C:\Autoexec.bat") | （一般的な環境では）True |
| 例 | 出力 |
| FSO.GetDriveName("C:\Windows\Notepad.exe") | C: |
| FSO.GetGetAbsolutePathName("C:\Windows\Notepad.exe") | C:\Windows\Notepad.exe |
| FSO.GetParentFolderName("C:\Windows\Notepad.exe") | C:\Windows |
| FSO.GetFileName("C:\Windows\Notepad.exe") | Notepad.exe |
| FSO.GetBaseName("C:\Windows\Notepad.exe") | Notepad |
| FSO.GetExtensionName("C:\Windows\Notepad.exe") | exe |
| 例 | 出力 |
| FSO.BuildPath("C:\Windows","Notepad.exe") | C:\Windows\Notepad.exe |
| FSO.GetTempName() | （例）radC63CF.tmp |
| FSO.CreateFolder"" | 返り値はFolderオブジェクト。 |
| FSO.CreateTextFile"" | 返り値はTextStreamオブジェクト。 |
| FSO.DeleteFile"" | |
| FSO.DeleteFolder"" |
| FSO.CopyFile"","" | |
| FSO.CopyFolder"","" | |
| FSO.MoveFile"","" | |
| FSO.MoveFolder"","" |
| GetDrive | Driveオブジェクト |
| GetFolder | Folderオブジェクト |
| GetFile | ファイルオブジェクト |
| GetSpecialFolder | 特殊フォルダ用のGetFolder |
| OpenTextFile | TextStreamオブジェクト |
| オブジェクト | Drive、Folder、File |
| コレクション | Drives、Folders、Files |
| Drive | Folder | File | ||
| DriveLetter | ○ | × | × | アルファベット1文字のアレ |
| DriveType | ○ | × | × | 0=不明、1=Removable、2=HDD、3=Network、4=CD、5=RAM |
| FileSystem | ○ | × | × | FAT、FAT32、NTFS、CDFS。文字列で返す。 |
| IsReady | ○ | × | × | |
| VolumeName | ○ | × | × | |
| SerialNumber | ○ | × | × | |
| ShareName | ○ | × | × | ネットワークでの共有名 |
| TotalSize | ○ | × | × | 総容量。単位はバイト。 |
| FreeSpace | ○ | × | × | 空き容量。単位はバイト。 |
| RootFolder | ○ | × | × | 戻り値はルートフォルダのFolderオブジェクト。 |
| Drive | Folder | File | ||
| Path | × | ○ | ○ | |
| Name | × | ○ | ○ | |
| ShortPath | × | ○ | ○ | |
| ShortName | × | ○ | ○ | |
| ParentFolder | × | ○ | ○ | |
| Drive | × | ○ | ○ | |
| DateCreated | × | ○ | ○ | 作成日 |
| DateLaseModified | × | ○ | ○ | 更新日 |
| DateLasAccessed | × | ○ | ○ | アクセス日 |
| Size | × | ○ | ○ | バイト数 |
| Type | × | ○ | ○ | ファイルタイプ名 |
| Attributes | × | ○ | ○ | |
| IsRootFolder | × | ○ | × | ルートフォルダならTrue |
| SubFolders | × | ○ | × | 戻り値はFolderコレクション |
| Files | × | ○ | × | 戻り値はFilesコレクション |
| Drive | Folder | File | ||
| Copy | × | ○ | ○ | |
| Move | × | ○ | ○ | |
| Delete | × | ○ | ○ | |
| OpenAsTextStream | × | × | ○ | 返り値はTextStreamオブジェクト |
| Drives | Folders | Files | ||
| Count | ○ | ○ | ○ | オブジェクト数。 |
| Item | ○ | ○ | ○ | 個々のオブジェクト。引数にはフォルダ名やファイル名も指定できる。 |
| 1 | 読取専用 |
| 2 | 隠しファイル |
| 4 | システム |
| 16 | フォルダ |
| 32 | アーカイブ |
※DOSの頃のまま。
| WScript.Sleep 1000 | 1/1000秒単位。 |
| Eval | 式の実行。 |
| Execute | 命令の実行。 |
| QXマクロ | |
| 99BASIC | |
| VBS | |
| VB4 | VisualBasic4の自作関数。VB4使わない人には意味なし。 |
| Wizardryもどき（実装） | |
| Wizardryもどき（仕様構築） | |
| Wizardryもどき（制作研究） | |