Kod: Tümünü seç
Dim pstr As String
Dim pbytes() As Byte
pstr = "2F05063005461727165540020496E666F726D6174696F6E5B 315D2E2E2E2032202500000000000000000000000000000000 000009DCF06D00000088007570635F6B615F74755F75707065 72006E696768746F6E6C696E655C0000000000000000000000 0000000001" & hexword
ConvHEX2ByteArray pstr, pbytes
SendPackets pbytes