Convertire automată a fişierelor WORD dintr-un folder în fişiere PDF

Dacă trebuiesc convertite nai multe fişiere WORD dintr-un folder în fişiere PDF se poate folosi următorul script VB care realizează conversia automată.

Descărcaţi fişierul Script

sau încărcaţi intr-un fişier vbs următoarele instrucţiuni


Dim objFSO,objFile, objFolder,wordapp,doc,PDFPath,strFileName,fullPath

Set objFSO = CreateObject("Scripting.FileSystemObject")
objStartFolder = InputBox("Please enter full folder name :", _
    "Create PDF files from Word files in a folder")
If  objStartFolder = "" Then
   Wscript.Echo "You must enter a full folder name."
Else
     MsgBox "Please ensure Word documents are saved,if that press 'OK' to continue",,"Warning"
     Set objFolder = objFSO.GetFolder(objStartFolder)
     Set colFiles = objFolder.Files

    For Each objFile in colFiles
    strFileName = objFile.Name
        If ((objFSO.GetExtensionName(strFileName) = "doc") Or  (objFSO.GetExtensionName(strFileName) = "docx") Or (objFSO.GetExtensionName(strFileName) ="rtf"))Then
    
    
        Dim strComputer,objWMIService,colProcessList,objProcess
        strComputer = "."
        Set objWMIService = GetObject("winmgmts:" _
        & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
        'Get the WinWord.exe
        Set colProcessList = objWMIService.ExecQuery _
        ("SELECT * FROM Win32_Process WHERE Name = 'WINWORD.EXE'")
        For Each objProcess in colProcessList
        'Stop it
        objProcess.Terminate()
        Next
   

                fullPath = (objStartFolder & "\" & strFileName)
                Set objFS = CreateObject("Scripting.FileSystemObject")
                baseName = objFS.GetBaseName(fullPath)
                Set objFS = Nothing
                PDFPath = objStartFolder & "\" & baseName & ".pdf"
                Set wordapp = CreateObject("Word.application")
                Set doc = wordapp.documents.open(fullPath)
                doc.saveas PDFPath,17
                doc.close
                wordapp.quit
 
 
        End If


    next
  
  
  
    End If

Set objFSO = Nothing
Wscript.Echo "Word to PDF file conversion is complete "










NB Pentru ca scriptul să funcţioneze sunt necesare
-cont administrator cu  UAC not at very high

-office 2007 or later editions

Utilizare terminal 'console' device Cisco sub Debian OS

Descarcă articolul sub format PDF

Pentru conexiunea terminal device Cisco se foloseşte un cablu de legătură serial(PC) – RJ45 (device Cisco). Acest cablu va face legătura dintre un port serial PC şi port consolă device Cisco.

Pentru a identifica portul serial PC se foloseşte următoarea comandă

 dmesg | egrep --color 'serial|ttyS'

După rulare se for afişa informaţiile despre portul serial.Exemplu:

[    1.578258] serial8250: ttyS0 at I/O 0x3f8 (irq = 4) is a 16550A

Aceleaşi informaţii pot fi obţinute cu ajutorul programului setserial instalat cu comanda apt-get install setserial. Pentru a obţine informaţiile dorite se rulează comanda   setserial -g /dev/ttyS[0123]

După rulare se for afişa informaţiile despre portul/porturile seriale.Exemplu:

/dev/ttyS0, UART: 16550A, Port: 0x03f8, IRQ: 4

/dev/ttyS1, UART: 16550A, Port: 0x02f8, IRQ: 3

/dev/ttyS2, UART: unknown, Port: 0x03e8, IRQ: 4

/dev/ttyS3, UART: unknown, Port: 0x02e8, IRQ: 3

În acest caz avem 2 porturi seriale cu chipset 16550A

Pentru a accesa terminalul serial se execută următoarea comandă

screen /dev/ttyS0 9600 8N1

Dacă terminalul serial cisco a fost setat la altă viteza trebuie modificată valoaea 9600 cu valoarea respectivă.

8N1 reprezintă  (8) biţi de informaţie , fără (N) bit paritate şi un (1) bit de stop.

Comenzi terminal screen

Majoritatea comenzilor sunt compuse din succesiuna  Ctrl + a + tastă

De exemplu Ctrl + a + ?  vă arată lista comenzilor disponibile. De notat este faptul că pentru a facilita configurarea dispoyitivelor prin terminalul serial comenzile screen sunt disponibile numai după secvenţa de taste Ctrl + a

Creare fereastră nouă  Comandă: Ctrl + a + c

Comutare între ferestre Comandă: “Ctrl + a + n  următoarea fereastră şi  Ctrl + a + p  pentru fereastra anterioară.

Fiecare fereastră va rula până când va fi închisă.

Detaşare fereastră curentă Comandă: Ctrl + a + d

O fereastră detaşată poate fi ataşată ulterior cu comanda screen -r

Dacă apar erori la conexiunea serială detaşarea se execută automat.

Notă detaşarea unei ferestre nu înseamnă închiderea acelei ferestre.

Reataşare ferestre multile

Dacă sunt mai multe ferestre detaşate ataşarea se efectuează cu comanda  screen -r  41844.tty1.nameofpc unde 41844.tty1.nameofpc este indicativul de terminal.

Înregistrare comenzi hiperterminal

Cu ajutorul comenzii Ctrl + a + H  se înregistrează comenzile rulate. Apar fişierele hardcopy.0 1 2 etc.

Setare mesaje alertă

Screen poate monitoriza o fereastră pentru activitate/inactivitate cu ajutorul Ctrl + a + M

Screen va lansa o alertă în parte inferioară a ecranului atunci când apare/dispare  o activitate în fereastra monitorizată

Pentru a anula afişările rezultatului comenzilor se foloseşte comanda  Ctrl +A +_

Blocare sesiune Screen Locking Your Screen Session

Dacă este necesară blocarea temporară a sesiunii screen se foloseşte comanda Ctrl +a +x. 

Pentru relogare se va cere parola corespunzătoare utilizatorului activ de exemplu: 

1 2	Screen used by root . Password:

Închidere Screen

Se realizează cu ajutorul comenzii  Ctrl + a + k + y

Bottom of Form

Transformare multiple documente Word în multiple fişiere PDF

Descarcă articolul sub format fişier PDF

1. Lansează în execuţie Acrobat Pro. Click File > Create PDF > Batch Create Multiple Files...

2. Apare o fereastră în care vi se va solicita să selectaţi fişierele de transformat. Se va da click pe  Add Files > Add Files... SAU  Add Folders...  Dacă doriţi transformarea fişierelor dintr-un folder navigaţi până la acel folder şi după aceea daţi click pe OK pentru a transforma fişierele din acel folder. De asemenea se poate selecta mai multe fişiere şi folosind drag and drop se trimit în lista de transformat în PDF. De asemenea folosind butonul remove se pot înlătura fişierele care nu trebuiesc transformate în PDF.

3. După finalizarea listei cu fişierele de transformat se dă OK . Apare fereastra Output Options.  Înaceastă fereastră se va selecta locul unde vor fi plasate fişierele PDF create (în acelaşi folder sau într-un alt folder, să se păstreye numel original sau să se adauge la înainte de numele original un prefix şi/sau după numele original un sufix). Setarea uzuală este acelaşi folder cu acelaşi nume. 

4. După ce se dă click pe OK se vor transforma toate fişierele din listă fără intervenţia utilizatorului. Se poate anula în orice moment procesul de transformare dând click pe Cancel. Este un proces care solicită din plin resursele calculatorului şi poate determina în anumite configuraţii hardware execuţia noilor comenzi ale utilizatorului după finalizarea procesului de transformare. La final toate fişierele din listă vor fi transformate în fişiere PDF.