С Новым годом! Форум программистов, компьютерный форум, киберфорум
Visual Basic
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
 
Рейтинг 4.87/15: Рейтинг темы: голосов - 15, средняя оценка - 4.87
0 / 0 / 0
Регистрация: 01.01.2008
Сообщений: 106

Как лечить run-time 430.... или запуск под 95??

21.02.2008, 12:03. Показов 3130. Ответов 22
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Люди! сложилась мрачная ситуация... существует приложение, использующее АДО. Было написано на ВБ6.0 под 98SE. Создал дистрибутив с помощью P&D Wizard. Приложению суждено оказалось работать под вин 95. В процессе установки дистрибутива он поставил на машину с 95 компоненты Data Access 2.0, потом поставилось само приложение.
Комп был перезагружен и потом при запуске этого приложения выдается ошибка 430 run-time Error и пишет что класс не поддерживает автоматизацию и ... жмешь ок, приложение запускается но оно не работает... че делать?? спасите люди!
Код главной формы при загрузке... по видимому ругня начинается здесь:
Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
Private Sub MDIForm_Load()
 
Me.ImageList1.ListImages. _
Add , 'view', LoadPicture(App.Path + 'imagescrdfle03.ico')
Me.ImageList1.ListImages. _
Add , 'add', LoadPicture(App.Path + 'imagespencil05.ico')
 
Me.Toolbar1.ImageList = Me.ImageList1
Me.Toolbar1.Buttons.Add , , , tbrSeparator
Me.Toolbar1.Buttons.Add 1, 'view', , tbrDefault, 'view'
Me.Toolbar1.Buttons.Add 2, 'add', , tbrDefault, 'add'
Me.Toolbar1.Buttons.Item(1).ToolTipText = 'Просмотр всех сотрудников'
Me.Toolbar1.Buttons.Item(2).ToolTipText = 'Ввод данных о сотруднике'
 
'Me.lists.Enabled = False
splash_screen.Show
DoEvents
Me.MousePointer = vbHourglass
Set cn_personal = New ADODB.Connection
Set cn_sprav = New ADODB.Connection
Set cn_address = New ADODB.Connection
Set rs_structb = New ADODB.Recordset
Set rs_fio = New ADODB.Recordset
Set rs_uchzav = New ADODB.Recordset
Set rs_nations = New ADODB.Recordset
Set rs_doljn = New ADODB.Recordset
Set rs_vidotp = New ADODB.Recordset
Set rs_turnoff = New ADODB.Recordset
 
cn_personal.ConnectionString = 'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=' + App.Path + 'datapersonal.mdb;Persist Security Info=False'
cn_sprav.ConnectionString = 'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=' + App.Path + 'datasprav.mdb;Persist Security Info=False'
cn_personal.Open
cn_sprav.Open
cn_address.ConnectionString = 'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=' + App.Path + 'dataaddress.mdb;Persist Security Info=False'
cn_address.Open
 
'opening the databases in ADO
rs_fio.Open 'fio', cn_personal, adOpenStatic, adLockOptimistic
rs_uchzav.Open 'uchzav', cn_sprav, adOpenStatic, adLockOptimistic
rs_structb.Open 'structb', cn_sprav, adOpenStatic, adLockOptimistic
rs_nations.Open 'nac', cn_sprav, adOpenStatic, adLockOptimistic
rs_vidotp.Open 'vidotp', cn_sprav, adOpenStatic, adLockOptimistic
rs_turnoff.Open 'turnoff', cn_sprav, adOpenStatic, adLockOptimistic
rs_doljn.Open 'doljn', cn_sprav, adOpenStatic, adLockOptimistic
Me.MousePointer = vbNormal
Unload splash_screen
Set splash_screen = Nothing
End Sub
Заранее всем благодарен.
0
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
21.02.2008, 12:03
Ответы с готовыми решениями:

Run-time error '430' при открытии приложения
Устанавливаю юзерам своё приложение. Приложение использует ADO 2.1. и MSFlexGrid. У трёх человек работает нормально, а у четвёртого...

Run-time error 430 ADODB & MySQL-select
ПОМОГИТЕ, ПЛИС!!!! Не пошла большая программа, начали тестировать просто соединение с БД. Программируется на XP, устанавливаем на...

Run-time error 1004. Запуск макроса excel в vba access
Добрый вечер! Прошу помочь разобраться в проблеме. Запускаю макрос test_union в базе данных (forum-bd11.accdb), который обращается к...

22
eddy
21.02.2008, 12:35
Перепиши в WindowsSystem oleaut32.dll и (или) olepro32.dll. При необходимости зарегистрируй их.

Возможно, что oleaut32.dll и (или) olepro32.dll не перезаписали при установке аналогичные файлы со старой датой.

Такая проблема у меня тоже была, и неоднократно - разрабатывал под Win98, ставил под Win95. Эту проблему обошел вышеупомянутым способом.
0 / 0 / 0
Регистрация: 01.01.2008
Сообщений: 106
21.02.2008, 12:59  [ТС]
Спасибо... обязательно попробую...
а не может ли это быть еще из-за использования Jet4.0
Может лучше юзать Jet3.51... или это тут не причем?

По предыдущему сообщению: если я правильно понимаю мне надо взять у себя из windowssystem файлы о которых ты говоришь и туда же их записать на машине клиента с вин 95.
А как узнать, нужно или не нужно регистрить?? просто я никогда не регистрил... как там это делается? msgsrv32 имя_файла.dll?? так?
0
eddy
21.02.2008, 13:03
В моем случае я их просто копировал. Без всякой регистрации.

Если вдруг будут конфликты - регистрируй regsvr32.exe <ваша.dll>
0 / 0 / 0
Регистрация: 01.01.2008
Сообщений: 106
21.02.2008, 15:09  [ТС]
я скопировал эти файлы о которых шла речь... но результата никакого.
при запуске говорит, что 430 run-time error.
В винде скопировать эти библиотеки не удавалось, мол говорил что файл занят и все такое, я скопировал их под эмуляцией ДОСа, перезапустился и такая ж фигня.
У тех библиотек на машине с 95 была другая дата, но они были такие же по размеру.
А как узнать что эти библиотеки надо регистрировать?
блин, руки опускаются :-(((
0
0 / 1 / 3
Регистрация: 27.03.2012
21.02.2008, 15:13
если ты используешь ADO, то, возможно, что надо MDAC поставить, это уже сто раз обсуждалось на форумах...
0
0 / 0 / 0
Регистрация: 01.01.2008
Сообщений: 106
21.02.2008, 15:34  [ТС]
в инсталляционном пакете, который получился в результате работы P&D Wizard, был засунут файл mdac_typ.exe примерно 8мб.
И при установке приложения сетап устанавливает компоненты Data Access 2.0
Че ему еще надо?
0
0 / 1 / 3
Регистрация: 27.03.2012
21.02.2008, 15:49
а ну, тогда все правильно, право, не знаю, в чем твоя ошибка...
0
eddy
21.02.2008, 16:03
Попробуй зарегистрировать. Это очень просто. В System уже должен лежать regsvr32.exe.

И еще один вариант. Твое приложение может использовать comctl*.ocx. По сути, они связаны с comctl32.dll. Попробуй и эту dll (она играет важную роль) установить поверх старой на компьютер клиента. И зарегистрировать.
eddy
21.02.2008, 16:29
Еще один вариант:

1. Сделать копию проекта. Закомментируй все, что относится к БД (ADO). Убрать ссылки на ADO. Перекомпилируй. Поставь клиенту. Если выскакивает та- же ошибка - исключи ADO из числа подозреваемых.
2. Теперь начинается самое тяжелое - последовательно уменьшаешь число применяемых компонентов, до тех пор, пока все не заработает. Ошибка (как правило) может быть связана с нестандартным компонентом, который обращается к функции какой-то dll, кторая реализована в Win98, но отсутствует в Win95.
Можешь поступит и наооборот - на пустую форму постепенно кладешь все новые и новые компоненты. Каждому свое.

3. Лично я думаю, что это comctl32.dll (версии!). Или какой-то компонент (если работает и отлажено под Win98, значит, ошибок нет)

4. И в конце концов ты докопаешься до причнн.
0 / 0 / 0
Регистрация: 01.01.2008
Сообщений: 106
21.02.2008, 17:07  [ТС]
сделал я регистрацию всех библиотек..толку нет...
все равно 430 ран тайм...

В начале я приводил код, который работает при загрузке приложения...
так вот сплэш скреен показывается. а потом идет ругань...
скорей всего дело в строках set ccc=new ADODB.connection
Я чувствую, что дело в АДО.
но чтож, переделывать все прирложение под ДАО?? но это не вариант.
Буду пытать дальше... спасибо за дельные советы.
0
ger
24.02.2008, 11:55
У меня был проект, сделанный под W98.
В нем был и DAO и ADO. Так вот - в 95-м работал только DAO,
в 98 - DAO, ADO начинал работать только после установки Data Acces 2.0 и mdac - ка.
А в W98SE - все работает сразу само...
Вот и думай...
Удачи!
0 / 0 / 0
Регистрация: 17.08.2007
Сообщений: 539
24.02.2008, 13:04
Муха с бляхой! :-)
Сходи к MUDAC'ам по www.microsoft.com/data
Там есть Component Checker, есть последние mdac'и. Потом сходи на www.sysinternals.com - там возьми анализаторов побольше. Посмотри к каким библиотекам твой проект обращается, какие версии у этих библиотеки и прочее. Если у библиотеки системный lock во время замены, то при промощи process explorera найди, какая гадина этот lock делает и отрежь ей руки по самые уши. Нужно еще help по 430 ошибке почитать в MSDN - может помочь.

Пиши о результатах,
Удачи!
0
0 / 0 / 0
Регистрация: 27.11.2007
Сообщений: 60
24.02.2008, 15:28
Тока что возникл подобный трабл. Разрабатывал проект в 98-й винде и юзаться должен был в 98-й... В проекте в основном пашет RDO, и только одна процедура задействует ADO. На ней-то и обламывался... Выдавал пресловутый 430-й Run Time Error... MDAC, VB-шный ,был версии 2.0, поставил 2.5 - всё на ура. :-)
0
eddy
24.02.2008, 15:38
Проще бкдет поставить клиенту Win98. Проблемы отпадут.
0 / 0 / 0
Регистрация: 01.01.2008
Сообщений: 106
24.02.2008, 15:57  [ТС]
так может закачать с сетки последний MDAC и поставить его на машину с 95 веником... и потом поставить свою прогу... может это вылечит??
0
eddy
24.02.2008, 17:24
Попробуй. Попытка не пытка.

В VB5 был предшественник ADO - технология RDO (Remote Data Objects). И работал под Win95. Так что совместимость в принципе должна остаться.

Новая версия MDAC может учитывать лишь особенности работы с Win98 и позднее (или просто 'заплатка'). Если врсия 2.00 не работает, то 2.5 и подавно.
0 / 0 / 0
Регистрация: 27.11.2007
Сообщений: 60
25.02.2008, 10:07
To Eddy-> Хе, а как же мой случай ? :-) 98-е винды, MDAC 2.0 и не пашет ! 98-е винды и MDAC 2.5 - всё отлично ! Как объясните подобное ? :-)
0
eddy
25.02.2008, 10:34
То: Филин

Поздравляю. Значит, я неправ.
eddy
25.02.2008, 10:36
То: Филин

А под Win95 работает? Я понял, что работает под Win98.
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
25.02.2008, 10:36
Помогаю со студенческими работами здесь

Compile-time и run-time методы и функции
Добрый день. Есть две функции, которые делают идентичную работу: template&lt;bool leftShift, typename T&gt; T byteShift(T data) { ...

Разница в координатах в run-time и design-time
Может кто-нибудь объяснить почему координаты любого объекта(например Tshape) отличаются во время run и design? Например если создать...

Разница в координатах в run-time и design-time
Может кто-нибудь объяснить почему координаты любого объекта(например Tshape) отличаются во время run и design? Например если создать...

Как очистить MSFlexGrid в run-time?
Скажите, как очистить MSFlexGrid в run-time. Пишу: Private Sub сmd_Click() MSFlexGrid.Cleaner Очищаются записи только до закрытия...

Запуск приложения с параметрами методом Exec или Run.
День добрый. Возникла проблема. Надо скриптом запускать некое приложение (на сервере естессно), но не могу это осуществить, т.к. у...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
20
Ответ Создать тему
Новые блоги и статьи
Модель микоризы: классовый агентный подход 3
anaschu 06.01.2026
aa0a7f55b50dd51c5ec569d2d10c54f6/ O1rJuneU_ls https:/ / vkvideo. ru/ video-115721503_456239114
Owen Logic: О недопустимости использования связки «аналоговый ПИД» + RegKZR
ФедосеевПавел 06.01.2026
Owen Logic: О недопустимости использования связки «аналоговый ПИД» + RegKZR ВВЕДЕНИЕ Введу сокращения: аналоговый ПИД — ПИД регулятор с управляющим выходом в виде числа в диапазоне от 0% до. . .
Модель микоризы: классовый агентный подход 2
anaschu 06.01.2026
репозиторий https:/ / github. com/ shumilovas/ fungi ветка по-частям. коммит Create переделка под биомассу. txt вход sc, но sm считается внутри мицелия. кстати, обьем тоже должен там считаться. . . .
Расчёт токов в цепи постоянного тока
igorrr37 05.01.2026
/ * Дана цепь постоянного тока с сопротивлениями и напряжениями. Надо найти токи в ветвях. Программа составляет систему уравнений по 1 и 2 законам Кирхгофа и решает её. Последовательность действий:. . .
Новый CodeBlocs. Версия 25.03
palva 04.01.2026
Оказывается, недавно вышла новая версия CodeBlocks за номером 25. 03. Когда-то давно я возился с только что вышедшей тогда версией 20. 03. С тех пор я давно снёс всё с компьютера и забыл. Теперь. . .
Модель микоризы: классовый агентный подход
anaschu 02.01.2026
Раньше это было два гриба и бактерия. Теперь три гриба, растение. И на уровне агентов добавится между грибами или бактериями взаимодействий. До того я пробовал подход через многомерные массивы,. . .
Советы по крайней бережливости. Внимание, это ОЧЕНЬ длинный пост.
Programma_Boinc 28.12.2025
Советы по крайней бережливости. Внимание, это ОЧЕНЬ длинный пост. Налог на собак: https:/ / **********/ gallery/ V06K53e Финансовый отчет в Excel: https:/ / **********/ gallery/ bKBkQFf Пост отсюда. . .
Кто-нибудь знает, где можно бесплатно получить настольный компьютер или ноутбук? США.
Programma_Boinc 26.12.2025
Нашел на реддите интересную статью под названием Anyone know where to get a free Desktop or Laptop? Ниже её машинный перевод. После долгих разбирательств я наконец-то вернула себе. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru