Переключение на Главную Страницу Страницы: 1 ОтправитьПечать
Обычная тема Запрос без метапарсеров ? (число прочтений - 3566 )
gelotus
Junior Member
**
Отсутствует


I Love YaBB 2!

Сообщений: 30
Зарегистрирован: 26. Февраля 2007
Запрос без метапарсеров ?
31. Мая 2007 :: 11:02
Печать  
Скажите можно ли в 1с++ послать запрос  Без учета метапарсеров?

ситуация хочу записать данные в Excel

рс.Выполнить("Insert into [Лист1$]  Values (10,20,30)");

Драйверу посылается строка

Insert into [Лист1_1c_type_]  Values (10,20,30)

и ничего не записывается
  
Наверх
 
IP записан
 
varelchik
God Member
*****
Отсутствует


I Love YaBB 2!

Сообщений: 788
Зарегистрирован: 22. Мая 2006
Re: Запрос без метапарсеров ?
Ответ #1 - 31. Мая 2007 :: 12:13
Печать  
Пройдись поиском по форуму я уже этот вопрос поднимал.
DmitrO на него уже отвечал.
  
Наверх
 
IP записан
 
Вадимко
God Member
*****
Отсутствует


Нам бы чего про ОдноЦэ...

Сообщений: 1048
Местоположение: Минск
Зарегистрирован: 24. Мая 2006
Пол: Мужской
Re: Запрос без метапарсеров ?
Ответ #2 - 31. Мая 2007 :: 13:52
Печать  
А скобочки и доллар убрать? Не судьба?
  

Кампутер, кофе и сигареты - это очень плохо для моего здоровья...
Наверх
IP записан
 
gelotus
Junior Member
**
Отсутствует


I Love YaBB 2!

Сообщений: 30
Зарегистрирован: 26. Февраля 2007
Re: Запрос без метапарсеров ?
Ответ #3 - 01. Июня 2007 :: 07:22
Печать  
Все получилось, списибо большое.

Если можно подскажите , так можно делать,
Если можно, то почему у меня выдает ошибку?

Если база.Соединение("Driver={Microsoft Excel Driver   (*.xls)}СмехriverId=790;FileUsage=0;Dbq="+имя+"СмехefaultDir=C:\;ReadOnly=0;" ) =0 Тогда
           Предупреждение("Ошибка открытия файла", 60);
           Возврат;
     КонецЕсли;
     
     рс =СоздатьОбъект("ODBCRecordSet");
     рс.УстБД(база);
              фл=рс.Выполнить("CREATE TABLE Лист1 (DT char(128), DA2 char(128");   
     
     рс.Подготовить("Insert into Лист1 (DT,DA2) Values (?,?)");
   
         рс.ВыполнитьSQL_ИзТЗ(ит);
  
Наверх
 
IP записан
 
gelotus
Junior Member
**
Отсутствует


I Love YaBB 2!

Сообщений: 30
Зарегистрирован: 26. Февраля 2007
Re: Запрос без метапарсеров ?
Ответ #4 - 01. Июня 2007 :: 07:23
Печать  
Ошибка такая
Необходимо выполнить подготовку запроса или проверить синтаксис!
State IM001, native 0, message [Microsoft][ODBC Driver Manager] Driver does not support this function
  
Наверх
 
IP записан
 
Вадимко
God Member
*****
Отсутствует


Нам бы чего про ОдноЦэ...

Сообщений: 1048
Местоположение: Минск
Зарегистрирован: 24. Мая 2006
Пол: Мужской
Re: Запрос без метапарсеров ?
Ответ #5 - 01. Июня 2007 :: 15:21
Печать  
Омистинеть... наверное я отстал от жизни
Ты в екселе хочешь рекордсет???
  

Кампутер, кофе и сигареты - это очень плохо для моего здоровья...
Наверх
IP записан
 
yudin
Full Member
***
Отсутствует


Краткость - с.т.

Сообщений: 131
Местоположение: Ростов - на - Дону
Зарегистрирован: 25. Мая 2006
Пол: Мужской
Re: Запрос без метапарсеров ?
Ответ #6 - 05. Июня 2007 :: 07:17
Печать  
Почему бы и нет? Запросы к Excel через аду прекрасно работают, 1С++ не работает, ибо листы в экселе называются с доллером и метапарсер их преобразует. Судя по всему решение есть, пойду в поиск...

То есть скобочки и доллар убрать никак нельзя
  

С уваженьем, дата, подпись
Наверх
wwwICQ  
IP записан
 
yudin
Full Member
***
Отсутствует


Краткость - с.т.

Сообщений: 131
Местоположение: Ростов - на - Дону
Зарегистрирован: 25. Мая 2006
Пол: Мужской
Re: Запрос без метапарсеров ?
Ответ #7 - 05. Июня 2007 :: 07:19
Печать  
gelotus писал(а) 01. Июня 2007 :: 07:22:
Все получилось, списибо большое.


Либо что то с поиском, либо со мной - открой секрет как сделал..
  

С уваженьем, дата, подпись
Наверх
wwwICQ  
IP записан
 
gelotus
Junior Member
**
Отсутствует


I Love YaBB 2!

Сообщений: 30
Зарегистрирован: 26. Февраля 2007
Re: Запрос без метапарсеров ?
Ответ #8 - 05. Июня 2007 :: 09:15
Печать  
     ит=СоздатьОбъект("таблицазначений");
     табл.выгрузить(ит,,);
     имя="C:\oleg.xls";
     база =СоздатьОбъект("ODBCDatabase");
     
     Если база.Соединение("Driver={Microsoft Excel Driver (*.xls)}СмехriverId=790;FileUsage=0;Dbq="+имя+"СмехefaultDir=C:\;ReadOnly=0;" ) =0 Тогда
           Предупреждение("Ошибка открытия файла", 60);
           Возврат;
     КонецЕсли;
     сообщить(текущеевремя());
     рс =СоздатьОбъект("ODBCRecordSet");
     рс.УстБД(база);
     Сообщить(база.ЕстьСоединение());
     
//      рс.отладка(1);
    фл=рс.Выполнить("CREATE TABLE ЛистODBCD (DT char(128), DA2 char(128), DA3 char(128))");   
   // фл=рс.Выполнить("Insert into Лист1  Values (10,20,30)");
     табл.выбратьстроки();
  к=0;
  пока табл.получитьстроку()=1 цикл   
           рс.Выполнить("Insert into ЛистODBCD  Values ('"+табл.Период+"','"+табл.супервайзер+"','"+табл.Клиент+"')");
          к=к+1;
           состояние(к);
  Конеццикла;
//   db.Close();
     сообщить(текущеевремя());
  
Наверх
 
IP записан
 
gelotus
Junior Member
**
Отсутствует


I Love YaBB 2!

Сообщений: 30
Зарегистрирован: 26. Февраля 2007
Re: Запрос без метапарсеров ?
Ответ #9 - 05. Июня 2007 :: 09:18
Печать  
В идеале было бы через рс.ВыполнитьSQL_ИзТЗ(ит);
но developerы никак не хотят решать вопрос с метапарсерами Печаль
  
Наверх
 
IP записан
 
Переключение на Главную Страницу Страницы: 1
ОтправитьПечать