Annonce
#1 Thu 16 October 2003 13:43
- Virginie Girault
- Invité
Gestion de saisie de date sous MB
De: V. Girault
Le code de la boite de dialogue suivante me pose un probleme. MB dit que le type de l'argument passe a FormatDate n'est pas valide. Pourtant je le passe en chaine :
'Dialogue de selection des enregistrements compris entre 2 dates
'---------------------------------------------------------------
Dim J1, J3 as string
dim J2 as string
Dialog
Title Selection des enregistrements par date.
Control StaticText title Compris entre le :
Control EditText into J1
Control OKButton
Control CancelButton
If CommandInfo(CMD_INFO_DLG_OK) then
Note J1
J2 = FormatDate(J1)
Note J2
STOP
End If
Il y a quelque chose qui m'echappe ?
#2 Thu 16 October 2003 13:43
- Annick Lagnion
- Invité
Re: Gestion de saisie de date sous MB
include mapbasic.def
Include menu.def
declare sub main
sub main
Dim J1, J3 as string
dim J2 as date
Dialog
Title Selection des enregistrements par date.
Control StaticText title Compris entre le :
Control EditText into J1
Control OKButton
Control CancelButton
If CommandInfo(CMD_INFO_DLG_OK) then
J2 = FormatDate(J1)
Note J2
note month(j2)
note day(j2)
End If
select * from as1 where formatdate(date)=j2 into essai
browse * from essai
end sub
as1 est une table qui contient un champ date. Ce petit programme marche
(mapinfo 6.5 avec mapbasic 5.5)
mais si on ecrit
select * from as1 where date =j2 into essai alors que date est defini comme
une date, ca ne marche pas.
je ne sais pas si ca repond a la question posee?
