PEGAR DADOS FIREBIRD
boa tarde estou pegando os dados no firebird onde o campo é:
tipo BLOB da seguinte forma:
Set RSdj = CreateObject([Ô]ADODB.Recordset[Ô])
sql = [Ô]Select * from REDUCAOZ where coo = [ô]69145[ô] [Ô]
RSdj.Open sql, conDJ, adOpenStatic, adLockOptimistic
If RSdj.EOF = False Then
MsgBox RSdj!dados
Else
USMsgBox [Ô]Atenção !!! [Ô] & vbCrLf & [Ô]Este valor Não é valido![Ô] & vbCrLf & [Ô]Favor conslutar valores valido na tabela de cadastro[Ô], vbExclamation, [Ô]Aviso[Ô]
End If
sendo que a consulta me retorna o seguintes dados na seguinte ordem:
[ECF]
DataECF = 03/01/13
DataMovimento = 03/01/13
NumSerie = SW040900000000003741
NumSerieMFD = MFDSW01000037904
NumECF = 001
NumCOOInicial = 069000
NumCOO = 069145
NumCRZ = 000943
NumCRO = 000009
então eu preciso colocar cada dados em uma caixa de texto: assim
DataECF
DataMovimento etc
sendo que quando eu pego os dados ele me retorna tudo conforme pode ver no print em anexo ou seja eu preciso pegar cada linha que ele me retorna
desde ja agradeço a todos
tipo BLOB da seguinte forma:
Set RSdj = CreateObject([Ô]ADODB.Recordset[Ô])
sql = [Ô]Select * from REDUCAOZ where coo = [ô]69145[ô] [Ô]
RSdj.Open sql, conDJ, adOpenStatic, adLockOptimistic
If RSdj.EOF = False Then
MsgBox RSdj!dados
Else
USMsgBox [Ô]Atenção !!! [Ô] & vbCrLf & [Ô]Este valor Não é valido![Ô] & vbCrLf & [Ô]Favor conslutar valores valido na tabela de cadastro[Ô], vbExclamation, [Ô]Aviso[Ô]
End If
sendo que a consulta me retorna o seguintes dados na seguinte ordem:
[ECF]
DataECF = 03/01/13
DataMovimento = 03/01/13
NumSerie = SW040900000000003741
NumSerieMFD = MFDSW01000037904
NumECF = 001
NumCOOInicial = 069000
NumCOO = 069145
NumCRZ = 000943
NumCRO = 000009
então eu preciso colocar cada dados em uma caixa de texto: assim
DataECF
DataMovimento etc
sendo que quando eu pego os dados ele me retorna tudo conforme pode ver no print em anexo ou seja eu preciso pegar cada linha que ele me retorna
desde ja agradeço a todos
Bom isso ai é uma estrutura de um arquivo .INI então você pode criar esse arquivo temporário com essas informações e usar a função para leitura do arquivo e mostrar onde você quiser!
Procure por Ler arquivo INI que vai encontrar muitas coisas aqui no fórum
Procure por Ler arquivo INI que vai encontrar muitas coisas aqui no fórum
nao é arquivo ini nao essa informação esta no bd
GUIGOR esta é a estrutura de um arquivo ini, como isto está salvo em um campo do tipo blob possa até ser que um arquivo ini foi salvo no banco, então você poderia grava-lo em um arquivo temporário e ler estas informações como um arquivo ini.
é você que grava este arquivo no campo blob?
Tópico encerrado , respostas não são mais permitidas