Скачать: 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 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.011 c