Discussion :

[christel1982]

Bonjour

j'invite l'utilisateur à choisir une date grace a des liste deroulante
Je recupere les donnees de mon formulaire et j'ajoute la date dans ma base de donnees

hors, si l'utilisateur a choisi 2-12-2005 et que j'essai d'ajouter 2005-12-2 cela ne fonctionne pas car il manque le 0

j'ai essayé de l'ajouter de plusieurs facons mais ca marche jamais help !

[KiLVaiDeN]

Bonjour,

Quand tu génères la liste déroulante contenant les dates, peut-être pourrais-tu déjà y inclure le 0 manquant ?

Sinon, le format de date "habituel" est YYYYMMDD donc chez toi : '20051202', sinon en fonction de la base de donnée, tu peux fournir un masque qui permettra à la base d'interpreter ta date en fonction du format que tu lui auras donné, par exemple sous Oracle, tu peux faire un TO_DATE('2005-12-02','YYYY-MM-DD')

Sur quel SGBDR travailles-tu ?

[christel1982]

Bonjour,

En fait je genere ma liste de cette facon la:
<select name="dat_emb_jour">
<% for i=1 to 31 Response.Write "<option> " & i & "</option>"
Next
%>
</select>
<select name="dat_emb_mois">
<% for i=1 to 12
Response.Write "<option> " & i & "</option>"
Next
%>
</select>
<select name="dat_emb_annee">
<% for i=year(date) to 2050
Response.Write "<option> " & i & "</option>"
Next
%>
</select>

Donc pas de 0 :/
Je travaille avec SQL Server 2000
Je dois enlever les tirets ?

Merci de ton aide

[KiLVaiDeN]

Dans ta page de destination de ton formulaire, tu peux toujours faire une concaténation avec un 0 pour le champ jour, si la taille de celui-ci est égale à 1

[escafr]

Code :

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

1
2
3
4
5
6
function make2digit(start_number)
    if len(start_number) = 1 then
        start_number = "0" & start_number
    end if
    make2digit = start_number           
end function

d'ou

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
17
18
 
<select name="dat_emb_jour">
<% for i=1 to 31 Response.Write "<option> " & make2digit(i) & "</option>"
Next
%>
</select>
<select name="dat_emb_mois">
<% for i=1 to 12
Response.Write "<option> " & make2digit(i) & "</option>"
Next
%>
</select>
<select name="dat_emb_annee">
<% for i=year(date) to 2050
Response.Write "<option> " & i & "</option>"
Next
%>
</select>

[christel1982]

salut

j'ai fait comme tu as dit avec ta fonction, ca marche impec mais mon insertion marche tjs pas :/
mon code

datediffe =Request.Form("dat_diff_annee")& "/" & Request.Form("dat_diff_mois")& "/" & Request.Form("dat_diff_jour")
Response.Write datediffe

ca m'affiche bien 2005-12-04

et apres:
SQL="SELECT * FROM ANNONCE"
Set RS = server.createobject("ADODB.Recordset")
RS.Open SQL,objconn , 3, 3

RS.addnew
RS("ANN_POSTE")=Request.form("nom")
RS("ANN_DATE_DIFF")=Request.form("datediffe")
RS("ANN_DATE_CLOTURE")=Request.form("datecloture")
RS("ANN_DATE_EMB")=Request.form("dateemb")
RS.update

et j'ai les champs date à NULL ds le sgbd

[Crazyblinkgirl]

Bonjour,

Au lieu de ta ligne :

Code :

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

RS("ANN_DATE_DIFF")=Request.form("datediffe")

Essayes :

Code :

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

RS("ANN_DATE_DIFF")=datediffe

car tu as déjà récupéré la date au bon format

[pc75]

Bonjour,

Juste une question : Pourquoi utiliser un recordset à la place d'une requête ?
INSERT into .....

[christel1982]

merci alala c ca de faire des copiers / coller !

On m'a toujours appris a utiliser des recordset en asp. pk? c moins performant?

[pc75]

Re,

A mon avis, c'est logiquement moins performant.

Avec l'utilisation d'un recordset :

- Création d'une instance pour le recordset
- Envoi d'une requête au serveur pour alimenter le recordset
- Manipulation en mémoire du jeu d'enregistrements
- Insertion d'une nouvelle valeur

Avec une requête d'insertion, tu crées une instance de connection, et tu envoies la requête d'insertion au serveur.

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
Set Conn=Server.CreateObject("ADODB.Connection")
' initialisation de la connexion
Conn.Open(Application("DsnODBC"))
 
mysql = ""
mysql = mysql & "insert into MATABLE "
mysql = mysql & "values ('" & Request.form("nom")  & "', "
mysql = mysql & "'" & Request.form("datediffe")  & "', "
........
 & ") "
Conn.Execute (mysql)
Conn.Close
Set Conn = Nothing

[christel1982]

et pour un select, je fais:
req_act="SELECT * FROM ACTIVITE WHERE ann_num= " & ann_num & ""
conn.Execute (req_act)
et apres pour recuperer les valeurs des champs ?

[pc75]

Re,

et pour un select, je fais:
req_act="SELECT * FROM ACTIVITE WHERE ann_num= " & ann_num & ""
conn.Execute (req_act)

NON.

Quand une requête doit retourner des enregistrements, l'utilisation d'une requête SELECT permet d'alimenter un recordset.
Par contre, dans le cas de requêtes ACTION (insert, delete, update), un recordset n'est pas nécessaire puisqu'on ne récupère pas d'enregistrements => on les manipule.

A+

[christel1982]

ok j'ai compris

[escafr]

pense au tag RESOLU et met ton code en forme la prochaine fois...!!!

[KiLVaiDeN]

Je trouve que vous êtes un peu dur avec cette personne, je ne vois pas la raison qui justifierait des réponses aussi "sèches".

Bon courage

[escafr]

ben c'est pas etre dur, c'est juste que ca aurait ete un gar, on lui aurait meme aps repondu pq son code etait pas formate..

alors comme je suis pour que l'on traite les hommes et les femmes de facon identiques, ben je fais les meme remarques..

[KiLVaiDeN]

J'ai trouvé le posteur sympatique pour ma part, le problème était bien posé au départ, il y a un bonjour et un merci, que demander de plus ?

Je suis d'accord qu'il manque la balise [code] :o Mais ce n'est pas dramatique

Vu le nombre de post de la personne, il est acceptable qu'elle ne formatte pas de manière systématique.

En plus pour ma part, je n'ai pas jugé sur la nature de la personne, je répond indifférement si la question est bien formulée, et si le message est courtois

Bonne journée !