Discussion :

[stolx_10]

Voici mon problème, dès je veux mettre des champs vides dans un formulaire d'ajout, il veut obligatoirement que je rentre des données,ici des dates, alors que dans ma table, pour toutes les dates, j'ai mis <Null interdit NON>
Pourquoi veut il obligatoirement que dans mon formulaire je lui écrive des dates ?

Sinon la requete fonctionne impeccable si je lui rentre toutes les données du formulaire ( chose que je ne veux pas faire )


PS : j'ai essayé les Nz et ça marche pas du tout

[romrai]

Salut,

essaye le SetFocus. c'est à dire ta listebox, ou texbox.SetFocus; avant ta requête.

[stolx_10]

non rien y fait !

Par contre je dois écrire textbox.setfocus
ou
'monchamp'.setfocus où je souhaite ne rien rentrer ?
( deuxieme solution faite et ça ne marche pas )

[romrai]

Salut,

en fait c le nom de l'objet où tu souhaites afficher ton champ vide dans ton formulaire. jne ne sais pas si c'est une listbox, ou un textbox?

c le nom de cet objet.SetFocus; en principe du doit le placer avant ta requête.

[stolx_10]

Par contre je dois écrire textbox.setfocus
ou
'monchamp'.setfocus où je souhaite ne rien rentrer ?
( deuxieme solution faite et ça ne marche pas )

Merci quand même de ta précison auquelle je me doutais mais comme tu peux voir ça ne marche pas
J'ai bien envi de vous donner ma DBaccess mais elle est trop volumineuse et puis, je prefere bosser dessus tt seul pour repérer mes erreurs, mais là ça me bloque et je vois pas où sont les conneries. Surtout que je suis sûr que c'est un truc tt con.
Et on sait tous que la hantise du programmeur, ce sont les erreurs microscopiques qui foutent le DawA ! grrrrrr je hais tt ça !

[romrai]

Désolé,

j ai pas d'autres solutions. j'ai eu un problème similaire, et c avec le SetFocus que je l'ai résolu.

[stolx_10]

Voila le code :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
Private Sub Commande27_Click()
 
Dim sql As String
sql = "INSERT INTO personnel (Nom,prenom,fonction,id_car,date_autorisation_conduite,date_caces_cariste,date_formation,date_suivi_medical,id_carnac,date_caces_nacelle,date_autorisation_nacelle) VALUES ('" & Forms!ajouter.Nom & "','" & Forms!ajouter.prenom & "','" & Forms!ajouter.fonction & "'," & Forms!ajouter.cariste & ", #" & Nz(Forms!ajouter.Autoristaion_conduite) & "#, #" & Nz(Forms!ajouter.CACES) & "#,#" & Nz(Forms!ajouter.Formation) & "#,#" & Nz(Forms!ajouter.Visitemed) & "#, " & Forms!ajouter.cariste_nacelle & ",#" & Nz(Forms!ajouter.CACES_nacelle) & "#,#" & Nz(Forms!ajouter.Autorisation_nacelle) & "#);"
Me.CACES.SetFocus
Me.CACES_nacelle.SetFocus
Me.Formation.SetFocus
Me.Autorisation_nacelle.SetFocus
Me.Autoristaion_conduite.SetFocus
DoCmd.RunSQL sql
End Sub

et voici le type d'erreur lorsque des champs sont vides :

[stolx_10]

SVP aidez moi !
Deja que ce post est un nouveau en réponse à un autre qui date de jeudi et qui est passé à la trappe ...please

[stolx_10]

s'il vous plait les gens SOS !
Travail a finir en fin de semaine et je decolle pas, merci du soutien !

( je sais y'a pas que moi dans le meme cas, mais ça fait 4 jours que meme *snif* )

[milia]

Tu crée une nouvelle "personne" à partir d'un code vba ou d'une requête?

[stolx_10]

J'utilise une requete SQL dans du VBA :

Code :

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

1
2
3
4
5
6
7
8
9
Dim sql As String
sql = "INSERT INTO personnel (Nom,prenom,fonction,id_car,date_autorisation_conduite,date_caces_cariste,date_formation,date_suivi_medical,id_carnac,date_caces_nacelle,date_autorisation_nacelle) VALUES ('" & Forms!ajouter.Nom & "','" & Forms!ajouter.prenom & "','" & Forms!ajouter.fonction & "'," & Forms!ajouter.cariste & ", #" & Nz(Forms!ajouter.Autoristaion_conduite) & "#, #" & Nz(Forms!ajouter.CACES) & "#,#" & Nz(Forms!ajouter.Formation) & "#,#" & Nz(Forms!ajouter.Visitemed) & "#, " & Forms!ajouter.cariste_nacelle & ",#" & Nz(Forms!ajouter.CACES_nacelle) & "#,#" & Nz(Forms!ajouter.Autorisation_nacelle) & "#);"
Me.CACES.SetFocus
Me.CACES_nacelle.SetFocus
Me.Formation.SetFocus
Me.Autorisation_nacelle.SetFocus
Me.Autoristaion_conduite.SetFocus
DoCmd.RunSQL sql
End Sub

[milia]

Et bien essaye peut-être avec une requête!
Sinon je ne vois pas car je n'ai pas une très grande expérience du vba.

[stolx_10]

La requete est dedans LOL !!!!

Code :

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

1
2
INSERT INTO personnel (Nom,prenom,fonction,id_car,date_autorisation_conduite,date_caces_cariste,date_formation,date_suivi_medical,id_carnac,date_caces_nacelle,date_autorisation_nacelle) 
VALUES ('" & Forms!ajouter.Nom & "','" & Forms!ajouter.prenom & "','" & Forms!ajouter.fonction & "'," & Forms!ajouter.cariste & ", #" & Nz(Forms!ajouter.Autoristaion_conduite) & "#, #" & Nz(Forms!ajouter.CACES) & "#,#" & Nz(Forms!ajouter.Formation) & "#,#" & Nz(Forms!ajouter.Visitemed) & "#, " & Forms!ajouter.cariste_nacelle & ",#" & Nz(Forms!ajouter.CACES_nacelle) & "#,#" & Nz(Forms!ajouter.Autorisation_nacelle) & "#);

Si vous ne lisez pas tout, comment voulez vous m'aider ? ça fait 4 jour qu'on me dit des trucs vus et revus Dsl si je m'enerve mais ça me gave qu'on ne lise pas !

[milia]

Désolé si vous ne comprennez pas, mais je dis de créer une requête access simple avec l'assistance et non à partir du code vba!!!
Et pas la peine de s'énerver c'est pas comme ça que tu vas donner envie aux gens de aider, nous aussi on a des problèmes et c'est pas pour autant que l'on supplie les gens de nous aider et qu'on les harcèle!!

[stolx_10]

Une requete a l'aide de l'assistant ne correpsond pas du tout !
J'ai besoin de récupérer des valeurs de champs complétés au fur et à mesure, et certains de ces champs doivent rester VIDES par rapport aux paramètres imposés par le cahier des charges !

Ex : pour un type cariste "permanent" seuls les dates de formation et de CACES doivent etre remplis, et pour un type cariste nacelle "non", rien ne dit etre rempli !

A part passer par du VBA et des controles faits là dessus, je ne vois pas comment creer une requete via un assistant qui ne fait pas grand chose malheureusement.

Et dsl si je m'enerve. Je tourne en rond depuis des jours car ça fait deja la 4eme fois qu'on me pose exactement la meme question....bientot on va me redmeander de faire avec des Nz ou vérifiés si il y'a tables liés ou je ne sais quoi alors que j'ai expliqué plusieurs fois.

On va me dire que je suis grognon, certes ! et j'en suis dsl.

[milia]

Je t'explique mon raisonnement et pourquoi.
Personnellement, la base de données sur laquelle je travaille actuellement n'a pas été crée par mes soins et dans un des formulaires il y a des dates et elles peuvent être à null et en faite l'enregistrement ce fait automatiquement vu que le formulaire a pour table celle qui doit être enregistré.
Je ne suis pas sûr que je suis très compréhensible.
Mais si vous voulez absolument utiliser du code vba, je ne peux pas vous aider vu qu'apparement vous avez déjà tout vérifié.

[stolx_10]

Ok ! je vais manger personne, on peut me tutoyer, je suis pas assez vieux pour qu'on me vouvoie.

Bref...le truc est que je me suis mis dans une bien bonne galere puisque j'ai encore modif des trucs et qu'il y'a maintenant pleins d'autres msgs d'erreurs Non seulement j'ai tjs les memes soucis mais en +, pares avoir modif, j'ai remis comme avant et ça me fait encore + de merdouilles !

[milia]

Désolé je ne peux rien voir vu que je ne peux pas ouvrir les formulaires en mode création.
Si tu es sur que tu as autorisé le null dans ta table je vois pas trop ou peut être le problème.

[stolx_10]

Tu ne peux pas a cause de la version d'access ou pour autre chose ?
Si c'est la version, oui je comprends ( access 2002 10.6501.6804 SP3 ), si c'est autre alors la Houla je ne siais pas ce qui se passe !

[milia]

Je ne peux la voir qu'en lecture seul!
Je pense pas que ça soit à cause de la version moi j'ai access 2003.
C'est sûrement dû au faite que tu as sécurisé ta base, non?