Здравствуйте, что-то на строке
Dim MSComm1 As MSComm
Set MSComm1 = New MSComm 'стал получать ошибку ошибка 429 ACtiveX component can't create object
В то же время библиотека Microsoft Comm Control 6.0 подключена, как лечить??
Раньше вроде было гладко
пробовал разрегистрировать ActiveX, а потом снова зарегистрировать
Спасибо
Добавлено через 4 дня, 22 часа, 46 минут и 38 секунд:похоже конец света, Ворд переставил не помогло, Винду переустановил, не помогло, что ещё предпринять кроме смены компьютера???
Добавлено через 12 дней, 1 час и 42 секунды:чтобы проверить ActiveX жив или мёртв, то есть чтобы можно выяснить сам факт работоспособности механизма регистрации ActiveX на компьютере, где не удается зарегистрировать определённый ActiveX пробую
Declare Function RegMSCOMM32OCX Lib "MSCOMM32.OCX" Alias OCXRegisterServer() As Long
Sub тест()
Const ERROR_SUCCESS = 0&
Dim retCode As Long
On Error Resume Next ' включаем программную обработку ошибок
ChDrive "C:" ' Устанавливаем нужный
ChDir "C:\WINDOWS\system32" ' каталог текущим
regCode = RegMSCOMM32.OCX() ' регистрация MSCOMM32.OCX
' анализ возможных ошибок
If Err <> 0 Then
MsgBox "Файл MSCOMM32.OCX не найден"
Else
If regCode <> ERROR_SUCCES Then
MsgBox "Операция регистрации не выполнена"
End If
End If
End Sub
Но пока выделяет на первой строке часть строки - "OCXRegisterServer"
мне на ум приходит, только то, что в скобках () должны быть всевозможные ByVal, так??
Но я не знаю какие, подскажите пжл как правильно
