【VBS】コマンドラインからの起動での引数の取得
| abc.exe "a" "b" "d" |
取得
Set args = WScript.Arguments |
[VBS]正規表現を使う
Function blnCheck(strLen) Dim objRE Set objRE = new RegExp objRE.IgnoreCase = True objRE.pattern = "[^0-9]" blnCheck = objRE.Test(strLen) Set objRE = Nothing End Function |
※VBA の場合、Microsoft VBScript Regular Expressions への参照を追加する
RegExpオブジェクト
| ﾌﾟﾛﾊﾟﾃｨ | Pattern | 定義するために使用される文字列 |
| IgnoreCase | 大文字小文字を区別するかどうかを示す読み取り専用のブール値 | |
| Global | 正規表現を文字列内のすべての可能なマッチに対してテストすべきかどうかを示す読み取り専用のブール値 | |
| メソッド | Test (検索文字列) | 正規表現がその文字列に対してマッチした場合には True を、そうでない場合には False を返します。 |
| Replace (検索文字列, 置換文字列) | マッチしたものを置換文字列に置き換えて、新しい文字列を返します。マッチするものが見つからなかった場合は、元の検索文字列が返されます。 | |
| Execute (検索文字列) | 成功したマッチの Matche オブジェクトを含んでいる Matches コレクション オブジェクトを返す |
パターン
Clinick's Clinic on Scripting 参照
Matches コレクション オブジェクト/Match オブジェクト 使用例
Set objMatches = objRegExp.Execute() Set objMatche = objMatches.Item(0) Dim strA as String strA = objMathce.Value |
VBSで正規表現
VBS FileSystemObject
VBSからADOでAccessを開く
Option Explicit
Dim objADO
Set objADO = CreateObject("ADODB.Connection")
objADO.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=c:\home\aaa.mdb;"
objADO.Close
Set objADO = Nothing
参考URL
AccessのDBを開く
Dim objADO
Set objADO = CreateObject("ADODB.Connection")
objADO.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=c:\home\aaa.mdb;"
objADO.Close
Set objADO = Nothing
参考URL
AccessのDBを開く
