fila de impressao via five

[Vitor Reis]

estou pensando um programa tipo assim:

tudo que tiver numa determinada pasta.. eu mando para uma determinada impressora... pré definida que está conectada direto no micro que estará rodando esse executavel..

é possivel ???

tipo assim.. mando imprimir.. e excluo o arquivo .. pode ser arquivos pdf..

como se fosse numa fila de impressoes

será que consegui explicar o que preciso ?

vitor.reis@terra.com.br

whats (11) 9-7414-4341

[crisvam]

estou pensando um programa tipo assim:

tudo que tiver numa determinada pasta.. eu mando para uma determinada impressora... pré definida que está conectada direto no micro que estará rodando esse executavel..

é possivel ???

tipo assim.. mando imprimir.. e excluo o arquivo .. pode ser arquivos pdf..

como se fosse numa fila de impressoes

será que consegui explicar o que preciso ?

vitor.reis@terra.com.br

whats (11) 9-7414-4341

Olha eu me esforçei mas não entendi. desenha aí vai.

[kleyber]

É como se você colocasse os nomes dos arquivos em um array, daí pega o primeiro, manda imprimir e apaga esse ítem do array; vai fazendo a mesma coisa com todos os outros, até acabar os ítens do array. É assim, Vitor?

[sistem]

ola, uma ideia

criar um arquivo de texto na pasta, ex: teste.txt...

o conteudo desse aquivo fica o nome de uma impressora que esta instalda no windows...

dai quando for imprimir algun arquivo verificar o caminho completo do arquivo(para desscobrir a pasta) em que este arquivo se encontra...

dai ler o conteudo do teste.txt...

colocar a impressora como default (o nome da impressora fica no teste.txt)

dai eh imprimir o arquivo que deseja

acho quee deve ter algo melhor

[Vitor Reis]

isso é facil de fazer.. buscar pelo array arquivos de pastas.. e excluir depois.. quero saber como imprimir um pdf pronto... isto é.. pego o arquivo em pdf e mando imprimir numa determinada impressora.. como fazer ?

não consegui pensar como.. estou ficando muito velho mesmo...

[Vitor Reis]

resolvido assim

vPdf:="c:\pen\sql\danfe.pdf"

Winexec("c:\pen\sql\sumatraPDF\sumatrapdf.exe -print-to-default "+vPdf)

[rochinha]

Amiguinhos,

Tirando como base um trecho da minha PRNEnd():

nEspera      := 5

aArquivosEXT := { "TXT", "RTF", "DOC" }

FOR iArquivosTXT = 1 to len( aArquivosEXT )


   cExtensao := aArquivosEXT[ iArquivosEXT ]

   CONTADOR  := ADIR( "*."+cExtensao )

   IF CONTADOR != 0

      DECLARE TXT_NOMES[ CONTADOR ]

      ADIR( "*."+cExtensao, TXT_NOMES )

      FOR CONTADOR := 1 TO LEN( TXT_NOMES )

          PRNcFile := cPath + TXT_NOMES[CONTADOR]

          do case


             case cEmiteMotor = "TYPE"

                  WaitRun( "type " + PRNcFile + " > " + cPorta + " " , 0 )


             case cEmiteMotor = "PRINTRAW"

 WaitRun( "printraw.exe " + PRNcFile + " " + cPorta, 0 )


             case cEmiteMotor = "PRINT" .or. cEmiteMotor = "PRINT.EXE" .or. cEmiteMotor = "USB"

 WaitRun( "print.exe /D:" + cPorta + " " + PRNcFile, 0 )


             case cEmiteMotor = "COPY" .or. cEmiteMotor = "COPYFILE"

                  __CopyFile( PRNcFile, cPorta )


             case cEmiteMotor = "COMMAND" .or. cEmiteMotor = "COMMAND.COM" 

                  WaitRun( "%comspec% /c copy /b " + PRNcFile + " " + cPorta + "" , 0 )


             case cEmiteMotor = "WRITE"

                  WaitRun( "write " + PRNcFile + "/p" )


             case cEmiteMotor = "WORD"

                  RTF2Print( PRNcFile )


             case cEmiteMotor = "WAPI" 

                  WaitRun( [WAPI -PRINT:"]+cPorta+[";]+PRNcFile+[;"Impressao";RESULTA.TXT], 7 )


             case cEmiteMotor = "WSCRIPT" 

                  RUNWExec( "%comspec% /c copy /b " + PRNcFile + " " + cPorta + "" )


             case cEmiteMotor = "ECF" 

                  //

          endcase

          SysWait( nEspera )

          if file( PRNcFile )

             fErase( PRNcFile )

          endif

      NEXT

   ENDIF


NEXT