Запрет входящих подключений

[Charles]

Нужно програмно запрещать/разрешать входящие подключения к компьютеру через модем. Кто что знает?

[alibek]

За ref-линки обычно банят без разговоров. Убрал бы ты подпись.

[Charles]

гы. этот профиль старый - я сто лет тут не был - просто забыл убрать. спс. теперь плиз по существу темы чего нибудь

[alibek]

По существу -- кто занял модем, тот его и использует, остальные до него не доберуться. Т.е. тебе придется делать собственную звонилку.
В поиске где-то такое было, в разделе "Наши проекты" помоему.

[Charles]

нет модем в это время свободен - просто я хочу шоб он перестал трубку брать, а потом вкл и он снова берет трубку. звонилка мне не нужна - их в нете хоть отбавляй - а вот по теме блока тока примеры на дельфи

[alibek]

Ну тогда посылай ему AT-команды, конкретно, ATA.

[Charles]

поподробнее плиз... желательно примерчик...

[Charles]

нашел про команды:

Используя MSComm32.ocx.
MSComm1.CommPort = 1 'COM1
MSComm1.PortOpen = True ' Open port
MSComm1.Output = "ATDP39999" & Chr (13) 'Набор номера

модем у меня USB внешний - по свойствам висит на СОМ3 тут все ок
но какую команду надо ему отправить чтобы трубку не брал?
дайте ссылку на справочник команд...

[alibek]

http://www.google.ru/search?hl=ru&q=mod ... mmands&lr=

[Charles]

не умничайте... на гугль каждый послать может...
я и так знаю что при S0=0 трубка не берется - как это сообщить модему? просто MSComm1.Output="S0=0"?

[alibek]

ATS0=0

[grindars]

MSComm1.Output="ATS0=0" & vbCrLf

[Charles]

А вот вигвам! не работает модем по прежнему берет трубку

MSComm1.CommPort = 3 'COM1
MSComm1.PortOpen = True ' Open port
MSComm1.Output = "ATS0=0" & vbCrLf

[Charles]

шо опять все заглохло? все такие же глупые как и я?

[Sebas]

/Может прибить того кто берёт трубку?