По теме из базы знаний
Ответы
Подписаться на ответы
Инфостарт бот
Сортировка:
Древо развёрнутое
Свернуть все
Проблема решается следующим образом:
1. Название принтера (и естественно шары) как можно короче. Без пробелов и прочих понтов (например НР2015 - и все!).
2. При печати в ПараметрыСтраницы() указывать явно имя принтера (это может быть любой доступный принтер и естественно принтер по умолчанию).
Или
ПараметрыСтраницы(...,1); - То есть вместо принтера указываем 1.
3. И еще вариант
Перем PrinterDefault Экспорт;
wshPrint = CreateObject("WScript.Shell");
Prn = wshPrint.RegRead("HKCU\Software\Microsoft\Windows NT\CurrentVersion\Windows\Device");
ПозЗпт = Найти(Prn, ",");
PrinterDefault = Лев(Prn, ПозЗпт - 1);
// Вместо PrinterDefault (по умолчанию) Моно указать любой принтер
Таб2.ПараметрыСтраницы(2,,1,5,5,5,5,5,5,1,1, PrinterDefault);
Таб2.Напечатать(1);
// Восстанавливаем имя принтера по умолчанию в реестре
Попытка
ИмяБазы = Аддон.ReadRegistry(0, "Software\1C\1Cv7\7.7\Titles", КаталогБазыДанных());
Ключ = "Software\1C\1Cv7\7.7\" + ИмяБазы + "\V7\" + ИмяПользователя() + "\Moxel\Default";
Рарус.regOpen();
Рарус.regOpenKey(Ключ);
Рарус.regWriteValue("DefaultPrinter", PrinterDefault);
Рарус.regClose();
Исключение
КонецПопытки;
1. Название принтера (и естественно шары) как можно короче. Без пробелов и прочих понтов (например НР2015 - и все!).
2. При печати в ПараметрыСтраницы() указывать явно имя принтера (это может быть любой доступный принтер и естественно принтер по умолчанию).
Или
ПараметрыСтраницы(...,1); - То есть вместо принтера указываем 1.
3. И еще вариант
Перем PrinterDefault Экспорт;
wshPrint = CreateObject("WScript.Shell");
Prn = wshPrint.RegRead("HKCU\Software\Microsoft\Windows NT\CurrentVersion\Windows\Device");
ПозЗпт = Найти(Prn, ",");
PrinterDefault = Лев(Prn, ПозЗпт - 1);
// Вместо PrinterDefault (по умолчанию) Моно указать любой принтер
Таб2.ПараметрыСтраницы(2,,1,5,5,5,5,5,5,1,1, PrinterDefault);
Таб2.Напечатать(1);
// Восстанавливаем имя принтера по умолчанию в реестре
Попытка
ИмяБазы = Аддон.ReadRegistry(0, "Software\1C\1Cv7\7.7\Titles", КаталогБазыДанных());
Ключ = "Software\1C\1Cv7\7.7\" + ИмяБазы + "\V7\" + ИмяПользователя() + "\Moxel\Default";
Рарус.regOpen();
Рарус.regOpenKey(Ключ);
Рарус.regWriteValue("DefaultPrinter", PrinterDefault);
Рарус.regClose();
Исключение
КонецПопытки;
Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот