Foros del web, para los que viven de bits

edkerrigan · 02-may-2008, 08:25

Hola compañeros, muy buenos días.

He aqui que tengo un dilema:

Investigando hace tiempo desarrolle unas macros en Excel que me imprimían directamente en una impresora conectada al puerto paralelo usando:

Código:

Private Function Imprime_Linea1(Texto As String)
    Open "lpt1" For Output As #1
    Print #1, Texto
    'Print #1, Chr(27) + Chr(112) + Chr(0) + Chr(60) + Chr(240);
    Close #1
End Function

Sin embargo al momento de usar esta misma función me marca error, no sé porque en los AS

Se puede imprimir a lpt desde una página?

Shiryu_Libra · 02-may-2008, 10:27

a lo mejor este codigo te puede servir

Código HTML:

<%@ Language="VBScript" %>
<% Option Explicit %>
<html>
<head>
<title>ASP 101's Server-Side Printing Sample</title>
</head>
<body>

<%
Dim objFSO
Dim objPrinter

Set objFSO = Server.CreateObject("Scripting.FileSystemObject")

Set objPrinter = objFSO.CreateTextFile("LPT1:", True)

objPrinter.WriteLine "This is a test of printing from ASP!"
objPrinter.Write vbFormFeed

objPrinter.Close

Set objPrinter = Nothing

Set objFSO = Nothing
%>

</body>
</html>

prueba y comenta

edkerrigan · 03-may-2008, 10:30

Hola compañero, ya lo probe y me marca un error en la linea donde esta la instrucción:

Set objPrinter = objFSO.CreateTextFile("LPT1:", True)

algo como esto:

Información técnica (para personal de soporte técnico)

* Tipo de error:
Error de Microsoft VBScript en tiempo de ejecución (0x800A0046)
Permiso denegado
/agenda/impresion.asp, línea 15

Gracias

02-may-2008, 08:25	#1 (permalink)
edkerrigan Fecha de Ingreso: enero-2008 Mensajes: 8	Imprimir LPT desde ASP Hola compañeros, muy buenos días. He aqui que tengo un dilema: Investigando hace tiempo desarrolle unas macros en Excel que me imprimían directamente en una impresora conectada al puerto paralelo usando: Código: Private Function Imprime_Linea1(Texto As String) Open "lpt1" For Output As #1 Print #1, Texto 'Print #1, Chr(27) + Chr(112) + Chr(0) + Chr(60) + Chr(240); Close #1 End Function Sin embargo al momento de usar esta misma función me marca error, no sé porque en los AS Se puede imprimir a lpt desde una página?

03-may-2008, 10:30	#3 (permalink)
edkerrigan Fecha de Ingreso: enero-2008 Mensajes: 8	Re: Imprimir LPT desde ASP Hola compañero, ya lo probe y me marca un error en la linea donde esta la instrucción: Set objPrinter = objFSO.CreateTextFile("LPT1:", True) algo como esto: Información técnica (para personal de soporte técnico) * Tipo de error: Error de Microsoft VBScript en tiempo de ejecución (0x800A0046) Permiso denegado /agenda/impresion.asp, línea 15 Gracias

Herramientas
Mostrar Versión Imprimible Enviar por Correo
Desplegado
Mode Lineal Cambiar a Modo Hibrido Cambiar a Modo Hilado