Vb и Tcp/ip

[_+LORD+_]

Как на Basic'e работать и Tcp\ip ?? Если кто знает, то пишите!! Если есть примеры то кидайте на почту или просто напишите адрес! ПОЖАЙУСТА!! За ранее спасибо!! Кстати как сделать дествие, которое октивируется во время закрытия программы!

[moderator]

Как на Basic'e работать и Tcp\ip ?? Если кто знает, то пишите!! Если есть примеры то кидайте на почту или просто напишите адрес! ПОЖАЙУСТА!! За ранее спасибо!! Кстати как сделать дествие, которое октивируется во время закрытия программы!

Что значит "работать с tcp/ip"? tcp/ip - это всего лишь сетевой протокол.

По поводу закрытия программы. Используй события Form_QueryUnload, Form_Terminate и Form_Unload.

[goro]

Если нужно с сестью работать, то можешь и на http://vbip.com зайти.

[mark+]

Насчет TCP/IP посмотри контрол Winsock. Пока у меня в разработке одна программа по этому протоколу. Если тестинг удачно пройдет, я тебе пришлю исходник.

[_+LORD+_]

Я это уже пробовал, ноне получилось :

Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
DeleteFile "\\Lord\Menyalka\" & Num & ".srv"
End Sub

Private Sub Form_Terminate()
DeleteFile "\\Lord\Menyalka\" & Num & ".srv"
End Sub

Private Sub Form_Unload(Cancel As Integer)
DeleteFile "\\Lord\Menyalka\" & Num & ".srv"
End Sub

А когда DeleteFile "\\Lord\Menyalka\" & Num & ".srv" на кнопку ставля , то всё работает

[_+LORD+_]

Пока Я Exe Не создал, он не удалял!

[mark+]

Что еще за DeleteFile, вроде всегда Kill был...
Насчет EXE, прав твой VB. Нужно указывать полный путь к удаляемому файлу, иначе он будет искать в рабочей директории.
Попробуй создать в модуле

Public Sub KillFile()
Kill App.path & num & ".srv"
End Sub

Затем в нужном месте QueryUnload сделать
Call module.KillFile

Вроде все