VPF::Автоматический набор телефонного номера

Vok

Дата 27.6.2006, 17:23 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 3
Регистрация: 27.6.2006

Репутация: нет
Всего: нет

Народ, мб кто знает как можно автоматически набрать номер из программы. Есть ведь программы, которые открывают соедиение и умеют набирать номер(ну например тот же стандартный HyperTerminal да и куча других подобных прог), значит дожен быть какой-нить интерфейс или что-нить такое . Если кто-нить знает как это сделать можно, подскажите пожалуйста.

ElGuapo

Дата 1.7.2006, 12:42 (ссылка)

(нет голосов)

Загрузка ...

Добрый

Профиль
Группа: Участник
Сообщений: 101
Регистрация: 1.7.2006

Репутация: 1
Всего: 3

Не понял вопроса: откуда набирать? С HTML-страницы у клиента или с веб-сервера?

DemoCode

Дата 1.7.2006, 12:52 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 890
Регистрация: 20.10.2005
Где: Россия

Репутация: нет
Всего: 41

Цитата(Vok @ 27.6.2006, 18:23

)

Народ, мб кто знает как можно автоматически набрать номер из программы.

Откуда тебе надо набрать номер?
Если из программы, то на каком языке её пишешь?

Вот пример на Delphi:

Код


 hCommFile: THandle;

procedure TForm1.Button1Click(Sender: TObject);
var
  PhoneNumber: string;
  CommPort: string;
  NumberWritten: LongInt;
begin
  PhoneNumber := 'ATDT 1-555-555-1212' + #13 + #10;
  CommPort := 'COM2';
  {Open the comm port}
  hCommFile := CreateFile(PChar(CommPort),
    GENERIC_WRITE,
    0,
    nil,
    OPEN_EXISTING,
    FILE_ATTRIBUTE_NORMAL,
    0);
  if hCommFile = INVALID_HANDLE_VALUE then
  begin
    ShowMessage('Unable to open ' + CommPort);
    exit;
  end;

  {Dial the phone}
  NumberWritten := 0;
  if WriteFile(hCommFile,
    PChar(PhoneNumber)^,
    Length(PhoneNumber),
    NumberWritten,
    nil) = false then
  begin
    ShowMessage('Unable to write to ' + CommPort);
  end;
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
  {Close the port}
  CloseHandle(hCommFile);
end;

--------------------

Жить стало лучше, жить стало веселей
© И.В. Сталин

Vok

Дата 1.7.2006, 18:43 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 3
Регистрация: 27.6.2006

Репутация: нет
Всего: нет

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

Это сообщение отредактировал(а) Vok - 1.7.2006, 18:55

Vok

Дата 1.7.2006, 19:06 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 3
Регистрация: 27.6.2006

Репутация: нет
Всего: нет

Кстати, нашел такую команду:
  rasdial элемент [пользователь [пароль|*]] [/DOMAIN:домен]
          [/PHONE:номерТелефона] [/CALLBACK:ответныйНомер]
          [/PHONEBOOK:файлАдреснойКниги] [/PREFIXSUFFIX]

  rasdial [элемент] /DISCONNECT
Не знаете, как с ней работать и вообще, то это или не то. Вроде как она выполняет автоматический набор номера, но точно не знаю, никогда с ней не работал. И потом, мб есть все-таки COM-компонент какой-нить smile

, а то в программе удобнее с ним работать.

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Продвижение и оптимизация сайтов \| Следующая тема »