|
v8: Фото сотрудников из УПП в MSWord | ☑ | ||
---|---|---|---|---|
0
mazafakuh
01.08.13
✎
14:22
|
Доброго дня. Подскажите как выгрузить Фотку из УПП в определенное место Шаблона MSWord. Делал год назад все работало. и рамку даже рисовало вокруг фотки. а сейчас никак) . в Макет простой все выводится хорошо.
|
|||
1
Капитан О
01.08.13
✎
14:22
|
сделай так же, как год назад, только правильно
|
|||
2
mazafakuh
01.08.13
✎
15:37
|
отличная идея) знать бы как.
|
|||
3
mazafakuh
02.08.13
✎
12:11
|
апнем
|
|||
4
Мимохожий Однако
02.08.13
✎
12:13
|
Архивы уничтожил? Интернет ограничен только мистой?
|
|||
5
mazafakuh
02.08.13
✎
12:15
|
тут нормально отвечают)
|
|||
6
mazafakuh
02.08.13
✎
14:12
|
отвечали)))
|
|||
7
dk
02.08.13
✎
14:17
|
отвечают только на правильные вопросы
пока только повествование идет |
|||
8
Crush
02.08.13
✎
14:24
|
Блин, а я было подумал, что в Ворде новое пасхальное яйцо нашли
|
|||
9
mazafakuh
02.08.13
✎
15:29
|
Ну давайте еще раз вопрос задам.
Есть УПП 82. там есть справочник сотрудники. и есть справочник физ лица. в последнем у есть фотка сотрудника. И есть необходимость сделать внешнюю печатную форму для печати удостоверений на что либо.. Шаблон сделан в Ворде.. фотки хранятся в папке где то там.. в шаблоне есть место для ФОТО. возникла проблема с тем как его туда загнать. и рамкой обвести. спасибо) |
|||
10
shuhard
02.08.13
✎
15:39
|
(9) 10 000 руб.
|
|||
11
ДенисЧ
02.08.13
✎
15:41
|
25000 руб
И не ведись на (10), у него дешёвая наколенная поделка :-) |
|||
12
mazafakuh
02.08.13
✎
16:10
|
(10) (11) норм расценка для максимум 2 часов работы).. ну ладно спасибо и за то что теперь буду ориентироваться в том что по чем.
|
|||
13
mazafakuh
05.08.13
✎
08:55
|
а сколько стоит отчет по остаткам 2 баз. т.е. есть база 1с77 и есть база УПП и есть задача сделать в 1с77 отчет по остаткам 2-х баз. естественно с сопоставлением позиций по некому коду синхронизации . Спс)
|
|||
14
mazafakuh
05.08.13
✎
08:56
|
по определенным складам. с возможностью множественного выбора Номенклатуры или номенклатурных групп..
|
|||
15
scanduta
05.08.13
✎
08:57
|
50 000
|
|||
16
Лодырь
05.08.13
✎
09:00
|
(14) Час выяснять требования, потом часов 5 работы писать, потмо пару часов интерфейсные детали доводить, плюс час два приемки. Добавим 30% разброса. Итого 6-12 часов. Хз сколько по вашим московским ценникам стоит.
|
|||
17
ДенисЧ
05.08.13
✎
09:10
|
(13) 150 000/
J,hfofqcz |
|||
18
mazafakuh
05.08.13
✎
09:13
|
(15) (17) вы не потролив ответить можете?
|
|||
19
mazafakuh
05.08.13
✎
09:16
|
(16) там немного коряво все. сначала поставили задание не приложив форму выходную которую хотели видеть, и ряд критериев нужных не указали в ТЗ. Типо просто отчет просто остатки. потом когда он был готов они придумали форму которую хотят и отбор захотели более детальный + расчет Сумм по ценам определенным и доп столбец по колву в альтернативных Ед. ИЗМ.. вот. очень хотелось бы примерные цены узнать на эти работы.
|
|||
20
scanduta
05.08.13
✎
09:19
|
(13) За 8-10 часов можно управиться я думаю вот и считай
|
|||
21
Лодырь
05.08.13
✎
09:20
|
(19) Выставляй по факту, фигли думать. Ценник лупи как у франча и дай процентов 20 скидки за отсутствие белых документов и красивые глаза главного бухгалтера.
|
|||
22
mazafakuh
05.08.13
✎
09:23
|
для 77 и 82 наверное работы за час разные? и сколько сейчас стоит час работ?.
|
|||
23
Лодырь
05.08.13
✎
09:25
|
(22) Дружище, с чего бы разные то? Работает человек, а он один. А по ценнику - звони ближайшему франчу и спрашивай )
|
|||
24
ДенисЧ
05.08.13
✎
09:26
|
(18) Не положено
|
|||
25
screamhome
05.08.13
✎
09:34
|
(13) 150 000 больше похоже на правду
|
|||
26
Паланик
05.08.13
✎
09:42
|
Выгружаемое фото еще не просили?
|
|||
27
mazafakuh
05.08.13
✎
10:02
|
(26) вопрос актуален) на днях займусь.
|
|||
28
mazafakuh
27.08.13
✎
12:28
|
// Вставить содержимое обработчика.
//Получим данные из справочника Договор = ПолучитьМакет("Макет2"); // Получить объект из макета. MSWord = Договор.Получить(); аа =СсылкаНаОбъект.Физлицо.ОсновноеИзображение.ИмяФайла; Картинка = ("D:\....\"+аа); Попытка Документ = MSWord.Application.Documents(1); Документ.Activate(); ПозицияРисунка = MSWord.Content.Find; ПозицияРисунка.Execute("Фото", Ложь, Истина, Ложь, , , Истина, , Ложь,""); Picture = MSWord.InlineShapes.AddPicture(Сокрлп(Картинка),, Истина, ПозицияРисунка.Parent); Picture.Height = 106.38; Picture.Width = 79.78; //выводим рамку вокруг фотографии Picture.Borders(1).LineStyle = 1;//верхняя Picture.Borders(2).LineStyle = 1;//левая Picture.Borders(3).LineStyle = 1;//нижняя Picture.Borders(4).LineStyle = 1;//правая // Цвет рамки //Picture.Borders(1).Color = 1;//верхняя //Picture.Borders(2).Color = 1;//левая //Picture.Borders(3).Color = 1;//нижняя //Picture.Borders(4).Color = 1;//правая //MSWord.Application.Visible = Истина; //MSWord.Activate(); // Получить объект, который будем использовать для поиска и замены. Замена = Документ.Content.Find; Замена.Execute("[НомУ]", Ложь, Истина, Ложь, , , Истина, , Ложь, Сокрлп(НомерУд_)); Замена = Документ.Content.Find; Замена.Execute("[НомПрот]", Ложь, Истина, Ложь, , , Истина, , Ложь, Сокрлп(НомерПротокола)); Замена = Документ.Content.Find; Замена.Execute("[Дата]", Ложь, Истина, Ложь, , , Истина, , Ложь, Сокрлп(Дата)); Замена = Документ.Content.Find; Замена.Execute("[ФИО]", Ложь, Истина, Ложь, , , Истина, , Ложь, Сокрлп(СсылкаНаОбъект.Физлицо.Наименование)); //Замена = Документ.Content.Find; //Замена.Execute("[ФОТО]", Ложь, Истина, Ложь, , , //Истина, , Ложь, Картинка); MSWord.Application.Visible = Истина; MSWord.Activate(); Исключение // Если произойдет ошибка выводятся данные об ошибке и объект закрывается. Сообщить(ОписаниеОшибки()); MSWord.Application.Quit(); КонецПопытки; |
|||
29
mazafakuh
27.08.13
✎
12:28
|
если интересно каму то)
|
|||
30
Aleks73
27.08.13
✎
12:32
|
Читал код. Не верю (С)
|
Форум | Правила | Описание | Объявления | Секции | Поиск | Книга знаний | Вики-миста |