1 membre
Connectés : ( personne )
- La Charte du Forum - Forum - Problèmes Access des débutants
Sujet n° 412 |
Extraction de chaine dans champ text |
le 22/10/2010 : 09:42 par Marc
visiteur |
Bonjour,Je suis entrain de faire un test sur la façon de pouvoir gérer des boites de films vierge pour le cinéma avec leur barrecodeDans la chaine du barrecode,il y-a à un endroi toujour la même valeur,donc que j'extrais par la fonction MID et qui fait référence surune base articles ce qui me permet d'afficher d'autre valeurs dans les différents champs ,ceci dans une liste déroulante ce qui m'oblige a cliquer dessus pourafficher le résultat ,donc comment ,peut-on afficher cette valeur unique dans un champ texte uniquementmerci pour votre réponseMarc |
|
|
Réponse n° 18 -------- le 30/11/2010 : 06:25 par 3Stone
Administrateur
|
Bonjour,
J'ai jeté un oeil et comme dit, l'organisation est à l'opposé de ce qu'il faut faire. En particulier le sous-formulaire scinde ce que contient déjà le code barre. Cela peut être afficher pour facilité la lecture, mais cela ne doit pas être enregistré.
Pour ton problème de "crayon", l'enregistrement n'étant pas sauvé, il faut déplacer le code qui est "sur après mise à jour" dans l'événement "sur avant mise à jour".
Cordialement, Pierre(3stone) |
|
|
Réponse n° 19 -------- le 03/12/2010 : 14:13 par Marc
visiteur |
Bonjour,
[il faut déplacer le code qui est "sur après mise à jour" dans l'événement "sur avant mise à jour"] C'est ce que j'ai fait,mais j'ai un message d'erreur de syntaxe ,d'opérande enfin bref je ne comprends rien ,je ne veux pas du tout cuit,mais je voudrais bien que ça fonctionne ,alors je mets quoi ou exactement
cordialement Marc |
|
|
Réponse n° 20 -------- le 03/12/2010 : 15:17 par 3Stone
Administrateur
|
Bonjour,
Dans le sous-formulaire, tu as du code qui est placé dans l'événement sur "Après mise à jour". Si tu déplace ce code, sans le modifier, dans l'événement "Avant mise à jour", cela fonctionne comme tu souhaites.
Je parle bien sur de l'exemple que tu m'as fait parvenir...
Cordialement, Pierre(3stone) |
|
|
Réponse n° 21 -------- le 05/12/2010 : 17:27 par Marc
visiteur |
Bonjour,
Je pense avoir essayé de copier ce code de différentes façons et bien ça ne fonctionne pas ,je suis vraiment navré,car j'ai l'impréssion que ça doit pas être sorcier pour vous ,alors voici ce que ça donne le déplacement.j'ai aussi parfois enlever la 1ere et derniére ligne,mettre le code aprés je ne comprant pas ou vraiment le copier.
Private Sub Form_BeforeUpdate(Cancel As Integer) Private Sub Barrecode_AfterUpdate() Code = Mid(Barrecode, 8, 9) Emul = Mid(Barrecode, 17, 3) Axe = Mid(Barrecode, 20, 5) Boite1 = Mid(Barrecode, 25, 2) boite2 = Mid(Barrecode, 27, 2) End Sub
Private Sub Form_AfterUpdate() Dim Db As DAO.Database Dim Rs As DAO.Recordset Set Db = CurrentDb Set Rs = Db.OpenRecordset("Select * From T_Articles Where Code=" & Code) Catalogue = Rs!Catalogue Codetech = Rs!Codetech Métrage = Rs!Métrage Format = Rs!Format Rs.Close Db.Close Set Rs = Nothing Set Db = Nothing
End Sub End Sub |
|
|
Réponse n° 23 -------- le 08/12/2010 : 17:03 par Marc
visiteur |
Bonjour,
De toutes les façons dont j'avais déplacer le code , il y avait bien celle que tu as envoyé ,le seul probléme qui me faisait foirer mes tentatives c'est qu'il fallait baisser la sécurité des macros,je m'en suis apercu trop tard
merci pour ton aide
Marc |
|
|
sujet actif
sujet clos
Important!
Nouveau message -
Rectifier message
Clôturer sujet
Remonter
|