ho scritto:
Non mi da errori ma non fa nulla...codice:<% 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") %>
Lexmark e su porta USB001