PDA

Visualizza la versione completa : [dos] creare batch


rinosan_76
29-03-2004, 17:14
Ciao a tutti qualcuno sa come si può creare un file di batch per l'invio in stampa di un file?
Grazie

LeleFT
29-03-2004, 17:17
Se il file da stampare è un semplice file di testo, questo è sufficiente:


type %1 > prn

In questo modo tu lanci il file .BAT passandogli come parametro il file da stampare ed esso viene mandato in stampa.


Ciao. :ciauz:

rinosan_76
30-03-2004, 09:28
posso richiamarlo da asp?
Se voglio indicargli su che stampante di una lan si può fare?
Scusa se faccio domande, e se volessi stampare passandogli il testo e non il file di testo è possibile?

Johnny_Depp
30-03-2004, 10:29
credo si faccia così... (non ho testato):

<%
Dim WshShell, oExec
Set WshShell = CreateObject("WScript.Shell")
Set oExec = WshShell.Exec("print /D:nome_stampante Unità\Percorso\file_da_stampare")
%>

rinosan_76
30-03-2004, 10:56
accetta anche USB001 come porta stampante?

rinosan_76
30-03-2004, 11:02
ho scritto:


<%
Dim WshShell, oExec
Set WshShell = CreateObject("WScript.Shell")
'Set oExec = WshShell.Exec("print /D:nome_stampante Unità\Percorso\file_da_stampare")
Set oExec = WshShell.Exec("print /D:Lexmark d:\tele2.txt")
%>

Non mi da errori ma non fa nulla...
Lexmark e su porta USB001

Johnny_Depp
30-03-2004, 12:00
non so se con le porte USB il comando PRINT funziona... (penso di NO)

se la stampante è di rete prova ad utilizzare il comando LPR

per maggiori dettagli visualizza la guida in linea di windows: LPR /?

p.s. la stampante deve essere BEN configurata/condivisa...

rinosan_76
30-03-2004, 13:19
cosa intendi per configurate? Io l'ho condivisa... Per stampante di rete intendi una stampante non collegata al pc ma direttamente a cavo di rete?

Johnny_Depp
30-03-2004, 13:20
altrimenti... risolvi con uno script in C:


/* "stampa.exe" da compilare in C*/

#include <windows.h>

int main()
{
ShellExecute(NULL,"print","C:\percorso\nome_file.txt",0,0,SW_SHOW); // anche con USB
return 0;
}
poi da script lanci il file eseguibile appena creato:

<%
Dim WshShell, oExec
Set WshShell = CreateObject("WScript.Shell")
Set oExec = WshShell.Exec("stampa.exe")
%>

rinosan_76
30-03-2004, 13:23
questo sistema non mi dispiace, ma posso passare come parametro la stampante ed il file?

Loading