VPF::Class not registered - Форум программистов

ArtNeoX

Дата 19.1.2006, 20:53 (ссылка)

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

Загрузка ...

Шустрый

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

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

Сделал программу. На другом компьютере ошибка

Class not registered
Looking for object with CLSID :{всякие цифры и буквы}

хотя у меня все нормально запускается.

boevik

Дата 19.1.2006, 23:02 (ссылка)

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

Загрузка ...

Эксперт

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

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

Прорегестрируй ActiveX используемый в программе (кстати его тоже надо перенести на другой компютер).
В командной строке:

Код


regsvr32 path_to_ActiveX

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

Никогда не говори никогда

ArtNeoX

Дата 20.1.2006, 08:18 (ссылка)

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

Загрузка ...

Шустрый

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

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

куда эту строчку писать?

boevik

Дата 20.1.2006, 09:05 (ссылка)

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

Загрузка ...

Эксперт

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

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

ArtNeoX, почитай подробнее о переносе и установке програм VB на других компах.

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

Никогда не говори никогда

BorisVorontsov

Дата 21.1.2006, 15:09 (ссылка)

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

Загрузка ...

Thinker

Профиль
Группа: Комодератор
Сообщений: 714
Регистрация: 3.11.2005
Где: Молдавия, г. Киши нёв

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

Код


Public Function RegisterLib(ByVal strFileName As String) As Boolean
    On Error Resume Next
    Dim hLib As Long, hProc As Long
    RegisterLib = False
    hLib = LoadLibrary(strFileName)
    If hLib = 0 Then Exit Function
    hProc = GetProcAddress(hLib, "DllRegisterServer")
    If hProc = 0 Then GoTo StopRegister:
    If CallWindowProc(hProc, frmMain.hwnd, ByVal 0&, ByVal 0&, ByVal 0&) _
        <> ERROR_SUCCESS Then GoTo StopRegister:
    RegisterLib = True
StopRegister:
    Call FreeLibrary(hLib)
End Function

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

[code=cpp]
const char *out = "|*0>78-,+<|"; size_t cc = char_traits<char>::length(out);
for (size_t i=0;i<cc;i++){cout<<static_cast<char>((out[i]^89));}cout<<endl;
[/code]

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