Столкнулся с очередной проблемой, все хорошо, все работает, ниже скрипт на распечатку документов в формате doc.
Option Explicit : Dim objWord, objDoc, wssh, objFS, objPath, objFolder, objItem, ques
Const wdDoNotSaveChanges = 0
Const wdPromptToSaveChanges = -2
Const wdSaveChanges = -1
Set wssh = CreateObject("WScript.Shell")
Set objFS = CreateObject("Scripting.FileSystemObject")
Set objPath = objFS.GetFolder("E:\") 'Папка, из которой производится печать
Do
PrintDelInFolder objPath
WScript.Sleep 1000
If Minute(Time)=0 and Second(Time)<5 then 'условие проверки времени для вывода на экран вопроса о завершении своей работы
ques=wssh.Popup("Не желаете завершить работу скрипта автопечати документов?"&vbCrLf&"Следующий запрос будет через час...",, "Скрипт автопечати | Lucky edited", 36)
if ques=6 then WScript.Quit
WScript.Sleep 5000
End If
Loop
Sub PrintDelInFolder(objFolder)
For Each objItem In objFolder.Files
If StrComp(objFS.GetExtensionName(objItem.Name), "doc", vbTextCompare) = 0 Then
With WScript.CreateObject("Word.Application")
Set objDoc = .Documents.Open(objItem.Path, False, True, False)
objDoc.PrintOut False
.Quit
Set objDoc = Nothing
WScript.Sleep 500
objFS.DeleteFile objItem.Path ',true 'если надо удалять и доки с атрибутом "Только чтение" - уберите символ ' перед true
End With
End If
Next
End Sub
Set objWord = Nothing
WScript.Quit 0
НО, присудствует следующая проблема. В названии моего принтера (Подключенном USB устройстве), есть некий смвол "" и когда сделать автоматическое монтирование USB устройств, то после закрытии и последующем открытии VirtualBOX я вижу следующее сообщение:
PCDATA invalid Char value 1.
Location: '/home/skorpions2000/VirtualBox VMs/XP/XP.vbox', line 59 (1), column 137.
/build/virtualbox-VDAABr/virtualbox-4.3.36-dfsg/src/VBox/Main/src-server/MachineImpl.cpp[731] (nsresult Machine::registeredInit()).
Код ошибки:
NS_ERROR_FAILURE (0x80004005)
Компонент:
Machine
Интерфейс:
IMachine {480cf695-2d8d-4256-9c7c-cce4184fa048}
Прикреплено изображение:
Данную проблему вызывает вот эта строка, которая содержит этот нечитаемый символ(и скрин под споллером):
<DeviceFilters>
<DeviceFilter name="Canon,Inc. MF5750" active="true" vendorId="04a9" productId="265e" revision="0000" manufacturer="Canon,Inc." product="MF5750" serialNumber="2259T1223012" remote="0"/>
</DeviceFilters>
(Проблемные места подчеркнул красным)
Вопрос заключается вот в чем. Как в системе Ubuntu дать свое имя подключаемому устройству USB, чтобы это устройство не использовало этот "" символ в названии. Или же, как можно еще решить данную проблему?
P.S. Смотрю что на сайте мои кавычки пусты, и этот символ вообще никак не отображается, добавлю скрин списка устройств, там тоже видно этот символ. (Работа с другими устройствами, никаких проблем не вызывает)