Версия для печати темы (https://pro1c.org.ua/index.php?s=f0e02c9edea24e17edbcbe8031155b7c&showtopic=47401)

Автор: AntAlex 23.08.18, 10:49

1С 7.7 (7.70.027)
в базу Access 2003 надо импортировать некоторые данные

Код:

Public Sub v7Connect()
    Dim v7 As Object
    Dim Spr As String
    
    Set v7 = CreateObject("V77.Application")
    iscon = v7.Initialize(v7.RMTrade, "/d D:\1cBase7\Torg /nant", "NO_SPLASH_SHOW")
    If iscon Then
        Spr = v7.CreateObject("Справочник.Контрагенты") ' Type mismach
    End If
    
End Sub

Подключается нормально
!!! Попытка получить ссылку на справочник - ошибка Type mismach

??? В чем проблема?

Автор: mut 23.08.18, 12:44

AntAlex @ Сегодня, 11:49 ,

Не знаю точно, но вроде создавать объекты надо примерно так:

Set Товар = trade.EvalExpr("CreateObject(""Справочник.Товары"")")

Попробуйте

Автор: AntAlex 23.08.18, 13:12

mut @ Сегодня, 12:44 ,

Спасибо за наводку!

Set Spr = v7.CreateObject("...")

!!! конечно SET
затупил.
и соответственно Dim Spr As Object

Автор: Vofka 26.08.18, 11:10