![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Програмный набор номера модемом [D7, WinXP]
Jungle Forever! © (2005-05-17 09:41:00)Мне нужно сделать програмный набор номера модемом. сделал так:
procedure Dial(Phone : String);
var
PhoneNumber, CommPort: string;
NumberWritten: cardinal;
begin
CommPort := 'COM3';
PhoneNumber := 'ATDP ' + Phone + #13 + #10;
NumberWritten := 0;
hCommFile := CreateFile(PChar(CommPort), GENERIC_WRITE, 0, nil,
OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, 0);
Sleep(200);
WriteFile(hCommFile, PChar(PhoneNumber)^, Length(PhoneNumber),
NumberWritten, nil);
end;
Модем номер набирает, но когда с другой стороны берут трубку, то поверх разговора идут длинные гудки. (Если набрать номер обычным телефоном, который воткнут в модем, то всё ок).
В чем может быть дело? Модем внутренний.
Jungle Forever! (2005-05-17 13:50:00) [21]еще смешней заранее в своем вопросе не предупреждать о том что модем требуется именно ф-ции voice-модема
Вот например walпонял мой вопрос и помог решить мне проблему. Если у тебя есть какие-то идеи, или просто информация по теме, то напиши - буду благодарен за помощь. А в комментариях, типа "А почему не десяток?"я не нуждаюсь.
Digitman (2005-05-17 13:25:00) [22]
> смешная шутка
еще смешней заранее в своем вопросе не предупреждать о том что модем требуется именно ф-ции voice-модема
Jungle Forever! (2005-05-17 13:16:00) [23]смешная шутка.
потому что AT#CLS=8 на моем модеме не работает
Digitman (2005-05-17 13:09:00) [24]
> придется покупать еще один модем
а почему не десяток ?
Jungle Forever! (2005-05-17 10:40:00) [25]ясно. спасибо большое. придется покупать еще один модем :)
wal (2005-05-17 10:34:00) [26]Он тебе через некоторое (весьма непродолжительное) время еще и трубку повесит.
Модем в режиме данных. Пытается "снюхаться" с другим модемом. Нужно перевести в голосовой режим. Только для vioce-модемов.
С уважением.