If IP: 10.198.0.5 is between 10.197.0.1 and 10.197.0.254 Server= Server1
If IP: 10.198.0.5 is between 10.198.0.1 and 10.198.0.254 Server= Server2

In advance, thanks.

Welcome to the board!

Look into the Macro - @IPADDRESS0...

Works pretty slick..

Thanks!

- Kent

Initial=10.197.0.1
Final=10.197.0.254

If (@IPADDRESS0 >=Initial)and(@IPADDRESS0 <=Final) then server=server 1

I looked the manual, but he hasn´t an example.
One more time, thanks.

code:

---

  ; Builds the IP address in a usable format.
$IP1 = ltrim(SubStr(@IPADDRESS0, 1, 3))
$IP2 = LTRIM(SUBSTR(@IPADDRESS0, 5, 3))
$IP3 = LTRIM(SUBSTR(@IPADDRESS0, 9, 3))
$IP4 = LTRIM(SUBSTR(@IPADDRESS0, 13, 3))
; The trimmed IP address is rebuild of the four octets, again seperated by dots...
$MyIP=$IP1 + "." + $IP2 + "." + $IP3 + "." + $IP4

---

code:

---

$SMSIPSeg = "164.156.951"
select
   CASE $CurrentIPSeg = "164.157. 17"
	$AVSWServer = "\\server\AVSW\Win95" 
endselect
 

---

code:

---

SELECT
  CASE ((@IPADDRESS0) >= "10.197.0.1") AND ((@IPADDRESS0) <= "10.197.0.254")   $Server=Server1
  CASE ((@IPADDRESS0) >= "10.198.0.1") AND ((@IPADDRESS0) <= "10.198.0.254")   $Server=Server2
  CASE ((@IPADDRESS0) >= "10.199.0.1") AND ((@IPADDRESS0) <= "10.199.0.254")   $Server=Server3
ENDSELECT

---

Bill

[ 11 December 2001: Message edited by: bleonard ]

An important issue is the format of macro @ipaddress0.
First we strip the first parts and verify it.

code:

---

$ip=@ipaddress0 ; format: 'xxx.xxx.xxx.xxx' f.e. ' 10.198.  0. 55'
SELECT
CASE (Substr("$ip",1,12) = " 10.197.  0.")
  ? "in range '10.197.0' server1"
CASE (Substr("$ip",1,12) = " 10.198.  0.")
  ? "in range '10.198.0' server2"
CASE 1
  ? "unknown IP "+$ip
ENDSELECT

---