Obtaining the published or local IP address
| 日付 | 2003/05/30 |
|---|---|
| ID | 27782 (英語原文参照) |
| バージョン | 6.8.1 and 2003 |
| プラットフォーム | Mac & Win |
タイトル
U.S）Obtaining the published or local IP address
JP）公開IPまたはローカルIPアドレスの取得
以下は、Webサーバが使用しているIPアドレスまたは、公開するためにWebサーバが使用することができるローカルIPアドレスを返すメソッドです。
C_TEXT($0)
C_LONGINT($addr;$a;$b;$c;$d)
$addr:=Get database parameter(IP Address to listen )
$a:=($addr >> 24) & 0x00FF
$b:=($addr >> 16) & 0x00FF
$c:=($addr >> 8) & 0x00FF
$d:=$addr & 0x00FF
If (($a=0) & ($b=0) & ($c=0) & ($d=0))
C_TEXT($ip_address;$subnet)
C_LONGINT($Error)
$Error:=IT_MyTCPAddr ($ip_address;$subnet)
$0:=$ip_address
Else
$0:=String($a)+"."+String($b)+"."+String($c)+"."+String($d)
End if
注意：このメソッドは、1つのIPアドレスのみを返します。公開IPアドレスがデータベースプロパティ（2003では環境設定）で「すべて」に設定していた場合、メソッドは結果としてマシンの主要なIPアドレスを返します。セカンダリIPアドレスを返すには、公開IPアドレスとしてデータベースプロパティ（2003では環境設定）で設定したときのみになります。