vbsでIPアドレス取得＆第3まで

質問

vbs でIPアドレス取得したいのですが第3までの取得にしたいです。
ex 192.168.11. 　192.168.101.　　と場所によって2桁３桁に代わってしまうため何文字目と決め打ちできない状態にあります。
のようにIPアドレスの第3まで取得したいのです
不躾な質問で恐縮ですが、お分かりの方ご教授いただければ幸いです。

回答No.1

emsuja · ベストアンサー

vbs はもう長いこと使っていないので自信ないのですが
取得した IPアドレスを InStrRev 関数使って、IPアドレスの後ろから "." の位置を探すとか
https://www.kanaya440.com/contents/script/vbs/function/string/instr_rev.html

Split 関数で IPアドレスを "." で分解して配列に入れるとかしたらダメなのかな？
https://www.kanaya440.com/contents/script/vbs/function/string/split.html

お礼

ありがとございます。.位置を探してsplitでいけそうです。なんとかやてみます。

回答No.2

bardfish

１０進数の数値として扱っているから2桁３桁と変わるのは当たり前で１桁もありますよ？

それよりも、もっとわかりやすい目安があることにお気づきですか？
「.(ドット)」が区切り文字です。これは絶対です。

だったら･･･split()関数を使用して配列変数化して０から２番目の値を使用すればいいだけ。
面倒くさい方法をとるなら、For分を使用してIndexOf関数でドットのある位置を調べてMid()で抜き取り、ドットが見つからなくなるまで繰り返す。とか？だったらSplit()の方が１行で済むから態々面倒くさいことはしない。

個人的にはVBSそのものが面倒くさくなってしまったからExce;/Accessでプログラムはしたくないな(笑)
VisualBasicだと.NETの便利な関数や命令が沢山あるからVBSにはもう戻れないww

お礼

ありがとうございます。なんとなーくですが　. で区切る方法を模索してみます。　ありがとうございます。