• tvex
  • Участник
  • Неактивен
  • Откуда: Тверь
  • На форуме с 9 ноября 2010
  • Сообщений: 81

Re: Интерфейс не зарегестрирован

При создании отчета (при нажатии клавиши "создать" - та же ошибка

  • Откуда: Новосибирск
  • На форуме с 30 сентября 2003
  • Сообщений: 4,310

Re: Интерфейс не зарегестрирован

Еще раз над той же базой но теперь другой скрпит  1.vbs

  Set App = CreateObject( "Access.Application" )  
  Call App.OpenCurrentDatabase( "C:\1.mdb", False )
  
  MsgBox "1"
  Set C = App.CurrentProject.Connection
  MsgBox "2"
  Call C.Execute( "CREATE TABLE TEMP1( ID INTEGER )" )
  MsgBox "3"
  Call C.Execute( "DROP TABLE TEMP1" )
  MsgBox "4"

  • tvex
  • Участник
  • Неактивен
  • Откуда: Тверь
  • На форуме с 9 ноября 2010
  • Сообщений: 81

Re: Интерфейс не зарегестрирован

Отработало

  • Откуда: Новосибирск
  • На форуме с 30 сентября 2003
  • Сообщений: 4,310

Re: Интерфейс не зарегестрирован

А при создании отчета - файл mdb появился хотя бы и как выглядит?

  • tvex
  • Участник
  • Неактивен
  • Откуда: Тверь
  • На форуме с 9 ноября 2010
  • Сообщений: 81

Re: Интерфейс не зарегестрирован

немножко я неправильно написал
При создании нового отчета ошибка выскакивает при нажатии Ok после выбора зависимых объектов
mdb файл создается - пустой (без таблиц)

  • Откуда: Новосибирск
  • На форуме с 30 сентября 2003
  • Сообщений: 4,310

Re: Интерфейс не зарегестрирован

ага, еще нюанс возможно упустил.

Еще раз над той же базой но теперь другой скрпит  1.vbs

  Set App = CreateObject( "Access.Application" )  
  Call App.OpenCurrentDatabase( "C:\1.mdb", False )
  
  MsgBox "1"
  Set T = App.CurrentDb.CreateTableDef( "TEMP2" )
  MsgBox "2"
  Set F = T.CreateField( "ID",  4 )
  MsgBox "3"
  T.Fields.Append( F )
  MsgBox "4"
  Call App.CurrentDb.TableDefs.Append(T)
  MsgBox "5"

должна появиться таблица "TEMP2"

  • tvex
  • Участник
  • Неактивен
  • Откуда: Тверь
  • На форуме с 9 ноября 2010
  • Сообщений: 81

Re: Интерфейс не зарегестрирован

Да, появилась

  • Откуда: Новосибирск
  • На форуме с 30 сентября 2003
  • Сообщений: 4,310

Re: Интерфейс не зарегестрирован

хм..любопытно.
А если этот пример 

Sub Test1
  Set App = CreateObject( "Access.Application" ) 
  Call App.OpenCurrentDatabase( "C:\1.mdb", False )
 
  Call TCSApp.ShowMessageBox( "", "1" )
  Set C = App.CurrentProject.Connection
  Call TCSApp.ShowMessageBox( "", "2" )
  Call C.Execute( "CREATE TABLE TEMP1( ID INTEGER )" )
  Call TCSApp.ShowMessageBox( "", "3" )
  Call C.Execute( "DROP TABLE TEMP1" )
  Call TCSApp.ShowMessageBox( "", "4" )
End Sub

создать в скритах TechnologiCS и запустить (используя Выполнить...  Call Test1 )

  • tvex
  • Участник
  • Неактивен
  • Откуда: Тверь
  • На форуме с 9 ноября 2010
  • Сообщений: 81

Re: Интерфейс не зарегестрирован

Все нормально отработало

  • Откуда: Новосибирск
  • На форуме с 30 сентября 2003
  • Сообщений: 4,310

Re: Интерфейс не зарегестрирован

Еще в догонку к предыдущему посту. Какая операционная система стоит? Возможно не помешается установить MDAC последний (здесь похоже лежит) http://www.microsoft.com/download/en/de … structions, возможно повлияет.

  • tvex
  • Участник
  • Неактивен
  • Откуда: Тверь
  • На форуме с 9 ноября 2010
  • Сообщений: 81

Re: Интерфейс не зарегестрирован

Windows XP sp3,  MDAC новый сейчас установим

  • Откуда: Новосибирск
  • На форуме с 30 сентября 2003
  • Сообщений: 4,310

Re: Интерфейс не зарегестрирован

Для ХР скорее вот так только http://www.macropool.com/en/download/mdac_xp_sp2.html  ( не вижу дистриба отдельного) , хотя там СП какие то были, но думаю они не критичны.

Спасибо сказали: tvex1

  • tvex
  • Участник
  • Неактивен
  • Откуда: Тверь
  • На форуме с 9 ноября 2010
  • Сообщений: 81

Re: Интерфейс не зарегестрирован

Большое СПАСИБО :)  Переустановили MDAC, все покатило

  • Откуда: Новосибирск
  • На форуме с 30 сентября 2003
  • Сообщений: 4,310

Re: Интерфейс не зарегестрирован

ну отлично, спасибо за терпение.  Надеюсь в будущем с этой ошибкой такой вариант поможет. По тестам то как раз все работает отлично, что всегда и смущает, видимо просто какой-то интерфейс  отваливается в процессе работы.

  • VAL
  • Участник
  • Неактивен
  • На форуме с 6 декабря 2010
  • Сообщений: 95

Re: Интерфейс не зарегестрирован

Чем дело кончилось, такая же ошибка

  • Откуда: Новосибирск
  • На форуме с 30 сентября 2003
  • Сообщений: 4,310

Re: Интерфейс не зарегестрирован

Переустановка MDAC помогла. Ну это при условии что у вас отчет скажем так стартанул (появился файл mdb)

Ответ от Шишкина Наталия (изменено: Шишкина Наталия, 10 октября 2019 12:30:49)

  • Откуда: г. Чебоксары
  • На форуме с 7 апреля 2011
  • Сообщений: 117

Re: Интерфейс не зарегестрирован

Здравствуйте.
Проблема та же, интерфейс не зарегистрирован.
Windows XP. Версия TechnologiCS 6.3.0.0.
Переустановить MDAC не удаётся.
Библиотеки  CsdnRPT.dll и CsdnRPTLib.dll зарегистрированы.
Настройки безопасности макросов в Excel и Access проверены.
Файл mdb появился, не пустой.
Что ёщё можно сделать, кроме переустановки Windows?

  • Откуда: Новосибирск
  • На форуме с 30 сентября 2003
  • Сообщений: 4,310

Re: Интерфейс не зарегестрирован

https://forum.technologics.ru/post12956.html#p12956

Спасибо сказали: Шишкина Наталия1