Переключение на Главную Страницу Страницы: 1 ОтправитьПечать
Горячая тема (более 10 ответов) Получить ТА() (число прочтений - 1953 )
DrWeb
YaBB Newbies
*
Отсутствует


1C++ rocks!

Сообщений: 12
Зарегистрирован: 28. Июня 2010
Получить ТА()
10. Ноября 2010 :: 09:27
Печать  
Из Базы1 необходимо узнать ТА() dbf'ной Базы2
Подскажите?
  
Наверх
 
IP записан
 
Z1
God Member
*****
Отсутствует


I Love YaBB 2!

Сообщений: 2906
Местоположение: Москва
Зарегистрирован: 26. Мая 2006
Пол: Мужской
Re: Получить ТА()
Ответ #1 - 10. Ноября 2010 :: 10:34
Печать  
через OLE
  
Наверх
 
IP записан
 
DrWeb
YaBB Newbies
*
Отсутствует


1C++ rocks!

Сообщений: 12
Зарегистрирован: 28. Июня 2010
Re: Получить ТА()
Ответ #2 - 11. Ноября 2010 :: 02:46
Печать  
а прямым запросом?
  
Наверх
 
IP записан
 
DrWeb
YaBB Newbies
*
Отсутствует


1C++ rocks!

Сообщений: 12
Зарегистрирован: 28. Июня 2010
Re: Получить ТА()
Ответ #3 - 11. Ноября 2010 :: 07:30
Печать  
на вот такой не сложный код:

     Путь = "D:\База\";
     Имя = "Пользователь";
   Пароль = "Пароль";
     КоманднаяСтрока = "/D""" + СокрЛП(Путь) + """ /N" + Имя + " /P" + Пароль;
     V77App = СоздатьОбъект("V77.Application");
     res = V77App.Initialize(V77App.RMTrade, КоманднаяСтрока, "NO_SPLASH_SHOW");
     Если res = -1 Тогда
           ДатаАкт = V77App.ПолучитьДатуТА();
     Иначе
           ДатаАкт = ПолучитьПустоеЗначение("Дата");
     КонецЕсли;
     V77App = 0;
     Сообщить(ДатаАкт);

выдает:
ДатаАкт = V77App.ПолучитьДатуТА();
Поле агрегатного объекта не обнаружено (ПолучитьДатуТА)

что не так?
  
Наверх
 
IP записан
 
Dmitry The Wing
God Member
*****
Отсутствует


1C++ rocks!

Сообщений: 839
Местоположение: Где-то в Сибири
Зарегистрирован: 18. Августа 2009
Пол: Мужской
Re: Получить ТА()
Ответ #4 - 11. Ноября 2010 :: 07:42
Печать  
DrWeb писал(а) 11. Ноября 2010 :: 07:30:
что не так?

Ищи инфу, но просто так можно вызывать далеко не все функции. Нужно что-то типа Eval, а точнее - не помню.
  
Наверх
 
IP записан
 
DrWeb
YaBB Newbies
*
Отсутствует


1C++ rocks!

Сообщений: 12
Зарегистрирован: 28. Июня 2010
Re: Получить ТА()
Ответ #5 - 11. Ноября 2010 :: 07:44
Печать  
Сообщить(База.EvalExpr("ПолучитьДатуТА()"));
Поле агрегатного объекта не обнаружено (EvalExpr)
  
Наверх
 
IP записан
 
Dmitry The Wing
God Member
*****
Отсутствует


1C++ rocks!

Сообщений: 839
Местоположение: Где-то в Сибири
Зарегистрирован: 18. Августа 2009
Пол: Мужской
Re: Получить ТА()
Ответ #6 - 11. Ноября 2010 :: 07:54
Печать  
У пользователя есть в этой базе право "Использование в качестве OLE Automation сервера"?
  
Наверх
 
IP записан
 
Z1
God Member
*****
Отсутствует


I Love YaBB 2!

Сообщений: 2906
Местоположение: Москва
Зарегистрирован: 26. Мая 2006
Пол: Мужской
Re: Получить ТА()
Ответ #7 - 11. Ноября 2010 :: 08:02
Печать  
Пишешь глоб функцию в  глоб модуле это в той базе откуда хочешь брать информацию

Функция ГлПолучитьДатуТА()  Экспорт
   return ПолучитьДатуТА();
КонецФункции


Теперь берем

ДокБД=V77App.EvalExpr(" ГлПолучитьДатуТА()");


через прямой запрос ( поле  curdate )
select * from 1SSYSTEM

  
Наверх
 
IP записан
 
DrWeb
YaBB Newbies
*
Отсутствует


1C++ rocks!

Сообщений: 12
Зарегистрирован: 28. Июня 2010
Re: Получить ТА()
Ответ #8 - 11. Ноября 2010 :: 08:42
Печать  
Dmitry The Wing писал(а) 11. Ноября 2010 :: 07:54:
У пользователя есть в этой базе право "Использование в качестве OLE Automation сервера"?

подскажи где это посмотреть?


Z1 писал(а) 11. Ноября 2010 :: 08:02:
через прямой запрос ( поле  curdate )
select * from 1SSYSTEM


попробую поковыряюсь в прямых запросах
  
Наверх
 
IP записан
 
Dmitry The Wing
God Member
*****
Отсутствует


1C++ rocks!

Сообщений: 839
Местоположение: Где-то в Сибири
Зарегистрирован: 18. Августа 2009
Пол: Мужской
Re: Получить ТА()
Ответ #9 - 11. Ноября 2010 :: 08:45
Печать  
DrWeb писал(а) 11. Ноября 2010 :: 08:42:
подскажи где это посмотреть?

Странный вопрос ... в правах пользователя 1С!
  
Наверх
 
IP записан
 
DrWeb
YaBB Newbies
*
Отсутствует


1C++ rocks!

Сообщений: 12
Зарегистрирован: 28. Июня 2010
Re: Получить ТА()
Ответ #10 - 11. Ноября 2010 :: 11:24
Печать  
всем спасибо
прямым запросам зачет
  
Наверх
 
IP записан
 
Переключение на Главную Страницу Страницы: 1
ОтправитьПечать