Программа для печати всех файлов из указанной папки

@lemuriec · Регистрация: 30.03.2010

Добрый день! Весь интеренет облазил не могу найти прогу которая будет печатать файл попадающий в указанную папку и после печати удалять его( Я сам не программист, и поэтому прошу Вас если можете напишите эту программку... Если найдутся добрые люди вышлите ее на мой e-mail пожалуйста: lemuriec@bk.ru.

С уважением, lemuriec.

oxotnik · 30.03.2010, 11:10

файлы какого типа надо печатать?

@lemuriec · 30.03.2010, 11:12 **[ТС]**

Файлы любого типа. Но приоритет PDF файлу) потому что в основном будут печататься они.

oxotnik · 30.03.2010, 11:24

боюсь, что таких программ (которые могут печатать все) не существует

@lemuriec · 30.03.2010, 11:32 **[ТС]**

а которые печатают PDF?

Добавлено через 3 минуты
У меня есть VBScript который распечатывает все doc файлы из указанной папки. Есть возможность его доработать?

Добавлено через 1 минуту
Вот ссылка на ресурс: Ссылки на форумы запрещены
А вот сам скрипт

Код:

Visual Basic

Option Explicit
 
Const wdDoNotSaveChanges    =  0
Const wdPromptToSaveChanges = -2
Const wdSaveChanges         = -1
 
 
Dim objWord, objDoc, objFS, objFolder, objItem
 
Set objFS = CreateObject("Scripting.FileSystemObject")
Set objFolder = objFS.GetFolder("c:\work\temp\") 'Папка, из которой производится печать
Set objWord = WScript.CreateObject("Word.Application")
 
    For Each objItem In objFolder.Files
        If StrComp(objFS.GetExtensionName(objItem.Name), "doc", vbTextCompare) = 0 Then
            With objWord
                Set objDoc = .Documents.Open(objItem.Path, False, True, False)
                objDoc.PrintOut False
                Set objDoc = Nothing
            End With
            
        End If
    Next
objWord.Quit
Set objWord = Nothing
WScript.Quit 0

@lemuriec · 13.04.2010, 10:23 **[ТС]**

Мда(( горе программисты тут((( никто не помог!!!

oxotnik · 13.04.2010, 10:33

Сообщение от lemuriec

Мда(( горе программисты тут((( никто не помог!!!

а ты не подумал, что твоя задача может быть просто не интересна и банальна? так зачем париться и решать ее за просто так?

@lemuriec · 13.04.2010, 10:36 **[ТС]**

настолько банальна?) интересно почему же тогда в сети нет на нее ответа??? видимо просто кое кто не может ее решить! удачи! спасибо за "помощь". А за не "просто так" я ее и без вас решу! Существует куча нормальных форумов где помогут!

@res · 13.04.2010, 10:43

школота отакует.
Если деньги есть то те сделают, а так х*8 с маслом при таком обращение

oxotnik · 13.04.2010, 10:44

Сообщение от lemuriec

интересно почему же тогда в сети нет на нее ответа???

потому что банальна

Сообщение от lemuriec

видимо просто кое кто не может ее решить!

вроде как писал что могу, и более того есть наполовину решенная (но то был коммерческий продукт)

@alex_x_x · 13.04.2010, 20:58

oxotnik, а какого рода идея, ActiveX?)

@lemuriec 11 / 11 / 2 Регистрация: 30.03.2010 Сообщений: 172
		1
	Программа для печати всех файлов из указанной папки 30.03.2010, 11:07. Просмотров 6817. Ответов 10 Метки нет (Все метки) Добрый день! Весь интеренет облазил не могу найти прогу которая будет печатать файл попадающий в указанную папку и после печати удалять его( Я сам не программист, и поэтому прошу Вас если можете напишите эту программку... Если найдутся добрые люди вышлите ее на мой e-mail пожалуйста: lemuriec@bk.ru. С уважением, lemuriec. 0

oxotnik 1663 / 1132 / 80 Регистрация: 21.08.2008 Сообщений: 4,725 Записей в блоге: 1
	30.03.2010, 11:10	2
	файлы какого типа надо печатать? 1

@lemuriec 11 / 11 / 2 Регистрация: 30.03.2010 Сообщений: 172
	30.03.2010, 11:12 [ТС]	3
	Файлы любого типа. Но приоритет PDF файлу) потому что в основном будут печататься они. 0

oxotnik 1663 / 1132 / 80 Регистрация: 21.08.2008 Сообщений: 4,725 Записей в блоге: 1
	30.03.2010, 11:24	4
	боюсь, что таких программ (которые могут печатать все) не существует 1

@lemuriec 11 / 11 / 2 Регистрация: 30.03.2010 Сообщений: 172
	13.04.2010, 10:23 [ТС]	6
	Мда(( горе программисты тут((( никто не помог!!! 0

oxotnik 1663 / 1132 / 80 Регистрация: 21.08.2008 Сообщений: 4,725 Записей в блоге: 1
	13.04.2010, 10:33	7
	Сообщение от lemuriec Мда(( горе программисты тут((( никто не помог!!! а ты не подумал, что твоя задача может быть просто не интересна и банальна? так зачем париться и решать ее за просто так? 1

@lemuriec 11 / 11 / 2 Регистрация: 30.03.2010 Сообщений: 172
	13.04.2010, 10:36 [ТС]	8
	настолько банальна?) интересно почему же тогда в сети нет на нее ответа??? видимо просто кое кто не может ее решить! удачи! спасибо за "помощь". А за не "просто так" я ее и без вас решу! Существует куча нормальных форумов где помогут! 0

@res 85 / 9 / 1 Регистрация: 05.04.2010 Сообщений: 143
	13.04.2010, 10:43	9
	школота отакует. Если деньги есть то те сделают, а так х*8 с маслом при таком обращение 0

oxotnik 1663 / 1132 / 80 Регистрация: 21.08.2008 Сообщений: 4,725 Записей в блоге: 1
	13.04.2010, 10:44	10
	Сообщение от lemuriec интересно почему же тогда в сети нет на нее ответа??? потому что банальна Сообщение от lemuriec видимо просто кое кто не может ее решить! вроде как писал что могу, и более того есть наполовину решенная (но то был коммерческий продукт) 0

@alex_x_x бжни 2472 / 1681 / 135 Регистрация: 14.05.2009 Сообщений: 7,162
	13.04.2010, 20:58	11
	oxotnik, а какого рода идея, ActiveX?) 0

Опции темы