Конференция VBStreets

**Александр80** » 23.01.2006 (Пн) 14:08

Подскажите где можно найти описание следующей ошибки:
run-time error -2147221164

:oops:

Возможно я плохо искал, но я ничего про эту ошибку не нашел.... :cry:

**GSerg** » 23.01.2006 (Пн) 14:14

IClassFactory::CreateInstance method returns error 0x80040154 (REGDB_E_CLASSNOTREG).

**Amed** » 23.01.2006 (Пн) 14:23

FormatMessage возвращает "Класс не зарегистрирован", проще говоря.

**Александр80** » 23.01.2006 (Пн) 14:41

Это я понял, но что за класс ? Как это узнать? :roll:

**Amed** » 23.01.2006 (Пн) 14:43

Показывай код, где ошибка просходит.

**Александр80** » 23.01.2006 (Пн) 14:49

По этому событию вылетает ошибка :roll:

Код: Выделить всё: Private Sub RichTextBox1_MouseUp(Button As Integer, Shift As Integer, x As Single, y As Single) Dim recEnd As Object Set PeedyAG = Agent1.Characters("PeedyAG") If a.StringValue("agent", "Showw") = 1 Then PeedyAG.StopAll PeedyAG.LanguageID = &H419 a.File = App.Path & "\seting.ini" s = "\Spd=" & a.StringValue("agent", "Speed") & "\" p = "\Pit=" & a.StringValue("agent", "Pite") & "\" If a.StringValue("agent", "speek") = 1 Then PeedyAG.TTSModeID = "{06377F81-D48E-11D1-B17B-0020AFED142E}" If a.StringValue("agent", "speek") = 2 Then PeedyAG.TTSModeID = "{06377F80-D48E-11D1-B17B-0020AFED142E}" PeedyAG.Show PeedyAG.Play "writing" End If End If End Sub

эта ошибка вылетает не на всех компах где стоит программа, на некоторых все работет прекрасно... :roll:

**Amed** » 23.01.2006 (Пн) 14:57

На какой строчке?

У меня Agent отключен, ни одного персонажа нет...

**Александр80** » 23.01.2006 (Пн) 15:18

А вот тут и проблема, что ни на какой строчке в проекте ошибки нет, но когда делаю EXE файл и при запуске кликаю мышкой на RichTextBox1 (на RichTextBox1 кроме события MouseUp и Change ничего нет. Change работает только с меню, скрывает и отображает пункты меню...) вылетает run-time error -2147221164 и ниже что-то типа не зарегистрированный класс... :roll:

А от чего и что, не понятно... :oops:

**Amed** » 23.01.2006 (Пн) 15:47

Отладчика нет под рукой?
Попробуй перед каждой строчкой показывать msgbox, чтобы отловить место.

**Александр80** » 23.01.2006 (Пн) 15:52

Amed писал(а):Отладчика нет под рукой?
Попробуй перед каждой строчкой показывать msgbox, чтобы отловить место.

Понял... Буду пробовать, сейчас на работе здесь ничего нет...((( Домой приду и ... Спасибо!!! :wink:

**Amed** » 23.01.2006 (Пн) 15:54

Amed писал(а):Попробуй перед каждой строчкой показывать msgbox, чтобы отловить место.

Прямо сейчас можешь отловить место

**Александр80** » 23.01.2006 (Пн) 16:19

Amed писал(а):
Amed писал(а):Попробуй перед каждой строчкой показывать msgbox, чтобы отловить место.

Прямо сейчас можешь отловить место

Сейчас работы полно...((( Потом, все потом.... :lol:

Я думал может по коду ошибки понять можно, поэтмоу и написал... :lol:

**Александр80** » 24.01.2006 (Вт) 0:54

Проблема решена… Все дело в агенте вернее в SAPI в WinXP стоит версия 5.1 и для нормальной работы нужно установить 4.0. Вот из-за этого и была ошибка…
:wink:

Всем спасибо !!! :wink:

Конференция VBStreets

run-time error -2147221164

run-time error -2147221164

Кто сейчас на конференции