ReSQL.ru
     
powered by simpleCommunicator - 2.0.51     © 2025 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Проблема с выводом на печать
4 сообщений из 104, страница 5 из 5
  5  все
Проблема с выводом на печать
    #40084962
ROI
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ROI
Участник
Wawan2005
DarkMan,

В том то и фишка, пользовать программу будут дикие юзвери, и чем меньше у них возможности накосячат тем лучше, а косячат они профессионально, в следствии чего я и хочу прописывать настройки прямо в приложении, а в идеале тупо жёстко прописать, без права выбора, ибо нех.

Да, не забудьте, что есть разница в доступе к настройкам локального и сетевого принтера
...
Рейтинг: 0 / 0
21.07.2021, 06:28
| Ответить | Цитировать | Написать  
Проблема с выводом на печать
    #40085108
Wawan2005
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Wawan2005
Гость
ROI,

Настройка проходит пока на локальном, Canon iP7240, всё равно не работает.
...
Рейтинг: 0 / 0
21.07.2021, 15:12
| Ответить | Цитировать | Написать  
Проблема с выводом на печать
    #40085147
Wawan2005
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Wawan2005
Гость
Подскажите пожалуйста как адаптировать данный пример под дуплек

https://docs.microsoft.com/ru-ru/office/vba/api/access.form.prtdevmode
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
Свойство Printer.Duplex (Доступ)
23.03.2019
Чтение занимает 2 мин

Возвращает или задает констант AcPrintDuplex, указывающее, как указанный принтер обрабатывает двуплексную печать. Для чтения и записи.

Синтаксис
выражения. Duplex

выражение Переменная, представляюная объект Принтер.

Пример
В следующем примере заданы различные параметры принтера для формы, указанной в аргументе strFormname процедуры.


Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
29.
30.
31.
32.
33.
34.
35.
36.
37.
Sub SetPrinter(strFormname As String) 
 
 DoCmd.OpenForm FormName:=strFormname, view:=acDesign, _ 
 datamode:=acFormEdit, windowmode:=acHidden 
 
 With Forms(form1).Printer 
 
 .TopMargin = 1440 
 .BottomMargin = 1440 
 .LeftMargin = 1440 
 .RightMargin = 1440 
 
 .ColumnSpacing = 360 
 .RowSpacing = 360 
 
 .ColorMode = acPRCMColor 
 .DataOnly = False 
 .DefaultSize = False 
 .ItemSizeHeight = 2880 
 .ItemSizeWidth = 2880 
 .ItemLayout = acPRVerticalColumnLayout 
 .ItemsAcross = 6 
 
 .Copies = 1 
 .Orientation = acPRORLandscape 
 .Duplex = acPRDPVertical 
 .PaperBin = acPRBNAuto 
 .PaperSize = acPRPSLetter 
 .PrintQuality = acPRPQMedium 
 
 End With 
 
 DoCmd.Close objecttype:=acForm, objectname:=strFormname, _ 
 Save:=acSaveYes 
 
 
End Sub
...
Рейтинг: 0 / 0
21.07.2021, 16:29
| Ответить | Цитировать | Написать  
Проблема с выводом на печать
    #40103057
FeelYou
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
FeelYou
Гость
Wawan2005,

Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
Dim CurrRep As Report
On Error Resume Next
Set CurrRep = Screen.ActiveReport
If Err.Number = 0 Then
   If Left$(CurrRep.Printer.DeviceName, 3) <> "PDF" Then
      Select Case CurrRep.Name
         Case "ФАКТУРА", "НАКЛАДНАЯ" ' и тп с ландшафтной ориентацией
            CurrRep.Printer.Duplex = acPRDPHorizontal ' 2 Double-sided printing using a horizontal page turn
         Case Else
            CurrRep.Printer.Duplex = acPRDPVertical ' 3 Double-sided printing using a vertical page turn
      End Select
   End If
   'DoCmd.OpenReport CurrRep.Name, acViewNormal
Else
   ' смена настроек доступна только для отчетов
End If



и еще было припоминаю, что на МФУ HP M426 если настройки дуплекса заданы через вэб-морду сетевого принтера, то на программное изменение на терминальном клиенте не реагировало (2008R2 + A2003 если что)
...
Рейтинг: 0 / 0
08.10.2021, 14:11
| Ответить | Цитировать | Написать  
4 сообщений из 104, страница 5 из 5
  5  все
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Проблема с выводом на печать
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
NoSQL.ru       Новости, Чат       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=45&msg=40084962&tid=1609582]:
 0ms
get settings:
 9ms
get forum list:
 14ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 123ms
get topic data:
 9ms
get forum data:
 2ms
get page messages:
 38ms
get tp. blocked users:
 1ms
others: 256ms
total:  458ms
созд. / загр.: 458ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]