не знаю почему, но эта команда по идее должна писать правильный ip при подключении, но она пишет 127.0.0.1
If ServComStream Then
u.users = New users
u\StreamCom=ServComStream
Print "User connected To ServCom. IP = "+ DottedIP(TCPStreamIP(u\StreamCom))
End If