Discussion :

[Acid59]

Bonjour à tous,

Dans le cadre d'un projet, je récupère des données d'une base (access ou sql) dans un fichier txt, chaque champ étant séparé par un |.

Cependant, lorsque l'utilisateur saisi lui même un | dans un des champs (commentaires par exemple), le fichier txt devient non valide car lors de la lecture les champs se retrouvent décalés à cause du | dans le commentaire.

J'aurais aimé savoir s'il était possible de désactiver la saisie de ce caractère sur tout mon projet (avec un KeyUp par exemple) sans avoir à faire une vérification sur chaque champ de saisie.

[DAUDET78]

Dans Keypress , de mémoire, si tu trouves le code

Code :

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

KeyAscii=asc(|)

tu le remplaces par

Code :

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

KeyAscii=0

[ProgElecT]

Salut

1 - Cependant, lorsque l'utilisateur saisi lui même un | dans un des champs
.................
2 - J'aurais aimé savoir s'il était possible de désactiver la saisie de ce caractère sur tout mon projet
..............

Pour le 1, en supposant que l'entrée utilisateur est au niveau d'un ou plusieurs TextBox, pour le 2, avec la propriété KeyPreview de chaque Form.
Illustration, minimum du code dans chaque Form.

Code :

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

1
2
3
4
5
6
Private Sub Form_Load()
Me.KeyPreview = True
End Sub
Private Sub Form_KeyPress(KeyAscii As Integer)
If KeyAscii = 124 Then KeyAscii = 0
End Sub

Ces 2 commandes, dont la première Me.KeyPreview = True peut être faite directement dans l’éditeur VB6, il ne resterait que la deuxième, toute entrée du caractère |,quelque soit le nombre de TextBox sur le form sera éliminè dans l’évènement KeyPress du Form.


Si l'entrée est faite avec un InputBox

Code :

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

1
2
3
4
Dim Rep As String
Rep = InputBox("votre entrée", "Entrée utilisateur", "")
Rep = Replace(Rep, "|", " ")
MsgBox Rep, vbInformation

Pour le 2, il existe une autre solution qui peut agir sur l'ensemble du projet, mais cela est plus couteux en utilisation CPU et ne se justifie surement pas pour ton besoin, de toute façon tu peux procéder pour chaque Form du projet en jouant sur la propriété KeyPreview de chacune d'elle et son événement KeyPress.

[Acid59]

Merci à tous les deux, j'ai testé sur une partie du projet, ça fonctionne parfaitement.

Plus qu'à copier ça sur l'intégralité