Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

Rafael Portal

Tipo de dados Time

Recommended Posts

Olá gente é o seguinte, estou usando VB6, ADO, MYSQL .. Bom é o seguinte estou trabalhando com tipo de dados time por que tenho que fazer marcação de horários etc... Então.... Quero buscar dados no banco usando este sql:

SELECT C.Nome, H.HoraInicial, H.HoraFinal, H.Data, S.ServicoFROM Clientes C, Horarios H, Servico SWHERE C.CodCliente = H.CodCliente AND S.CodServico = H.CodServicoORDER BY DATA

Bom eu estou usando a interface do PhpMyAdmin para trabalhar com o banco MySQL, e testei este sql para ver se ele me trazia os dados que eu precisava.... Ótimo consegui obter este resultado:

Nome  HoraInicial  HoraFinal  Data  Servico  CLIENTE2 14:00:00 15:00:00 2004-11-01 OUTRO CLIENTE2 14:00:00 15:00:00 2004-11-01 OUTRO CLIENTE2 14:00:00 15:00:00 2004-11-01 OUTRO CLIENTE1 14:00:00 15:00:00 2004-11-01 OUTRO CLIENTE1 14:00:00 15:00:00 2004-11-01 OUTRO CLIENTE1 15:30:00 17:30:00 2004-11-08 SERVIÇO1 CLIENTE1 08:30:00 08:40:00 2004-11-11 SERVIÇO1 CLIENTE2 14:00:00 15:00:00 2004-12-12 SERVIÇO2 CLIENTE3 01:11:00 00:00:11 2044-11-11 SERVIÇO2

Perfeito.. Mas no VB estou tentando carregar um LisView exatamente com estes mesmos dados... Só que acontece um erro:
Private Sub CarregaLvw()    sSql = "Select C.Nome, H.HoraInicial, H.HoraFinal, H.Data, S.Servico from Clientes C, Horarios H, Servico S where C.CodCliente = H.CodCliente And S.CodServico = H.CodServico ORDER BY Data"    AbreBanco (sSql)    Me.LvwHorarios.ListItems.Clear        Do While Rs.EOF = False        Set Lvw = Me.LvwHorarios.ListItems.Add        Lvw.Text = Rs!Nome        Lvw.SubItems(1) = Rs!Servico        Lvw.SubItems(2) = Rs!Data        Lvw.SubItems(3) = Rs!HoraInicial ' Aqui gera erro        Lvw.SubItems(4) = Rs!HoraFinal ' Aqui gera erro        Rs.MoveNext    LoopEnd Sub
O erro que acontece é o seguinte:

Run-time error '13':Type mismatch

Bom eu não sei como fazer com que os tipos sejam compatíveis.. eu presumo que os dados são trazidos como string não???? Alguém sabe qual a solução?????Eu fico MUITO agradecido com quem me ajudar...Rafael Portal

Compartilhar este post


Link para o post
Compartilhar em outros sites

Ahh.. E tem outra... Quando eu debuguei descobri que os valores armazenados em Rs!HoraInicial, Rs!HoraFinal é Null.... Alguém sabe me dizer por que será que o valor está vindo como Null se o valor EXISTE??????? Agradecido..... Rafael Portal

Compartilhar este post


Link para o post
Compartilhar em outros sites

cara...eu tive o mesmo problema...o valor vem null, e as vezes dava mensagem de erro, isso quando eu abria o recordset e dava eof!!!enfim, como resolvi?Utilizei o MyODBC 3.51.06, a versão do mysql que uso é a 4.0.18.Andei testando esta nova versão 4.1.7 mas o myodbc 06 não funciona, e os que funciona me faz voltar à estaca zero em relação ao time! huahuahua ^_^ é isso ae, hj estamos com 4 clientes grandes rodando mysql blzinha.fz u q né! :P

Compartilhar este post


Link para o post
Compartilhar em outros sites

sim.

 

e também o único odbc que encontrei e funfou foi o MyODBC 3.51.06. Nem 07, 08, 09 e 10 funcionaram. pq eu não sei.

 

flw

Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.