BUFFER CONTINUAFUNCAOSITEFINTERATIVO

RODRIGOMARCHESE 13/05/2014 20:06:24
#438158
Buenas, estou apanhando no tratamento do Buffer retornado na função ContinuaFuncaoSiTefInterativo do TEF Dedicado.

Public Declare Function ContinuaFuncaoSiTefInterativo Lib [Ô]CliSiTef32I.dll[Ô] (ByRef comando As Integer, ByRef tipoCampo As Integer, ByRef TamMin As Integer, ByRef TamMax As Integer, ByVal Buffer As Byte(), ByVal TamBuffer As Integer, ByVal Continua As Integer) As Integer

Dim Buffer As Byte() = New Byte(20000) {}

Result = ContinuaFuncaoSiTefInterativo(ProximoComando, TipoCampo, TamanhoMinimo, TamanhoMaximo, Buffer, Buffer.Length, Continua)


O Buffer está retornado assim:
(0) 49
(1) 58
(2) 67
(3) 97
(4) 114
(5) 116
(6) 97
(7) 111
(8) 32
(9) 100
(10) 101
(11) 32
(12) 68
(13) 101
(14) 98

Não compreendi o que devo fazer... os números retornados são códigos de mensagens? Se sim onde está esta lista.
Devo tratar somente o primeiro? Desde já agradeço a ajuda.

Abraço
OCELOT 14/05/2014 10:17:53
#438180 Resposta escolhida
Não sei o que você deve fazer, mas esses números na verdade se convertidos para texto correspondem a mensagem [Ô]1:Cartao de Deb[Ô]

Você pode converter eles assim:

Dim texto As String = System.Text.Encoding.ASCII.GetString(Buffer)

Com o detalhe de que como o buffer é maior que o texto ele provavelmente vai ter um monte de caractere 0 no final
RODRIGOMARCHESE 14/05/2014 17:04:27
#438202
OCELOT, sua resposta resolveu o problema.

Valeu
Tópico encerrado , respostas não são mais permitidas
Voltar