Имя: Пароль:
1C
 
работа с таблицами SQL
0 Ferz
 
05.04.05
13:50
Возможно какими ли методами(ВК) работать непосредственно с таблицами SQL получить данные непосредственно из них может  Rainbow
а как насчет переименования таблиц,создание представлений???.
1 ValeraVV
 
05.04.05
13:58
АДО
2 Сказочникс
 
05.04.05
13:59
Ага Delphi, С, VB пиши не хочу и цепляй к 1с
3 Сказочникс
 
05.04.05
14:00
(1)Не через адо слишком просто, :) Мы не исчем легких путей
4 Ferz
 
05.04.05
14:05
Я так понимаю ADO и  SQL Scripts почти одно и тоже ?)))))))
5 ValeraVV
 
05.04.05
14:08
(4) а что смешного?
6 Ferz
 
05.04.05
14:13
(5) то что в SQL Scripts не шарю??
Как организовать перебор всех таблиц??
7 ValeraVV
 
05.04.05
14:17
может не надо?
8 Ferz
 
05.04.05
14:33
Надо валера Надо
9 Ferz
 
05.04.05
14:33
Надо Валера Надо
10 ValeraVV
 
05.04.05
14:38
Ну тут почитай мож че поможет
http://www.perlscript.ru/v77_19.shtml
11 Asmody
 
05.04.05
14:39
(6) это ты хотел?
SELECT * FROM sysobjects WHERE xtype='U'
12 Ferz
 
05.04.05
15:04
(11) нет ты выбрал все таблицы
а как поочереди?(перебор)
13 Ferz
 
05.04.05
15:08
Все столбцы сори)))
14 Asmody
 
05.04.05
15:11
через 1С++ например, так:
   РС=СоздатьОбъект("ODBCRecordSet");
   РС.Открыть("SELECT * FROM sysobjects WHERE xtype='U'");
   Если РС.ВыборкаОткрыта()=1 Тогда
       ТЗ=СоздатьОбъект("ТаблицаЗначений");
       РС.ПолучитьРезультатыВ_ТЗ(ТЗ,1);
       ТЗ.ВыбратьСтроки();
       Пока ТЗ.ПолучитьСтроку()=1 Цикл
           Сообщить("Таблица="+ТЗ.name);
       КонецЦикла;
   КонецЕсли;
15 Ferz
 
05.04.05
15:44
(14)Шикарно ______________  ты хотел сказать....
отредактировал
>>>>>>>>>>>>>>>>>>>>>>>
   objConnection = СоздатьОбъект("ADODB.Connection");
   Состояние("Соединение с сервером");
   objConnection.Open("Driver={SQL Server};Server=1csql;Uid=sa;Pwd=fuck;DataBase=ITRPtest2;");
   objRecordset = СоздатьОбъект("ADODB.Recordset");
   objRecordset.ActiveConnection = objConnection;
   СЗ=СоздатьОбъект("СписокЗначений");
   objRecordset.Open("SELECT * FROM sysobjects WHERE xtype='U'");
   Состояние("Выполнение запроса");
Если Число(objRecordset.State)<>0 Тогда
  Пока objRecordset.EOF=0 Цикл
      СЗ.ДобавитьЗначение(objRecordSet.Fields("Name").Value);
      objRecordSet.MoveNext()      
   КонецЦикла;
   objRecordset.Close();
КонецЕсли;

Для ном=1 по СЗ.РазмерСписка() Цикл
  Сообщить(СЗ.ПолучитьЗначение(Ном));
КонецЦикла;
16 Ferz
 
05.04.05
16:07
а как выполнить хранимую процедуру??
17 Asmody
 
05.04.05
16:17
objCommand = СоздатьОбъект("ADODB.Command");
objCommand.CommandText="EXEC <имяпроцедурыивсетакое>";
objCommand.CommandType=1;
objCommand.Execute();
18 Asmody
 
05.04.05
16:18