Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > VB6 > Modem -> Ответный вызов

Автор: Demonit 3.5.2004, 15:48

Программеры! Помогите...
как сделать, чтобы например нажимаеш кнопку ждать звонка и если звонят то модем сразу отзывается на этот звонок Ну корочее как в Hyper Terminal ili podobiye takih programm!

Автор: VladislavD 9.5.2004, 18:43

У меня тоже такая проблема.
Тот код который я написал не работает, хотя вроде там все верно.

Код


dim cansel as boolean, frommodem as string
private sub command1_click()
cansel=false
do
if not cansel then
doevents
frommodem=mscomm1.input
if instr(frommodem,"Ring") then mscomm1.output="ata"+vbcr
exit do
end if
loop
end sub
private sub command2_click()
cansel=true
end sub

command1-ждать
command2-отмена ожидания
необходимо разместить на форме MSComm