Miniprinter

[orharo2003]

Con gusto Myakire, este es el código de una etiqueta sencilla q despliega la clave del producto.


fileName = "genera_etiqueta.bat"
Response.ContentType = "text/plain" Response.AddHeader "content-disposition", "attachment; filename=""" & fileName & """"

Response.write "DEL C:\imprime.txt" & vbnewline
Response.Write "echo N>>c:\imprime.txt" & vbnewline
Response.Write "echo A10,40,0,4,2,1,N,""" & ucase(array_clave(0)) & """>>c:\imprime.txt" & vbnewline
Response.Write "echo A25,100,0,5,2,1,N,""" & ucase(array_clave(1)) & """>>c:\imprime.txt" & vbnewline
Response.Write "echo P>>c:\imprime.txt" & vbnewline
Response.Write "copy c:\imprime.txt \\sistemas\zebra" & vbnewline
Response.End

El resultado es una venta de de descarga donde aparace la opcion de Guardar,cancelar o ejecutar. Aqui el usuario ejecuta el archivo e imprime en la impresora en red usando el puerto serial.