Zork
|
SÃO PAULO
SP - BRASIL
|
|
ENUNCIADA !
|
|
|
Postada em 10/03/2011 17:27 hs
Acho que nao!
mas faz um teste, muda o adUseClient e por Server.
outra coisa.
Uma pergunta besta. Mas ja vi muitos cairem.
Essa variavel pega sempre a DATA do dia. Pois bem.
Seu banco tem cadastrado diversas datas menos a de hoje (exemplo) ai quando vc faz a pesquisa nao acha nada porque pra testar vc esqueceu de mudar para uma data que vc tem no banco.
Cara sei que isso é ridiculo mas ja vi pessoas esquecerem disso.
Vc disse que com umas datas funcional e com outras nao!!!
Ja viu se quando tem dia e mes que sao menores que 9 o Access esta pegando um digito ou dois ?
Ex: VB 01/09/1987 Access 1/9/1987
Sem o ZERO no Access percebeu ???
|
|
|
|
|
|
comendador
não registrado
|
|
|
ENUNCIADA !
|
|
|
Postada em 10/03/2011 17:36 hs
Boa sacada Zork, e realmente ele pega a data do dia sim, sendo que este código é um código para preencher o Flexgrid, com a locação daquele mesmo momento, só que antes deste SELECT existe um INSERT, aonde eu salvo os livros que estão sendo alugados (com a data atual) e depois usando este código eu preencho o Flexgrid!
Tenho também um FORM para fechar o caixa, aonde o SELECT tem o mesmo problema, algumas datas funciona bem e outras nem acha!
Quanto ao ACCESS realmente ele só pega um número quando é menor que 9, mais desculpe a pergunta: O que tem haver?
|
|
|
|
comendador
não registrado
|
|
Postada em 10/03/2011 17:40 hs
Agora me ocorreu uma idéia, tem como fazer uma atualização do BD, via código; assim, antes de fazer o SELECT eu faria uma ATUALIZAÇÃO do BD! Bom pelo menos é uma idéia util
|
|
|
|
Treze
|
SÃO VICENTE
SP - BRASIL
|
|
Postada em 10/03/2011 18:30 hs
Olha colega o problema com campo datas acaba sempre sendo o mesmo
veja bem se o tipo do campo for DATA/HORA
basta mudar o formato
data_loc = Format(Date,"mm/dd/yyyy")
repare que coloquei o mes na frente do dia, agora execute sua query e veja se resolve
|
|
|
|
|
|
Postada em 11/03/2011 06:10 hs
Cara uso assim sem problemas:
Set prs = New ADODB.Recordset
SQL = "SELECT * FROM caixa"
prs.Open "Select * from caixa where tipo = '" & "credito" & "' and data = '" & txtData.Text & "'", gConexao
If prs.RecordCount = 0 Then
MsgBox "Não foram encontrado registro no dia informado", vbOKOnly + vbInformation, "Atenção"
Exit Sub
End If
Feliz aquele que transfere o que sabe e aprende.
|
|
|
|
comendador
não registrado
|
|
|
ENUNCIADA !
|
|
|
Postada em 11/03/2011 08:22 hs
Treze obrigado mais a sua idéia não deu certo! Continuou a mesma coisa!
sNiffer quanto a sua sugestão não ficou muito clara pois, vc põe dentro de uma variável (SQL), um código e depois não a usa! Desculpe mais não entendi parte do seu código!
O que acontece é o seguinte alguns dias do mês o código localiza, outros não!
Estou ficando cansado disso! VB é maneiro por isso, faz vc ficar bastante envolvido com o projeto e os códigos, só que quando começa ficar chato assim...
|
|
|
|
