如何将超级终端与我们的asp.net web应用程序集成在一起，通过喷墨打印机打印一些文本
本文关键字：打印机 文本 打印 在一起 集成 超级终端 我们 应用程序 web net asp | 更新日期: 2023-09-27 18:13:53
嗨，伙计们，我是新手，所以我想知道这一点，所以请帮助我…我想知道如何通过超级终端发送命令到打印机打印一些文本....这对我有很大的帮助……谢谢大家……
1)要发送任何命令/数据到打印机，您需要将其作为协议命令发送，并从串行或以太网端口发送。
2)您需要发送ESC (1B十六进制)作为命令的开始，Eot (04 H)作为命令的结束来发送每个命令
3)在典型的应用程序中，您需要将数据发送到打印机进行打印，然后监控打印机已完成的打印数量。这可以使用以下命令步骤来实现a)用命令ESC/S/002/待打印数据/Eot
发送消息数据b)使用命令ESC/p/1/002/Eot
将消息指定为打印c)使用命令Esc/I/1/Z/Eot设置打印确认-这样我们将"Z"字符设置为标志。每当打印机打印产品时，它将通过端口发送"Z"作为打印确认。通过跟踪Z的收货数量可以计算出打印的产品数量**
在asp.net web应用程序中单击按钮，我们必须通过超级终端将此命令发送到打印机。
所以plz plz plz帮助我得到这个的解决方案
您可以尝试下面的代码，它应该可以验证您可以从VB与设备'对话'
Option Explicit
'
' Requires 2 multi line TextBoxes named txtSent and txtReceived
' one textbox named txtToSend
' CommandButton named cmdSend
'
Private Sub Form_Load()
txtSent.Text = vbNullString
txtReceived.Text = vbNullString
txtToSend.Text = vbNullString
'
' Configure the Port and send an Escape character to the device
'
With MSComm1
.CommPort = 1
.RThreshold = 1
.Settings = "19200,n,8,1"
.PortOpen = True
.Output = Chr(27)
txtSent.Text = "Escape" & vbNewLine
End With
End Sub
Private Sub cmdSend_Click()
'
' Send whatever is in txtToSend to the Device
'
If txtToSend <> vbNullString Then
MSComm1.Output = txtToSend.Text & vbNewLine
txtSent.Text = txtSent.Text & txtToSend.Text & vbNewLine
txtToSend.Text = vbNullString
Else
MsgBox "Enter a Command to Send to the Device"
End If
End Sub
Private Sub MSComm1_OnComm()
Dim strRx As String
Select Case MSComm1.CommEvent
Case comEvReceive
'
' Device has sent something. Add it to txtReceived
'
strRx = MSComm1.Input
txtReceived.Text = txtReceived.Text & strRx
End Select
End Sub
只需在txtToSend中输入命令并单击cmdSend，您应该会在txtReceived