Vbscript 使用vbs向datalogic扫描仪发送反馈

我有一个datalogic powerscan pm9500，通过串行端口（COM2）连接 我需要给他发送一个打开led的命令，所以当我读到正确的代码时，它会显示绿色led，红色表示错误的代码。 现在，我的问题是： 我找到了这个用c夏普传输命令的代码

//          ----------ORIGINAL NOT WORKING MISSING DC2----------------------------------
// Send: ESC [ 6 q CR
_serialPort.Write(new byte[] { 0x1B, 0x5B, 0x36, 0x71, 0x0D }, 0, 5);

// Send: ESC [ 3 q CR
_serialPort.Write(new byte[] { 0x1B, 0x5B, 0x33, 0x71, 0x0D }, 0, 5);

// Send: ESC [ 7 q CR
_serialPort.Write(new byte[] { 0x1B, 0x5B, 0x37, 0x71, 0x0D }, 0, 5);

//      ---------POSSIBLE MODIFY 1 TEORICALLY WORKING-----------------------------------

// Send: DC2 ESC [ 6 q CR
_serialPort.Write(new byte[] { 0x12, 0x1B, 0x5B, 0x36, 0x71, 0x0D }, 0, 6);

// Send: DC2 ESC [ 3 q CR
_serialPort.Write(new byte[] { 0x12, 0x1B, 0x5B, 0x33, 0x71, 0x0D }, 0, 6);

// Send: DC2 ESC [ 7 q CR
_serialPort.Write(new byte[] { 0x12, 0x1B, 0x5B, 0x37, 0x71, 0x0D }, 0, 6);

//      --------POSSIBLE MODIFY 2 IF IT NOT ACCEPT CR AS CHAR---------------------------

// Send: DC2 ESC [ 6 q ESC [ G
_serialPort.Write(new byte[] { 0x12, 0x1B, 0x5B, 0x36, 0x71, 0x1B, 0x5B, 0X47 }, 0, 8);

// Send: DC2 ESC [ 3 q ESC [ G
_serialPort.Write(new byte[] { 0x12, 0x1B, 0x5B, 0x33, 0x71, 0x1B, 0x5B, 0X47 }, 0, 8);

// Send: DC2 ESC [ 7 q ESC [ G
_serialPort.Write(new byte[] { 0x12, 0x1B, 0x5B, 0x37, 0x71, 0x1B, 0x5B, 0X47 }, 0, 8);

所以，我知道我需要添加DC2和CR命令，但是这些行的vbs等价物是什么

读卡器的正确配置是什么？（变量=值）

部分解决方案：

我曾经

mscom1.output(portID, macaddr & "@" & vbcr)

WARE:portID是com2 id macaddr是扫描仪的mac地址vbcr是用于carrage返回的集成vb字符

---

此代码工作并在读取后发送读取确认。但是如果我需要添加一个命令，并且只向whotu any命令发送读取确认，那么它就不起作用了。有人有其他想法吗？

您基本上是在要求我们将C代码移植到VBscript。DC2和CR不是“命令”，它们分别是ASCII字符0x12和0x0D的首字母缩略词。如果您将注释翻译成英语，将对我们有所帮助。注释翻译。如产品指南DC2 ara所示，asincronus send命令的ascii等价物和CR是字符串，可以用“ESC[G”ah Jonathon Reinhart代替，我不需要翻译，我需要一个打开led的完整脚本。