iron dude - howard wasn't pointing you to the man pages - he was pointing you to a potential solution ... like he said, download the latest version of kixforms, register the component on your workstation, then run this script using the lastest version of kixtart. won't find any of this stuff in the man pages im afraid. and this script (UDF) is hot off the press ...

I call it "WhazabyIP"

It pops up a dialog box, complete with IP form fields, and asks the user "Whazaby the IP?"

code:
Break On
 
$ip = WhuzabyIP()
 
?"ip=" $ip
 
Exit 1
 
Function WhuzabyIP()
 
 Dim $Form,$Txt1,$Txt2,$Txt3,$Txt4
 Dim $Exit
 
 $Form = CreateObject("Kixtart.Form")
 $Form.Caption = "WhuzabyIP ?"
 $Form.BackColor = SkyBlue
 
 $Form.ScaleHeight = 150
 $Form.ScaleWidth = 270
 $Form.FontSize = 12
 
 $Txt1 = $Form.TextBox("",10,50,50,30)
 $Txt1.MaxLength = 3
 $Txt1.AutoTab = 1
 $Txt1.Text = Split(@IPADDRESS0,".")[0]
 
 $Txt2 = $Form.TextBox("",75,50,50,30)
 $Txt2.MaxLength = 3
 $Txt2.AutoTab = 1
 $Txt2.Text = Split(@IPADDRESS0,".")[1]
 
 $Txt3 = $Form.TextBox("",140,50,50,30)
 $Txt3.MaxLength = 3
 $Txt3.AutoTab = 1
 $Txt3.Text = Split(@IPADDRESS0,".")[2]
 
 $Txt4 = $Form.TextBox("",205,50,50,30)
 $Txt4.MaxLength = 3
 $Txt4.AutoTab = 1
 $Txt4.Text = Split(@IPADDRESS0,".")[3]
 
 $Exit = $Form.CommandButton("OK")
 $Exit.Center
 $Exit.Top = $Txt1.Bottom + 15
 $Exit.OnClick = "$$Form.Tag = 1"
 $Exit.TabStop = 0
 
 $Form.FontSize = 16
 $Form.PrintXY(10,10,"Whaza IP be ?")
 
 $Txt1.SetFocus
 $Form.Center
 $Form.Show
 $Form.Tag = 0
 
 While $Form.Visible And $Form.Tag = 0
  $=Execute($Form.DoEvents)
 Loop
 
 If $Form.Tag = 1 ; OK
  $WhuzabyIP = $Txt1.Text+"."+$Txt2.Text+"."+$Txt3.Text+"."+$Txt4.Text
 Else
  $WhuzabyIP = ""
 EndIf
 
EndFunction


[ 08. October 2002, 05:46: Message edited by: Shawn ]