getipv4addr

自端末のIPv4アドレスを取得する。(バージョン4.78以降)

getipv4addr <string array> <intvar>

パラメータ

文字列配列 <string array>
IPアドレスを格納する文字型配列。
整数型変数 <intvar>
IPアドレスの個数を格納する整数型変数。IPアドレスが存在しない場合、0が格納される。

返り値

システム変数 <result>
IPアドレスの取得に成功した場合、1が格納される。
IPアドレスの個数が<string array>の要素数より大きい場合、0が格納される。
IPアドレスの取得に失敗した場合、-1が格納される。

ipaddr_size = 10
strdim ipaddr ipaddr_size

getipv4addr ipaddr num
if result = -1 then
    messagebox 'Error' 'IPv4 address'
elseif result = 0 then
    N = ipaddr_size - 1
    for i 0 N
        messagebox ipaddr[i] "IPv4 address"
    next
    N = num - ipaddr_size
    sprintf2 str "And %d address(es)." N
    messagebox str "IPv4 address"
else
    N = num - 1
    for i 0 N
        messagebox ipaddr[i] "IPv4 address"
    next
endif

参照