Текущий архив: 2003.07.07;
Скачать: CL | DM;
Вниз
Эксорт (Импорт) данных в 1С Найти похожие ветки
← →
GavAl (2003-06-12 17:05) [0]Мастера подскажите как экспортировать или импортировать данные из 1С или в 1С. Или же где можно найти инфу по этому поводу?
← →
kaif (2003-06-12 18:02) [1]В документации к 1с конце книжки "1с:описание встроенного языка" есть пункт "Работа с 1с, как с сервером OLE Automation"
Берешь его и перекатываешь в Delphi дословно (с русскими идентификаторами). Под D6 это откомпилируется и заработает. Под другими версиями не пробовал, но если будут проблемы с русскими идентификаторами, можно воспользоваться английскими эквивалентами, если найдешь их в 1с, конечно (от конфигурации зависит).
← →
GavAl (2003-06-12 18:40) [2]попробовал тпким образом ничего не вышло
private
C:OLEVariant;
procedure TForm1.ConnectTo1C;
var
spr:OLEVariant;
begin
Table1.Open;
try
C:=CreateOLEObject("V77.Application");
except
ShowMessage("Do not");
exit;
end;
C.initialize(C.rmtrade,"/D D:\test /M /NName /Ppassword","NO_SPLASH_SHOW");
spr:=C.CreateObject("Справочник.Вулиця");
spr.ВыбратьЭлементы(1);
while spr.ПолучитьЭлемент(1)>0 do
begin
Table1.Append;
Table1["NAME"].AsString:=spr.ПолучитьАтрибут("Наименование");
Table1.Post;
end;
//C:=UnAssigned;
end;
← →
sniknik (2003-06-12 19:00) [3]откуда ничего не вышло? тужся сильнее, выйдет. ;о))
когда всетаки начнут комментировать что у них происходит? (риторический вопрос, сам знаю никогда)
http://delphi.vitpc.com/article/1c.htm
это уже видел?
← →
GavAl (2003-06-12 19:11) [4]Пробовал в пошаговом режиме
когда доходит до while spr.ПолучитьЭлемент(1)>0 do
происходит переход на конец программы
← →
mike-d (2003-06-12 20:58) [5]http://sapopov.kominet.ru:8101/PRG/s1c2.htm
http://sapopov.kominet.ru:8101/PRG/s1c1.htm
почитай, попробуй...
Страницы: 1 вся ветка
Текущий архив: 2003.07.07;
Скачать: CL | DM;
Память: 0.45 MB
Время: 0.006 c