powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / [игнор отключен] [закрыт для гостей] / Подключение к 1с из Delphi
11 сообщений из 11, страница 1 из 1
Подключение к 1с из Delphi
    #36201195
D_A_S1
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Добрый день!
Мне необходимо решить небольшую задачку связанную с 1с 7.7. А именно: подключиться к 1с 7.7 и по определенному параметру справочника получить от туда данные.
Подклаюсь я с помощью Delphi (другого пути нет).
Суть в чем. В организации стоит SQL - версия 1с, у меня дома 1с в виде dbf файлов. Дома все работает замечательно... вот код:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
var
  Ole1C: OleVariant;
......
procedure TForm1.Button1Click(Sender: TObject);
var
  ResOpen: Integer;
  path1c: string;
begin
  path1c:="D:\temp\3\basa\ /NUser /PPasword";
  Ole1C := CreateOleObject('V77.Application');
  ResOpen := Ole1C.Initialize(Ole1C.RMTrade, '/D'+ path1c, ''); 
  ... и дальше 

Когда запускаю в организации, то там БД лежит на сервере (подключаюсь с рабочего места пользователя) и мне приходится подключение немного иначе переписать:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
procedure TForm1.Button1Click(Sender: TObject);
var
  ResOpen: Integer;
  path1c: string;
begin
  path1c:="\\Server\BuhData\Debtors\ /NUser /PPasword";
  Ole1C := CreateOleObject('V77S.Application');
  ResOpen := Ole1C.Initialize(Ole1C.RMTrade, '/D'+ path1c, ''); 

Вместо V77.Application пишу V77S.Application (т.к. SQL-версия).
Проблема в том, что при попытке создать OleObject 1c на компьютере пользователя, она ругается (т.е. на строке Ole1C := CreateOleObject('V77S.Application');)
В чем может быть проблема? В какую сторону копать? Заранее спасибо!
...
Рейтинг: 0 / 0
Подключение к 1с из Delphi
    #36201247
semyons
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Насколько я помню, способ подключения не зависит от версии 7.7. То есть и там и там нужно использовать Ole1C := CreateOleObject('V77.Application');
...
Рейтинг: 0 / 0
Подключение к 1с из Delphi
    #36201384
D_A_S1
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
перепробовал разные варианты (V77 или V77S).. однако суть одна и таже - не работает...
может ли быть ошибка в том, что сама 1с на сервере (а у пользователя 1с вообще нет)?
...
Рейтинг: 0 / 0
Подключение к 1с из Delphi
    #36201455
semyons
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
1С должна быть установлена на клиенте стопудово. Либо полная, либо административная установка
...
Рейтинг: 0 / 0
Подключение к 1с из Delphi
    #36201527
leaf
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
а что в делфи можно создать объект без библиотеки?
таки фокус?
...
Рейтинг: 0 / 0
Подключение к 1с из Delphi
    #36201544
D_A_S1
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
согласен!
...
Рейтинг: 0 / 0
Подключение к 1с из Delphi
    #36203471
D_A_S1
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
установили на компьютер 1с.. все равно дальше строки:
Код: plaintext
1.
 Ole1C := CreateOleObject('V77S.Application');
программа не продвигается... Сейчас выдает вот такую ошибку: Server execution failed (при этом вначале очень долго думает)..
В чем может быть проблема?
...
Рейтинг: 0 / 0
Подключение к 1с из Delphi
    #36203745
leaf
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
хасп есть?
...
Рейтинг: 0 / 0
Подключение к 1с из Delphi
    #36203814
D_A_S1
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
что это такое?
...
Рейтинг: 0 / 0
Подключение к 1с из Delphi
    #36203831
leaf
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
ключ ...
без него не работает обычно
ну или ...
...
Рейтинг: 0 / 0
Подключение к 1с из Delphi
    #36204310
Егоров Александр
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
D_A_S1,

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

и используйте "платформонезависимый" вызов 1С
Код: plaintext
1.
Ole1C := CreateOleObject('V77.Application');
...
Рейтинг: 0 / 0
11 сообщений из 11, страница 1 из 1
Форумы / [игнор отключен] [закрыт для гостей] / Подключение к 1с из Delphi
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]