concatener avec visual basic

Version imprimable

Code:

1 2 3 4 5 6 7 8 Private Sub SSCC_Click() Set etiquette = CodeDb.OpenRecordset("Etiquette") SSCC = etiquette("code application") & etiquette("code pays") & etiquette("CNUF") & etiquette("lieu de production") = Val(SSCC) End Sub
voila j'ai déjà crée une variable etiquette et je lui ai associé les enregistrements de la table Etiquette.
ensuite, j'ai concatener de la sorte car la valeur va vers une zone texte (sscc) d'un formulaire

si quelqu'un peut m'expliquer pourquoi sa ne marche pas...

merci d'avance

08/06/2007, 08h01
pc75
Bonjour,

C'est quoi ça en fin de ligne ?
Code:

1 2 = Val(SSCC)
08/06/2007, 08h05
johnburton54

val(sscc)

C'est l'endroit ou va la valeur sscc ( la zone texte s'appelle sscc).

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
Private Sub bouton_visualiser_étiquette_Click()
 
  'importe les données d'un fichier texte vers une table
   DoCmd.TransferText acImportDelim, , "étiquette", "C:\Documents and Settings\invité\Mes documents\Projet Traçabilité - BURTON\application pour étiquettes", True
 
    Set etiquette = CodeDb.OpenRecordset("étiquette")
 
    Count.Value = Val(etiquette("Count")) ' qualiticatif incorrect
 
    EAN.Value = Val(etiquette("EAN")) 'objet requis
 
    SSCC.Value = Val(etiquette("code application") & etiquette("code pays") & etiquette("CNUF"))
 
    Application.Echo False
    DoCmd.Minimize
    DoCmd.OpenForm "Etiquette"
    DoCmd.Maximize
    DoCmd.GoToRecord , , acNewRec
    Application.Echo True
 
End Sub

Dans mes commentaire sont compris mes problèmes.

08/06/2007, 09h11
Invité

Bonjour

Montre-nous comment tu as déclaré tes variables et tes objets, et où.

Starec
08/06/2007, 09h18
davidou2001

Tu ne peux pas ecrire comme ca en fin de ligne = VAL(...) Si tu as une affectation a faire, fait la avant puis effectue ta concatenation
08/06/2007, 11h07
johnburton54

toutes mes variables et mes objets sont déclarés dans la table "étiquette"

dsl si je ne suis pas plus précis mais je ne vois pas quoi écrire d'autre.
08/06/2007, 12h11
pc75
Re,

Que cherches-tu à faire exactement avec cette ligne ?
Code:

1 2 Count.Value = Val(etiquette("Count"))
08/06/2007, 12h31
Invité

Citation:

Envoyé par johnburton54

toutes mes variables et mes objets sont déclarés dans la table "étiquette"

dsl si je ne suis pas plus précis mais je ne vois pas quoi écrire d'autre.

:koi:
Starec
08/06/2007, 15h27
johnburton54

Citation:

Envoyé par pc75

Que cherches-tu à faire exactement avec cette ligne ?

Code:

Count.Value = Val(etiquette("Count"))

etiquette est ma table, Count est un champ de cette table
La valeur de Count je l'a met dans Count qui est une zone de texte.

voila
11/06/2007, 08h07
pc75
Re,

Alors déjà ne nomme pas un champ avec le mot count qui est un mot réservé.

Si j'ai tout compris ...
Code:

1 2 ZoneTexte.text = Val(MaTable("MonChamp"))
12/06/2007, 09h21
johnburton54

c bon j'ai trouvé merci