Printer

Программирование на Visual Basic, главный форум. Обсуждение тем программирования на VB 1—6.
Даже если вы плохо разбираетесь в VB и программировании вообще — тут вам помогут. В разумных пределах, конечно.
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
Чудик
Постоялец
Постоялец
Аватара пользователя
 
Сообщения: 639
Зарегистрирован: 06.07.2004 (Вт) 12:18
Откуда: г. Егорьевск

Printer

Сообщение Чудик » 10.07.2005 (Вс) 19:33

Принтер имеет нижний лоток и боковой. Можно ли, используя объект Printer, распечатать документ на боковом лотке? Иначе говоря, можно ли как-то определить лоток для печати?
Век живи - век учись!
www.detal-plast.narod.ru

Matew
Постоялец
Постоялец
Аватара пользователя
 
Сообщения: 894
Зарегистрирован: 28.06.2004 (Пн) 17:44
Откуда: Дальний Восток, г. Ха

Сообщение Matew » 11.07.2005 (Пн) 5:58

ООчень сильно удивлюсь, если можно(помойму тут через его драйвера тока получится).

alibek
Большой Человек
Большой Человек
 
Сообщения: 14205
Зарегистрирован: 19.04.2002 (Пт) 11:40
Откуда: Russia

Сообщение alibek » 11.07.2005 (Пн) 8:20

Matew писал(а):ООчень сильно удивлюсь, если можно(помойму тут через его драйвера тока получится).

Удивляйся. Printer.PaperBin
Lasciate ogni speranza, voi ch'entrate.

Matew
Постоялец
Постоялец
Аватара пользователя
 
Сообщения: 894
Зарегистрирован: 28.06.2004 (Пн) 17:44
Откуда: Дальний Восток, г. Ха

Сообщение Matew » 11.07.2005 (Пн) 8:44

КААшмар ! :D

Чудик
Постоялец
Постоялец
Аватара пользователя
 
Сообщения: 639
Зарегистрирован: 06.07.2004 (Вт) 12:18
Откуда: г. Егорьевск

Сообщение Чудик » 11.07.2005 (Пн) 8:48

Спасибо, Алибек! Хорошо, что оказалось так просто!
Век живи - век учись!
www.detal-plast.narod.ru

Шурик
Самогонщик
Самогонщик
Аватара пользователя
 
Сообщения: 1657
Зарегистрирован: 30.06.2003 (Пн) 13:27
Откуда: из запоя :))))) Матных сообщений: 972

Сообщение Шурик » 11.07.2005 (Пн) 8:54

а у некоторых принтеров есть только механическое решение данной проблемы, т.е. ручками, что мне тогда делать :D

tyomitch
Пользователь #1352
Пользователь #1352
Аватара пользователя
 
Сообщения: 12822
Зарегистрирован: 20.10.2002 (Вс) 17:02
Откуда: חיפה

Сообщение tyomitch » 11.07.2005 (Пн) 14:11

Шурик, программируй робота :-D
Изображение

Шурик
Самогонщик
Самогонщик
Аватара пользователя
 
Сообщения: 1657
Зарегистрирован: 30.06.2003 (Пн) 13:27
Откуда: из запоя :))))) Матных сообщений: 972

Сообщение Шурик » 11.07.2005 (Пн) 16:53

Идея, надо только робата, найти)))

Ennor
Конструктивный критик
Конструктивный критик
 
Сообщения: 2504
Зарегистрирован: 18.12.2001 (Вт) 3:58
Откуда: Калуга -> Москва

Сообщение Ennor » 11.07.2005 (Пн) 16:57

Шурик, паяй робота :D

Шурик
Самогонщик
Самогонщик
Аватара пользователя
 
Сообщения: 1657
Зарегистрирован: 30.06.2003 (Пн) 13:27
Откуда: из запоя :))))) Матных сообщений: 972

Сообщение Шурик » 12.07.2005 (Вт) 9:26

пайду схожу на свалку робатов :D

Чудик
Постоялец
Постоялец
Аватара пользователя
 
Сообщения: 639
Зарегистрирован: 06.07.2004 (Вт) 12:18
Откуда: г. Егорьевск

Сообщение Чудик » 12.07.2005 (Вт) 10:04

Перепробовал все константы PaperBin. Ничто не подошло! Что делать?!
Делал как-то так:

Код: Выделить всё
   Printer.Orientation = 1
    Printer.PaperBin = acPRBNCassette
    Me.PrintForm
    Printer.EndDoc


При печати из других программ для использования бокового лотка используется лоток ManualFeed. Может можно куда-нибудь его приписать?
Век живи - век учись!
www.detal-plast.narod.ru

Ennor
Конструктивный критик
Конструктивный критик
 
Сообщения: 2504
Зарегистрирован: 18.12.2001 (Вт) 3:58
Откуда: Калуга -> Москва

Сообщение Ennor » 12.07.2005 (Вт) 10:33

Ну хорошо, а как эти лотки в драйверах принтера называются? И, кстати, не на конверте ли печатать пытаешься?

Чудик
Постоялец
Постоялец
Аватара пользователя
 
Сообщения: 639
Зарегистрирован: 06.07.2004 (Вт) 12:18
Откуда: г. Егорьевск

Сообщение Чудик » 12.07.2005 (Вт) 10:40

Пробовал, и все 13 констант. Всегда печать шла с нижнего лотка. А acPRBNCassette я к примеру, печатаю на А4. А боковой лоток имеено ManualFeed или Multy-Purpose Tray.
Век живи - век учись!
www.detal-plast.narod.ru

Ennor
Конструктивный критик
Конструктивный критик
 
Сообщения: 2504
Зарегистрирован: 18.12.2001 (Вт) 3:58
Откуда: Калуга -> Москва

Сообщение Ennor » 12.07.2005 (Вт) 10:59

13? Вообще-то, их там 12:
Код: Выделить всё
vbPRBNUpper
vbPRBNLower
vbPRBNMiddle
vbPRBNManual
vbPRBNEnvelope
vbPRBNEnvManual
vbPRBNAuto
vbPRBNTractor
vbPRBNSmallFmt
vbPRBNLargeFmt
vbPRBNLargeCapacity
vbPRBNCassette

А еще можно сделать так: залезть в дрова принтера и выставить там лоток, который тебе нужен, после чего печатать как обычно. Согласен, схема не очень красивая.

Чудик
Постоялец
Постоялец
Аватара пользователя
 
Сообщения: 639
Зарегистрирован: 06.07.2004 (Вт) 12:18
Откуда: г. Егорьевск

Сообщение Чудик » 12.07.2005 (Вт) 11:07

есть еще acPRBNFormSource.
А схема в самом деле не очень красивая, но если нет других вариантов, то вопрос - можно ли предложенное сделать программно? (т.е. залезть в дрова принтера и выставить лоток)
Век живи - век учись!
www.detal-plast.narod.ru

Ennor
Конструктивный критик
Конструктивный критик
 
Сообщения: 2504
Зарегистрирован: 18.12.2001 (Вт) 3:58
Откуда: Калуга -> Москва

Сообщение Ennor » 12.07.2005 (Вт) 12:49

Епрст! Так ты из Аксесса печатаешь!

В моем выпуске MSDN есть статья как раз на эту тему - "Programming Printer Settings in Microsoft Access 2002". Она находится в разделе Technical Articles. Там есть даже пример, кажется, по установке свойств печати. Найти ее довольно просто - задай поиск по этой самой потерянной константе - в обычном VB ее нет :).

Чудик
Постоялец
Постоялец
Аватара пользователя
 
Сообщения: 639
Зарегистрирован: 06.07.2004 (Вт) 12:18
Откуда: г. Егорьевск

Сообщение Чудик » 12.07.2005 (Вт) 12:56

Да, нет! Не из Access! Я просто 13-ю константу указал! Печать делаю из VB!
Век живи - век учись!
www.detal-plast.narod.ru

Чудик
Постоялец
Постоялец
Аватара пользователя
 
Сообщения: 639
Зарегистрирован: 06.07.2004 (Вт) 12:18
Откуда: г. Егорьевск

Сообщение Чудик » 13.07.2005 (Ср) 15:32

Пришлось при помощи API диалог печати вызывать, где можно менять лотки. Не к месту, но по-другому, как говорил ранее, не получается.
Век живи - век учись!
www.detal-plast.narod.ru


Вернуться в Visual Basic 1–6

Кто сейчас на конференции

Сейчас этот форум просматривают: AhrefsBot, SemrushBot и гости: 44

    TopList