Discussion :

[alexkickstand]

bonjour, j'ai fais une requete pour supprimer le premier caractere d'une chaine de caractere si la chaine de caractere commence par 'R'.

mais j'ai un probleme : si une chaine de caractere est plus longue q'une autre il m'enleve les 2 premiers caracteres :

code de la requete

Code :

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

1
2
3
 
UPDATE tbl_query SET matable.Produit = Right(matable.Item,9)
WHERE matable.Item Like 'R*';

mon erreur viens surement de "Right(matable.Item,9)"

exemple j'ai une chaine de caractere :

R008102531 apres la requete j'ai bien 008102531 (1 caractere enlevé)
et une autre
R008102531G apres la requete j'ai 08102531G (2 caracteres enlevé)

en résumé je souhaiterais enlevé le R en début de chaque chaine de caractere si elles contient bien un R en début

merci pour de l'aide

Alex

[Demco]

Utilise la fonction len() à l'intérieur de la fonction Right().

En espérant t'aider.

[alexkickstand]

merci pour ta réponse mais j'ai de la misere pour définir comment enlever uniquement la premiere lettre (niveau syntaxe)

merci de ton aide

Alex

[random]

Code :

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

1
2
 
rigth(machaine,len(machaine)-1)

[alexkickstand]

Code :

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

1
2
 
rigth(machaine,len(machaine)-1)

Code :

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

1
2
3
 
UPDATE tbl_query SET matable.Produit = right(matable.Produit,len(matable.Produit)-1)
WHERE tbl_query.Item Like 'R*';

il me retourne juste un caractere apres la requete "0" ou "1"

ca me laisse pas mal perplexe

Alex

[spaiku]

Les fonctions len et right sont du vba. Il faut que tu les sépares de ton sql.

Tu peux par exemple récupérer la valeur de ta table dans une variable, la transformer avec len et right, et la remettre dans ta requête sql.

Tu peux aussi t'amuser à tout insérer sur la même ligne en coupant ta chaîne et en concaténant les fonctions, mais ce sera nettement moins lisible.

[alexkickstand]

ok merci de ton aide je vais travailler dessus

merci !!!

Alex

[Demco]

Les fonctions len et right sont du vba. Il faut que tu les sépares de ton sql.

Tu peux utiliser les fonction VBA directement dans ton code SQL avec MS Access. Tu peux même créer ta propre fonction et l'utiliser dans le code SQL.

Le code que random t'a donné devrait fonctionner (comme d'hab).
Créé un jeu de test, applique la requête de random et observe le résultat.

[alexkickstand]

j'ai suivis vos conseil de fonction puis j'ai fais ca et ca fonctionne bien

il me reste plus qu'a ajouter la condition que la chaine de caractere doit commencer par "R" pour utiliser la fonction

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
19
20
21
22
23
24
25
26
27
 
Function test()
 
 Dim dbs As Database
 Dim rst As Recordset
 'Dim test As Integer
   Set dbs = CurrentDb
   Set rst = dbs.OpenRecordset("matable")
 
 With rst
 
       Do While Not .EOF
 
            .Edit
            !produit = Right(!produit, Len(!produit) - 1)
 
            .Update
 
          .MoveNext
        Loop '.EOF
     .Close
 
   End With
 
   dbs.Close
 
End Function

merci de votre aide a tous

Alex

[alexkickstand]

voici la fonction avec la condition que la chaine commence par "R"

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
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
 
Function test()
 
 Dim dbs As Database
 Dim rst As Recordset
 'Dim test As Integer
   Set dbs = CurrentDb
   Set rst = dbs.OpenRecordset("matable")
 
 With rst
 
       Do While Not .EOF
 
            .Edit
            If !produit Like "R*" Then
 
            !produit = Right(!produit, Len(!produit) - 1)
 
          Else
 
          MsgBox ("pas de r")
 
          End If
 
            .Update
 
          .MoveNext
        Loop '.EOF
     .Close
 
   End With
 
   dbs.Close
 
End Function

[vodiem]

Mon dieu!

alexkickstand désolé d'arrivée après l'extinction des feux.

random t'avais mis sur la piste: il fallait juste rajouter une fonction VraiFaux()=Iif
j'utilise une subtilité pour l'éviter dans mon ex:

Code :

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

SELECT MaTable.MOT, Right([MOT],Len([MOT])+(Left([MOT],1)="R")) AS M FROM MaTable;