Citizen Systems Network Router 1.8 Manual do Utilizador Página 46

  • Descarregar
  • Adicionar aos meus manuais
  • Imprimir
  • Página
    / 61
  • Índice
  • MARCADORES
  • Avaliado. / 5. Com base em avaliações de clientes
Vista de página 45
CITIZEN OPOS DRIVER 1.8 Application Development Guide
46
+ Chr$(&H33) + Chr$(&H33) _
+ Chr$(&H30) + Chr$(&H3D) _
+ Chr$(&H30) + Chr$(&H3A) _
+ Chr$(&H34) + Chr$(&H31) _
+ Chr$(&H34) + Chr$(&H32) _
+ Chr$(&H34) + Chr$(&H33) _
+ Chr$(&H30) + Chr$(&H3D) _
+ Chr$(&H30) + Chr$(&H3A)
result = OPOSPrinter.PrintNormal(PrintStation, pString)
OPOS_BC_DECIMAL
Each byte is converted to three characters. Val (String) is used by three characters each in
order to convert ASCII to binary. To create three ASCII characters from each byte,
Right("^^"+Str(Byte),3) is used in the following installation example, where "^" indicates a
space.
Dim pString As String
Dim result As Long
Dim PrintStation As Long
OPOSPrinter.BinaryConversion = OPOS_BC_DECIMAL
pString = Right(Str(68), 3) _
+ Right(Str (101), 3) _
+ Right(Str (99), 3) _
+ Right(Str (105), 3) _
+ Right(Str (109), 3) _
+ Right(Str (97), 3) _
+ Right(Str (108), 3) _
+ Right(Str (13), 3) _
+ Right(Str (10), 3) _
+ Right("^^" + str(49), 3) _
+ Right("^^" + str(50), 3) _
+ Right("^^" + str(51), 3) _
+ Right("^^" + str(13), 3) _
+ Right("^^" + str(10), 3) _
+ Right(Str (65), 3) _
+ Right(Str (66), 3) _
+ Right(Str (67), 3) _
+ Right(Str (13), 3) _
+ Right(Str (10), 3)
result = OPOSPrinter.PrintNormal(PrintStation, pString)
Every printing results in the following.
(Printing order: OPOS_BC_None, OPOS_BC_Nibble, OPOS_BC_Decimal)
None
123
ABC
Nibble
123
ABC
Decimal
123
ABC
Vista de página 45
1 2 ... 41 42 43 44 45 46 47 48 49 50 51 ... 60 61

Comentários a estes Manuais

Sem comentários