![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Эксорт (Импорт) данных в 1С [D6, Paradox]
GavAl © (2003-06-12 17:05:00)Мастера подскажите как экспортировать или импортировать данные из 1С или в 1С. Или же где можно найти инфу по этому поводу?
mike-d (2003-06-12 20:58:00) [1]http://sapopov.kominet.ru:8101/PRG/s1c2.htm
http://sapopov.kominet.ru:8101/PRG/s1c1.htm
почитай, попробуй...
GavAl (2003-06-12 19:11:00) [2]Пробовал в пошаговом режиме
когда доходит до while spr.ПолучитьЭлемент(1)>0 do
происходит переход на конец программы
sniknik (2003-06-12 19:00:00) [3]откуда ничего не вышло? тужся сильнее, выйдет. ;о))
когда всетаки начнут комментировать что у них происходит? (риторический вопрос, сам знаю никогда)
http://delphi.vitpc.com/article/1c.htm
это уже видел?
GavAl (2003-06-12 18:40:00) [4]попробовал тпким образом ничего не вышло
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;
kaif (2003-06-12 18:02:00) [5]В документации к 1с конце книжки "1с:описание встроенного языка" есть пункт "Работа с 1с, как с сервером OLE Automation"
Берешь его и перекатываешь в Delphi дословно (с русскими идентификаторами). Под D6 это откомпилируется и заработает. Под другими версиями не пробовал, но если будут проблемы с русскими идентификаторами, можно воспользоваться английскими эквивалентами, если найдешь их в 1с, конечно (от конфигурации зависит).