[]
Nombre de membres 1 membre
Connectés : ( personne )
 

La Charte du Forum - La Charte du Forum

Forum - Forum
Problèmes Access des débutants - Problèmes Access des débutants


clos par 3Stone le 10/02/2011 : 17:50  Sujet n° 412  Extraction de chaine dans champ text

le 22/10/2010 : 09:42
par Marc

Anonyme

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
 sujet clos  Haut

[]   

DébutPrécédent [ 1 2 3 ] SuivantFin
Réponse n° 17
--------
le 24/11/2010 : 22:00
par 3Stone

Anonyme

Administrateur

Bonsoir,
 
Citation :

la ligne reste bloquée avec le petit crayon côté gauche

 
Désolé, mais je n'arrive pas à imaginer la construction du formulaire...

Je ne peux que te proposer de me faire parvenir ta base.
Pour cela, tu fais d'abord une copie de ta base, ensuite :
  • éventuellement supprimer les tables et formulaires qui n'interviennent pas du tout dans le problème (mais laisser de quoi tester réellement)
  • tu vides cette copie des données personnelles
  • tu la compactes (Outils, Utilitaires de base de données, Compacter une base de données)
  • si possible, tu la zippe (zip ou rar)
  • tu te sert de ceci pour me la faire parvenir
J'espère ainsi comprendre ce qui bloque dans ton organisation du formulaire.

Cordialement,
Pierre(3stone)
  clos par 3Stone le 10/02/2011 : 17:50  Haut
Réponse n° 18
--------
le 30/11/2010 : 06:25
par 3Stone

Anonyme

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)
  clos par 3Stone le 10/02/2011 : 17:50  Haut
Réponse n° 19
--------
le 03/12/2010 : 14:13
par Marc

Anonyme

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 k

cordialement Marc

  clos par 3Stone le 10/02/2011 : 17:50  Haut
Réponse n° 20
--------
le 03/12/2010 : 15:17
par 3Stone

Anonyme

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)
  clos par 3Stone le 10/02/2011 : 17:50  Haut
Réponse n° 21
--------
le 05/12/2010 : 17:27
par Marc

Anonyme

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

Ecrire à Marc   clos par 3Stone le 10/02/2011 : 17:50  Haut
Réponse n° 22
--------
le 06/12/2010 : 17:32
par 3Stone

Anonyme

Administrateur

Bonjour,

 
Citation :

Private Sub Form_BeforeUpdate(Cancel As Integer)
Private Sub Barrecode_AfterUpdate()

 

M'enfin k  
C'est uniquement le code qu'il faut déplacer...

Je viens de te retourner la base exemple adaptée...
Mais je continues à dire que la façon de faire n'est pas heureuse l

Cordialement,
Pierre(3stone)
  clos par 3Stone le 10/02/2011 : 17:50  Haut
Réponse n° 23
--------
le 08/12/2010 : 17:03
par Marc

Anonyme

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

Ecrire à Marc   clos par 3Stone le 10/02/2011 : 17:50  Haut
Réponse n° 24
--------
le 09/12/2010 : 15:03
par 3Stone

Anonyme

Administrateur

Bonjour,

 
Citation :

le seul probléme qui me faisait foirer mes tentatives c'est qu'il fallait baisser la sécurité des macros

 
Oui, grande innovation des plus ridicules... mais, normalement, Access signale le fait qu'il bloque l'exécution des macros...

Cordialement,
Pierre(3stone)
  clos par 3Stone le 10/02/2011 : 17:50  Haut
DébutPrécédent [ 1 2 3 ] SuivantFin
actif sujet actif   clos sujet clos   Important! Important!   Nouveau Nouveau message   -   Rectifier Rectifier message   Clôturer Clôturer sujet   Remonter Remonter
[]
Catégories de discussion  Forum 



Haut