Имя: Пароль:
1C
1С v8
1с как выгрузить данныес табличной части во временную таблицу на mysql сервер
0 vqwy
 
22.03.13
08:20
1с как выгрузить данные с табличной части  во временную таблицу на mysql сервер
1 Андрюха
 
22.03.13
08:21
даже боюсь спросить зачем
2 Karavanych
 
22.03.13
08:50
Функция ВыполнитьСоединение() экспорт
   СоединениеБазы = Новый COMОбъект("ADODB.Connection");
   driver="Надо гуглить какой драйвер для MySQL";
   server="192.168.0.2";
   login="sa";    
   password="supermegapassword";
   base="SkidkySertificaty";
   ConnectionString = "driver={"+driver+"}; Server="+server+"; uid="+login+"; Pwd="+password+"; Database ="+base+";";
   успешныйконект=ложь;
   СоединениеБазы.Open(ConnectionString);
   успешныйконект=истина;
   Сообщить("Соединились");
   возврат СоединениеБазы;
   
КонецФункции

Процедура ВыгружаемСтроку(ЗадСтрокаТЗ)


//строим примерно такой запроса на базе insert и выгружаем строку, параметры естественно долны быть из нужной тебе ТЗ.

   querry= "USE ["+base+"]
       |    INSERT INTO dbo."+tablename+" VALUES (
           |'"+ЗадКарта.КодКарты+"',
           |'"+Лев(ЗадКарта.Наименование,50)+"',
           |'"+Лев(ФИО.Фамилия,50)+"',
           |'"+Лев(ФИО.Имя,50)+"',
           |'"+Лев(ФИО.Отчество,50)+"',
           |"+ТекстНакопл+",
           |"+?(ЗадКарта.ПометкаУдаления=Истина,"1","0")+",
           |'"+ДатаРождения+"',
           |'"+Телефон+"',          
           |'"+ТекДатаВФормате+"',
           |"+СхемаНакоплений+",            
           |'"+tablename+"'
           |)";

       Command.CommandText = query; // текст надо фильтровать на недопустимые символы        
       RecordSet = Новый COMОбъект("ADODB.RecordSet"); // Подготавливаем записи    
       RecordSet = Command.Execute();

КонецПроцедуры

Процедура ГлавнаяПроцедура()
   Для каждого строкаТЗ из ТЗ цикл
       ВыгружаемСтроку(строкаТЗ );
   КонецЦикла;
КонецПроцедуры
3 Defender aka LINN
 
22.03.13
08:51
(0) Нахрена?
4 Karavanych
 
22.03.13
08:51
(3) ну надо человеку, мало ли :)))
5 vqwy
 
22.03.13
08:55
есть программа биллинг(веб-приложение)
В ней собираются данные по складу и закрываются договорами или актами
На складе есть 1С8 Управление торговлей и там кладовщик отпускает по номенклатуре товар. В биллинг переносятся только следующие данные:
1. Номер накладной
2. Дата накладной
3. Сумма накладной
4. Тип накладной(расход или возврат)

Соответственно, чтобы связать 1С и биллинг нужно выгружать ИНН и Наименование контрагента и номер договора по которому будет будет отпускаться оборудование
Нужно сделать внешнюю обработку(в окне обработки должно быть выбор даты закрытия дня и табличная часть с сформированными данными перед выгрузкой)
Все это по нажатию кнопки должно выгружаться:
во времменную таблицу на mysql сервер
6 Karavanych
 
22.03.13
08:57
(5) я тебе в (2) привел примерно как это делать, только надо дарайвер для mysql погуглить какой, потому что я это делал для MSSQL
7 Karavanych
 
22.03.13
08:59
а и еще...я там вот этот кусок забыл, до отправки запроса.
у меня там Command неопределено.

   СоединениеБазы=ВыполнитьСоединение();
   Если СоединениеБазы=неопределено тогда возврат; КонецЕсли;
     
   Command = Новый COMОбъект("ADODB.Command");
   Command.ActiveConnection = СоединениеБазы;
8 vqwy
 
22.03.13
09:04
(7) спасибо