Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

tiagoluizmartins

ajuda com php para executar um arquivo .vbs no servidor

Recommended Posts

olá tenho um programa que faz consultas mysql e oci e gera cupons em um determinada pasta do servidor em formatos .txt aconteceu que presciso mandar esses cupons para impressoras em rede um por um para que a impressora possa picotar o papel após o termino deles para isso estou usando um .vbs onde o mesmo seleciona todos os arquivos .txt seta a impressora em rede como padrao e manda imprimir todos os arquivos desta pasta, este vbs funciona normal quando dado dois cliques nele, o problema é que eu preciso que o php mande executar ele, eu tentei a funçao  

 

  exec ("imprimir.vbs"); \\ assim o navegador fica carregando sem parar e nada acontece

 

tentei também criar um bat e este por sua vez chamar o vbs

exec ("imp.bat"); \\ pagina carrega normal porém nao é executado o vbs no mesmo bat coloquei comandos para copy e renomear arquivos como teste para ver se ta passando, verificando que somente a parte do vbs nao é chamada

 

tentei também a função shell_exec

 

shell_exec (start cscript "d:\xampp\htdocs\vale\teste\imprimir.vbs"); \\ assim o navegador fica carregando sem parar e nada acontece também

 

por ultimo tentei a função COM, sendo a mesma abilitada no php.ini e com a devida extensão na pasta

/* Defina o caminho para o arquivo(s) */
$command = 'wscript.exe d:/xammp/htdocs/vale/teste/imprimir.vbs';
// Executa os arquivos/comandos
$obj = new COM ( 'WScript.Shell' );
if ( is_object ( $obj ) )
{
    $obj->Run ( 'cmd /C ' . $command, 0, FALSE );
}

else

{
    echo 'Não foi possível criar o objeto!';
}
 
$obj = null;

// desta forma a pagina carrega normal sem dar erro algum porem nada acontece

 

 

segue arquivos em anexo para tal visualização, por favor me ajudem.

 

teste.php

imp.bat

imprimir.vbs

Compartilhar este post


Link para o post
Compartilhar em outros sites

@tiagoluizmartins, primeiro tente executar esse .vbs usando apenas o cmd do windows, pois se nem ai estiver imprimindo, então não adianta tentar nada com PHP. Caso positivo, use o mesmo script que usou no cmd com uma das sugestões abaixo e nos de um retorno.


exec('wscript "D:/xammp/htdocs/vale/teste/imprimir.vbs"');

# Ou

$shell = new COM('WScript.Shell');
$shell->run('php D:/xammp/htdocs/vale/teste/imprimir.vbs', 0, false);

 

Compartilhar este post


Link para o post
Compartilhar em outros sites
46 minutos atrás, EdCesar disse:

@tiagoluizmartins, primeiro tente executar esse .vbs usando apenas o cmd do windows, pois se nem ai estiver imprimindo, então não adianta tentar nada com PHP. Caso positivo, use o mesmo script que usou no cmd com uma das sugestões abaixo e nos de um retorno.



exec('wscript "D:/xammp/htdocs/vale/teste/imprimir.vbs"');

# Ou

$shell = new COM('WScript.Shell');
$shell->run('php D:/xammp/htdocs/vale/teste/imprimir.vbs', 0, false);

@EdCesar, sim ele executa e imprimi mandando via cmd ou dando dois clicks nele, a primeira opção 

exec('wscript "D:/xammp/htdocs/vale/teste/imprimir.vbs"');

não da erro porem a pagina fica carregando eternamente

 

a segunda opção 

 

$shell = new COM('WScript.Shell');
$shell->run('php D:/xammp/htdocs/vale/teste/imprimir.vbs', 0, false);

 no navegador da esse erro no caso a linha 11  do codigo teste.php meu é codigo abaixo as anteriores são testes que estão comentados 

 

$shell->run('php D:/xammp/htdocs/vale/teste/imprimir.vbs', 0, false);

 

Fatal error: Uncaught exception 'com_exception' with message '<b>Source:</b> Unknown<br/><b>Description:</b> Unknown' in D:\xampp\htdocs\vale\teste\teste.php:11 Stack trace: #0 D:\xampp\htdocs\vale\teste\teste.php(11): com->run('php D:/xammp/ht...', 0, false) #1 {main} thrown in D:\xampp\htdocs\vale\teste\teste.php on line 11 

 

no meu php.ini esta ativado a extensão php_com_dotnet

PHP Version 5.6.15

System Windows NT WEB-HOST-2 6.1 build 7600 (Windows Server 2008 R2 Standard Edition) i586
Build Date Oct 29 2015 12:34:05
Compiler MSVC11 (Visual C++ 2012)
Architecture x86
Configure Command cscript /nologo configure.js "--enable-snapshot-build" "--disable-isapi" "--enable-debug-pack" "--without-mssql" "--without-pdo-mssql" "--without-pi3web" "--with-pdo-oci=c:\php-sdk\oracle\x86\instantclient_12_1\sdk,shared" "--with-oci8-12c=c:\php-sdk\oracle\x86\instantclient_12_1\sdk,shared" "--enable-object-out-dir=../obj/" "--enable-com-dotnet=shared" "--with-mcrypt=static" "--without-analyzer" "--with-pgo"
Server API Apache 2.0 Handler

 

com_dotnet

COM support enabled
DCOM support disabled
.Net support enabled
Directive Local Value Master Value
com.allow_dcom 0 0
com.autoregister_casesensitive 1 1
com.autoregister_typelib 0 0
com.autoregister_verbose 0 0
com.code_page no value no value
com.typelib_file no value no value

Core

PHP Version 5.6.15

Compartilhar este post


Link para o post
Compartilhar em outros sites

Veja essa nota na documentação do exec

 

Nota:

Se um programa é iniciado com esta função, e deseja que ele continue rodando em background, a saída do programa precisa ser redirecionada para um arquivo ou outro output stream. Se isso não é feito, o que irá ocorrer é que o PHP ficará esperando até que a execução do programa termine.
 

http://php.net/manual/pt_BR/function.exec.php

Então tente isso:

exec('wscript "D:/xammp/htdocs/vale/teste/imprimir.vbs" > impressaolog.txt');


Se também não entendi errado, se colocar o & o php não aguardara o retorno
 

exec('wscript "D:/xammp/htdocs/vale/teste/imprimir.vbs" &');


Caso ainda não de certo, só confirme duas coisas que não ficou claro:
Você disse que a primeira opção "não da erro porem a pagina fica carregando eternamente", ok, mas imprime?
Qual o comando que você esta usando para imprimir pelo cmd?

Compartilhar este post


Link para o post
Compartilhar em outros sites
22 minutos atrás, EdCesar disse:

Veja essa nota na documentação do exec

 

Nota:

Se um programa é iniciado com esta função, e deseja que ele continue rodando em background, a saída do programa precisa ser redirecionada para um arquivo ou outro output stream. Se isso não é feito, o que irá ocorrer é que o PHP ficará esperando até que a execução do programa termine.
 

http://php.net/manual/pt_BR/function.exec.php

Então tente isso:


exec('wscript "D:/xammp/htdocs/vale/teste/imprimir.vbs" > impressaolog.txt');


Se também não entendi errado, se colocar o & o php não aguardara o retorno
 


exec('wscript "D:/xammp/htdocs/vale/teste/imprimir.vbs" &');


Caso ainda não de certo, só confirme duas coisas que não ficou claro:
Você disse que a primeira opção "não da erro porem a pagina fica carregando eternamente", ok, mas imprime?
Qual o comando que você esta usando para imprimir pelo cmd?

 

não não imprime!!!

 

desse dois modos fica carregando eternamente do primeiro jeito cria um arquivo de log em txt porem ele esta em branco e nao imprimi nada em nenhum dos dois!

 

para imprimir estou usando um script.vbs que no caso o nome é imprimir.vbs que coloquei em anexo na primeira postagem as linhas que tem ' sao comentarios

'  Script para impressão de documentos
'  Modificado por Rafael Zottesso
'  ******************************
' Cria a variável para definir a impressora padrão
Set objPrinter = CreateObject("WScript.Network")
' Para impressora da rede utilize "\servidorNome da Impressora"
objPrinter.SetDefaultPrinter "\\comp-1-pc\hp"
' Define o diretório
TargetFolder = "D:\xampp\htdocs\vale\teste\temp\"
Set objShell = CreateObject("Shell.Application")
Set objFolder = objShell.Namespace(TargetFolder)
' Lista os arquivos
Set colItems = objFolder.Items
For Each objItem in colItems
' Imprime os arquivos encontrados
objItem.InvokeVerbEx("Print")
Next
' Define-se a impressora padrão após 5 segundos
Wscript.Sleep 3000
Set oldPrinter = CreateObject("WScript.Network")
oldPrinter.SetDefaultPrinter "Foxit Reader PDF Printer"

 

Compartilhar este post


Link para o post
Compartilhar em outros sites

Talvez o problema esteja em uma das perguntas que coloquei, como é que você executa o .vbs pelo cmd? E quando você faz isso, apos imprimir, no cmd fica processando ou volta ao prompt permitindo digitar outros comandos?

Compartilhar este post


Link para o post
Compartilhar em outros sites

Olha, talvez seja bem simples! Faça da mesma forma

 

troque wscript por  cscript

exec('cscript "D:/xammp/htdocs/vale/teste/imprimir.vbs"');


Fiz um teste aqui e criei um hello.vbs

 

function Main()
      Wscript.Echo "Hello!"
end function
call Main

 

<?php

echo exec('cscript hello.vbs'); # Executa

echo exec('wscript hello.vbs'); # fica em loop infinito


Olhando a documentação do vbs ficou claro o motivo, o cscript envia a saída para o console, já o wscript para uma caixa de dialogo, que precisa de um clique no ok

 

 

Compartilhar este post


Link para o post
Compartilhar em outros sites
21 minutos atrás, EdCesar disse:

Olha, esse era o ponto!  Faça da mesma forma

 

troque wscript por  cscript


exec('cscript "D:/xammp/htdocs/vale/teste/imprimir.vbs"');


Fiz um teste aqui e criei um hello.vbs

 


function Main()
      Wscript.Echo "Hello!"
end function
call Main

 


<?php

echo exec('cscript hello.vbs'); # Executa

echo exec('wscript hello.vbs'); # fica em loop infinito


Olhando a documentação do vbs ficou claro o motivo, o cscript executa em console, já o wscript chama uma caixa de dialogo, que precisa de um clique no ok

 

 

 

 

@EdCesar, veio nao roda mesmo colocando desta forma 

exec('cscript hello.vbs');

claro que com o meu vbs imprimir.vbs ele nao fica carregando porem nao é acionado o vbs no servidor, sendo assim nao imprimi, como eu falei anteriormente eu fiz esse bat abaixo e e fiz a funçao exec chamar esse bat, contudo tbm nao rodou o script vbs ai fiz um teste, no mesmo bat pedindo para copiar um determinado arquivo para outro lugar antes do script e apos chamar o script renomear esse arquivo, os todos os processo de copia de rename foi executado menos chamar o vbs pelo cmd atraves do cscript.exe

 

 

 

ECHO starting program

cmd.exe /c cscript.exe D:\xampp\htdocs\vale\teste\imprimir.vbs

echo finish program

 

Compartilhar este post


Link para o post
Compartilhar em outros sites

sim fiz o teste com aquele vbs que você fez trazendo hello na tela ele funcionou. porem o meu nao roda é para o meu abrir os arquivos no notepad.exe no servidor setando impressora padrao e mandando imprimir

Compartilhar este post


Link para o post
Compartilhar em outros sites

  • Conteúdo Similar

    • Por violin101
      Caros amigos do grupo, saudações e um feliz 2025.
       
      Estou com uma pequena dúvida referente a Teclas de Atalho.

      Quando o Caps Lock está ativado o Comando da Tecla de Atalho não funciona.
      ou seja:
      se estiver para letra minúscula ====> funciona
      se estiver para letra maiúscula ====> não funciona
       
      Como consigo evitar essa falha, tanto para Letra Maiúscula quanto Minúscula ?

      o Código está assim:
      document.addEventListener( 'keydown', evt => { if (!evt.ctrlKey || evt.key !== 'r' ) return;// Não é Ctrl+r, portanto interrompemos o script evt.preventDefault(); });  
      Grato,
       
      Cesar
    • Por violin101
      Caros amigos, saudações.
       
      Por favor, poderiam me ajudar.

      Estou com a seguinte dúvida:
      --> como faço para para implementar o input código do produto, para quando o usuário digitar o ID o sistema espera de 1s a 2s, sem ter que pressionar a tecla ENTER.

      exemplo:
      código   ----   descrição
           1       -----   produto_A
       
      Grato,
       
      Cesar
    • Por violin101
      Caros amigos, saudações.
       
      Humildemente peço desculpa por postar uma dúvida que tenho.

      Preciso salvar no MySql, os seguinte Registro:

      1 - Principal
      ====> minha dúvida começa aqui
      ==========> como faço para o Sistema Contar Automaticamente o que estiver despois do 1.____?
      1.01 - Matriz
      1.01.0001 - Estoque
      1.01.0002 - Oficina
      etc

      2 - Secundário
      2.01 - Loja_1
      2.01.0001 - Caixa
      2.01.0002 - Recepção
      etc
       
      Resumindo seria como se fosse um Cadastro de PLANO de CONTAS CONTÁBEIL.

      Grato,


      Cesar









       
    • Por violin101
      Caros amigos, saudações.

      Por favor, me perdoa em recorrer a orientação dos amigos.

      Preciso fazer um Relatório onde o usuário pode Gerar uma Lista com prazo para vencimento de: 15 / 20/ 30 dias da data atual.

      Tem como montar uma SQL para o sistema fazer uma busca no MySql por período ou dias próximo ao vencimento ?

      Tentei fazer assim, mas o SQL me traz tudo:
      $query = "SELECT faturamento.*, DATE_ADD(faturamento.dataVencimento, INTERVAL 30 DAY), fornecedor.* FROM faturamento INNER JOIN fornecedor ON fornecedor.idfornecedor = faturamento.id_fornecedor WHERE faturamento.statusFatur = 1 ORDER BY faturamento.idFaturamento $ordenar ";  
      Grato,
       
      Cesar
       
       
       
       
    • Por violin101
      Caros amigos, saudações
       
      Por favor, me perdoa em recorrer a orientação dos amigos, tenho uma dúvida.
       
      Gostaria de uma rotina onde o Sistema possa acusar para o usuário antes dos 30 dias, grifar na Tabela o aviso de vencimento próximo, por exemplo:
       
      Data Atual: 15/11/2024
                                           Vencimento
      Fornecedor.....................Data.....................Valor
      Fornecedor_1...........01/12/2024..........R$ 120,00 <== grifar a linha de Laranja
      Fornecedor_1...........01/01/2025..........R$ 130,00
      Fornecedor_2...........15/12/2024..........R$ 200,00 <== grifar a linha de Amarelo
      Fornecedor_2...........15/01/2025..........R$ 230,00
      Fornecedor_3...........20/12/2024..........R$ 150,00
       
      Alguém tem alguma dica ou leitura sobre este assunto ?

      Grato,
       
      Cesar
×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.