![]() |
![]() |
|
Поскажет кто, как время из 8.1 забрать в 7.7. | ☑ | ||
---|---|---|---|---|
0
budnik
25.10.11
✎
08:59
|
Заказы и базы 8.1 в 7.7 перекинуть надо.Время важно.
|
|||
1
Гефест
25.10.11
✎
09:00
|
Серьезный вызов телепатам
|
|||
2
ДенисЧ
25.10.11
✎
09:01
|
В строку кастуй...
|
|||
3
DJ Anthon
25.10.11
✎
09:01
|
чайник пятнадцать огурцов светает чувырла
|
|||
4
Godofsin
25.10.11
✎
09:02
|
(3) +
|
|||
5
Guk
25.10.11
✎
09:02
|
УстановитьВремя(<?>,,);
Синтаксис: УстановитьВремя(<Часы>,<Минуты>,<Секунды>) Назначение: Установить время документа. Параметры: <Часы> - число часов; <Минуты> - число минут; <Секунды> - число секунд. Замечание: Метод можно использовать только для объектов, созданных функцией СоздатьОбъект. |
|||
6
budnik
25.10.11
✎
09:03
|
Виноват.
V8=СоздатьОбъект("V81.Application"); ПользовательОле = ПользовательБазы8;//"Администратор"; ПарольОле = ПарольБазы8;//"1"; БазаОле=V8.Connect("Srvr="""+СокрЛп(СерверБазы8)+""";Ref="""+СокрЛп(База8)+""";Usr="""+СокрЛп(ПользовательОле)+""";Pwd="""+СокрЛп(ПарольОле)+""";"); Если БазаОле = 0 Тогда Предупреждение("Не удалось подключится к указанной базе - проверьте вводные!"); Иначе Сообщить("Соединение установлено!"); КонецЕсли; Дата1 = Формат(ВыбНачПериода, "ДГГГГММДД")+"000000"; Дата2 = Формат(ВыбКонПериода, "ДГГГГММДД")+"235959"; ДокументыВида = V8.Документы.Заказы.Выбрать(Дата1,Дата2); Пока ДокументыВида.Следующий()= -1 Цикл //фы=V8.Формат(ДокументыВида.ВремяНачалаРедактирования,"ДФ=дд.ММ.гггг ЧЧ:мм:сс"); фы=ДокументыВида.ВремяНачалаРедактирования; КонецЦикла; |
|||
7
Irbis
25.10.11
✎
09:05
|
ВремяСтр=Прав(СФ.Дата, 8);
ЧЧ=Лев(ВремяСтр, 2); ММ=Сред(ВремяСтр, 4, 2); СС=Прав(ВремяСтр, 2); OLE_ПТ.Записать(); OLE_ПТ.УстановитьВремя(ЧЧ, ММ, СС); OLE_ПТ.Записать(); |
|||
8
budnik
25.10.11
✎
09:08
|
из 8.1 возвращается только дата, время получить не удается.
|
|||
9
ДенисЧ
25.10.11
✎
09:09
|
(8) ещё раз прочитай (2)
|
|||
10
budnik
25.10.11
✎
09:13
|
Денис.Для одаренных, можно по подробней.
|
|||
11
Defender aka LINN
25.10.11
✎
09:16
|
КД юзай
|
|||
12
Escander
25.10.11
✎
09:26
|
(0)а если так:
время77 = V8.Выполнить("Строка(Формат(ДокументыВида.ВремяНачалаРедактирования,"ДФ=ЧЧммсс"))"); |
|||
13
Defender aka LINN
25.10.11
✎
09:27
|
(12) Месье знает толк в извращениях...
|
|||
14
budnik
25.10.11
✎
09:29
|
(12) V8.Выполнить("Строка(Формат(ДокументыВида.ВремяНачалаРедактирования,"ДФ=ЧЧммсс"))") = Ошибка в выражении!
|
|||
15
Escander
25.10.11
✎
09:34
|
(14) ну так отладь сначала в снегурочке вот это... форматную строку может и переврал
Строка(Формат(ДокументыВида.ВремяНачалаРедактирования,"ДФ=ЧЧммсс")) |
|||
16
Escander
25.10.11
✎
09:34
|
(13) если ему нужно итерактивно а не от случая к случаю КД никак
|
|||
17
budnik
25.10.11
✎
09:50
|
V8.Строка(Формат(ДокументыВида.ВремяНачалаРедактирования,"ДФ=ЧЧммсс")) = Ошибка в выражении!
|
|||
18
Рэйв
25.10.11
✎
09:58
|
(17)
V8.Строка( и V8.Выполнить( Разницу ощущаешь? |
|||
19
Рэйв
25.10.11
✎
10:03
|
+(17)универсальны способ получения чего угодно из 8:
Книга знаний: Выполнение произвольного кода на стороне подключенной базы 8.x при COM-соединении В твоем случае: Время=V8.ИсполнитьВн("Ответ=Прав(Строка(ДокументыВида.ВремяНачалаРедактирования,),8)") можно через Формат, но не помню точно форматную строку, а копаться лень. |
|||
20
Рэйв
25.10.11
✎
10:04
|
+(19)Если ДокументыВида это уже полученный объект СОМ в 77 , то
тогда так: Время=V8.ИсполнитьВн("Ответ=Прав(Строка(ВнутрПараметр,),8)",ДокументыВида.ВремяНачалаРедактирования) |
|||
21
Рэйв
25.10.11
✎
10:06
|
ВнутрПараметр = ВспомПараметр
|
|||
22
budnik
25.10.11
✎
10:28
|
Спасибо.
Запросом все забрал.Проще. Запрос =V8.NewObject("Запрос"); Запрос.Текст = "ВЫБРАТЬ | Заказы.Ссылка, | ЧАС(Заказы.ВремяНачалаРедактирования) КАК ЧасН, | МИНУТА(Заказы.ВремяНачалаРедактирования) КАК МинН, | Заказы.Представление |ИЗ | Документ.Заказы КАК Заказы"; //Результат = Запрос.Выполнить(); Выборка = Запрос.Выполнить().Выбрать(); Пока Выборка.Следующий()=-1 Цикл Сообщить(Выборка.ЧасН); КонецЦикла; |
Форум | Правила | Описание | Объявления | Секции | Поиск | Книга знаний | Вики-миста |