Discussion :

[axamen]

Bonjour,
j'ai une erreur concernant timestamp :
j'ai une macro qui va chercher un calendrier,
elle fait une requete SQL avec juste un select et la macro est interrompu par le message : impossible de convertir 'ma date selectionnée du calendrier' en timestamp sachant que le format date de ma BDD est exemple : 2008/03/13 07:20:18 458.

je ne sais pas convertir ce format dans ma text box et ou dois-je l'incrémenter dans ma macro pour que les 2 dates correspondre.
en espérant que j'ai compris cette erreur d'exécution Timestamp

Si vous avez une idée, elle sera la bienvenue ,
car je bloque (encore une fois)

Merci d'avance a tous
@+

[Gorfael]

Salut axamen et le forum
c'est quoi timestamp ?
pour t'aider sur un progrmme précis, autre chose que des infos générales seraient les bienvenues. Comme ta macro, par exemple!

2008/03/13 07:20:18 458. ? Tu cherches un problème de date alors que tu travailles à la millisecondes ? pas très cohérent à mon sens. Tu extrait tes millisecondes comment ?
A+

[axamen]

Salut Gorfael,
timestamp c'est le message d'erreur en pièce jointe,
et je sais pas ce que c'est , a part ce que j'ai trouvé : date transformée en forme de nombre ?? a voir

l'extraction se fait a l'aide d'une requete SQL ( simple select),
la date exportée a comme format : 2008/03/13 07:20:18 458 et moi je selectionnes dans mon calendrier un format jj/mm/YYYY

je penses que le message d'erreur est lié car lorsque la requete est effectuée il ne prend pas en considération mes 2 dates ( between ' date début' et 'date de fin')
voir requete ci-dessous

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
SQL = "SELECT a.no_int_ord_fab, a.cd_moy, a.cdevt, a.qte, a.dur_evt, a.cd_perso_resp, a.dte_hre_mvt, a.cd_cau, a.cd_def, a.cout_section, a.mnt_sect "
    SQL = SQL & "FROM obi.evtate a, obi.ordfab b "
    SQL = SQL & "WHERE a.no_ste = b.no_ste "
    SQL = SQL & "AND a.no_int_ord_fab = b.no_int_ord_fab "
    SQL = SQL & "AND b.no_ste='01' "
    SQL = SQL & "AND b.cd_af='RELANCE' "
 
    If txt_end.Text = "" Then
    SQL = SQL & "AND a.dte_hre_mvt, = '" & txt_start.Text & "' "
Else
 
    SQL = SQL & "AND a.dte_hre_mvt BETWEEN '" & txt_start.Text & "' AND '" & txt_end.Text & "' "
End If
 
 
    SQL = SQL & "ORDER BY a.no_int_ord_fab,a.dte_hre_mvt "

Merci d'avance pour toutes réponses
@+

[Godzestla]

Bonjour,
au vu de ce que tu expliques,
1)as-tu vérifié que SQL vaut ce que tu souhaites après cette ligne

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

SQL = SQL & "AND a.dte_hre_mvt BETWEEN '" & txt_start.Text & "' AND '" & txt_end.Text & "' "

2) es-tu certain qu'il faut .text derrière tes 2 bornes pour la clause between ?

[axamen]

1)as-tu vérifié que SQL vaut ce que tu souhaites après cette ligne

Oui j'ai vérifier, et non il ne m'affiche pas ce que je souhaites, il ne prend pas en compte les dates que je lui met par défaut

2) es-tu certain qu'il faut .text derrière tes 2 bornes pour la clause between ?

et non plus, as-tu un format autre que text pour utilisé une TextBox

Merci
@+

Est-il possible de définir un format pour une TextBox ?

il faudrait que le text selectionné soit en format identique que l'exportation de la BDD

je penses a cela ?

a voir

Je seches !!! encore une fois

[Godzestla]

Oui j'ai vérifier, et non il ne m'affiche pas ce que je souhaites, il ne prend pas en compte les dates que je lui met par défaut


et non plus, as-tu un format autre que text pour utilisé une TextBox

Merci
@+

1)Tu ne réponds pas à ma question, car évidement je ne te demandais pas si cela fonctionne, sinon que ferais tu ici

Je te demandais si tu a vérifier la valeur de SQL (la variable) après l'instruction. Pour cela, MSGBOX peut t'aider par exemple.

2) Pour la valeur du textbox, il vaut .value et pas .text, mais je ne suis pas certain qu'avec une date cela fonctionne aussi simplement. (ta date doit être formattée pour l'SQL dans le format stocké dans la DB).

Donc j'en reviens au point 1).

Vérifie la variable SQL jusqu'à ce que la valeur corresponde à ce que tu ferais manuellement et qui fonctionne.

[axamen]

Heu ....... ouai ........ on est en fin de semaine .........

je crois que je n'est pas tout compris..........

enfin j'ai quand meme essayé certaines choses :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Format(TextBox1, "dd/mm/yyyy")

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

MsgBox CDate(txt_start.Value)

je sais plus quoi faire (a part me reposer un peu)

aider moi !!!!!!!

[Godzestla]

Tu mets

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

 Msgbox SQL

après

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

SQL = SQL & "AND a.dte_hre_mvt BETWEEN '" & txt_start.value & "' AND '" & txt_end.value & "' "

et tu regardes ce que cela donne.

[axamen]

merci,

il faut vraiment que je me repose

donc résultat .......

la requete affichée est bien celle que je fais manuellement ( celle qui fonctionne), donc ............

je sais toujours pas pourquoi !!! il y a ce message a la c... de Timestamp

je m'emporte, je m'emporte !!!! mais en meme temps je cherche aussi !!!

@+

je pense toujours a ce format

qui doit être dd/mm/yyyy hh:mm:ss

je regarde !!!

[axamen]

Résultats

le format de ma Textbox doit être

YYYY-MM-DD hh:mm:ss

voila !

maintenant il faut trouver ou le mettre mon format !!

@+

[axamen]

Bonjour TLM

Le format date trouvé dans ma BDD Sybase est :

AAAA-MM-JJ hh:mm:ss.nnn

pour ceux qui devrais se servir d'une BDD identique, ne pas oublier .nnn après les secondes.

Avec ce format, VB excel peut convertir cette date en timestamp

@+

[AlainTech]

Problème résolu?