Set obj=createobject("dialing.ringx")
...
obj.Dial
...
set obj=nothing
Set obj=createobject("dialing.ringx")
...
obj.Dial
...
'Error 668...
se
t obj=nothing | Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате |
| Форум программистов > Delphi: WinAPI и системное программирование > API RasDial возвращает 668 |
| Автор: Гость_ivs4 18.1.2005, 15:32 |
| Господа, окажите помощь. Сделан ActiveX для дозвона. Вызываю дозвон из Win Script в цикле. По Windows 98 все хорошо - все циклы проходят, а под Win2000/xp при повторном дозвоне всегда ошибка 668. Если же просто запускать скрипт с одной (без цикла) операцией дозвона, то процесс идет столько раз сколько раз запустишь скрипт. Вопрос - как в Delphi это обойти? |
| Автор: Петрович 18.1.2005, 16:34 |
| Ошибка в 17-й строке |
| Автор: Snowy 18.1.2005, 16:34 |
| Создать ActivX динамически, потом убить, потом снова создать, потом снова убить, ... потом ... и так пока не надоест. |
| Автор: ivs4 24.1.2005, 15:14 |
| Не помогло. Set obj=createobject("dialing.ringx") ... obj.Dial ... set obj=nothing Set obj=createobject("dialing.ringx") ... obj.Dial ... 'Error 668... se t obj=nothing |