Проблема удаленного доступа

Привет, Народ! В общем, вопрос следующий: написал простенький чат на асме... в локалке работает, но через инет - ни в какую! Сначала думал, что из-за того, что подключаюсь через дилап, но квип-то как-то тянет o_O..
Может быть кто-нибудь сталкивался с чем-то подобным? Напишите, плз..

 

FaNt0m
он у тебя в локалке по широковещательному UDP на подсеть работает?
и вообще где код?

 

Код (Text):

1. .elseif uMsg == WM_INITDIALOG
2.         invoke MessageBeep,MB_ICONASTERISK
3.         ; Инициализация сокетных функций
4.         invoke WSAStartup,101h,addr wsadata
5.         invoke socket,AF_INET,SOCK_STREAM,0
6.         mov sock,eax
7.         ; реакция на соединение, получение данных и закрытие сокета
8.         invoke WSAAsyncSelect,sock,hWin,WM_SOCKET,FD_ACCEPT+FD_READ+FD_CLOSE+FD_WRITE
9.         mov sin.sin_family,AF_INET
10.         ;порт = 10001
11.         mov Port,10001
12.         invoke htons,Port
13.         mov sin.sin_port,ax
14.         ; Адрес - любой для сервера
15.         mov sin.sin_addr,INADDR_ANY
16.         ; Связь адресов и порта с сервером
17.         invoke bind, sock,addr sin,sizeof sin
18.         invoke listen,sock,SOMAXCONN
19.     .elseif uMsg == WM_SOCKET
20.        
21.         mov eax,lParam
22.         ; Соединение
23.         .IF ax == FD_ACCEPT
24.         shr ax,16
25.         .IF ax == NULL
26.         ; При  соединении инициализируем сокет и отправляем клиенту строку
27.         invoke MessageBeep,MB_ICONHAND
28.         invoke accept,sock,0,0
29.         mov client,eax
30.         invoke send,client,addr Hello2,sizeof Hello2,0
31.         invoke SetDlgItemText,hWin,1009,addr NuVot
32.         invoke Sleep,10
33.         .ENDIF
34.        
35.         ; Реакция на получение данных от клиента
36.         .ELSEIF ax == FD_READ
37.         ; обнулим буфер для получения
38.         lea edi,BufStr
39.         mov ecx,1000
40.         xor eax,eax
41.         rep stosd
42.         mov eax,wParam
43.         mov client,eax
44.         ; Получим данные в BufStr
45.         invoke recv,client,addr BufStr,sizeof BufStr,0
46.         ; При ошибке - получим еще раз
47.         .IF eax == SOCKET_ERROR
48.         invoke recv,client,addr BufStr,sizeof BufStr,0
49.         .ENDIF
50.         ; отправим клиенту строку
51.         ;invoke send,client,addr Hello, sizeof Hello, 0
52.         invoke GetDlgItemText,hWin,1001,addr temp,512
53.         invoke lstrlen,addr temp
54.         lea ebx,temp
55.         add ebx,eax
56.         invoke lstrcat,ebx,addr BufStr
57.         invoke SetDlgItemText,hWin,1001,addr temp
58.         invoke Sleep,10
59.        
60.         ; Реакция на разрыв соединения
61.         .ELSEIF ax == FD_CLOSE
62.         mov eax,wParam
63.         ; Закроем сокет
64.         invoke closesocket, eax
65.         invoke MessageBox,0,addr CloseSock,0,MB_ICONINFORMATION

 

Подробности о локалке к сожалению сказать не могу

 

FaNt0m
Попробуй для начала пропинговать айпишник к которому коннектишься. Проблем по сути быть не должно с тср, если по локалке работает, то должно и через инет работать. Фаервол? Неправильно указанный айпи?

 

Возможно дело в том, что я через мобилу в инет выхожу? Хотя вряд-ли, наверное

 

Да

Не во все сети пускают...
Мы, например, с банком соединиться не можем. Даже не пингуется. А с обычного телефона - нормально.