Code Access VBA vers WinDev

Bonsoir à tous,

J'ai téléchargé la version express de WINDEV afin de l'étudier, pouvez-vous me donner un exemple pour transformer ce code écrit en VBA Access, il vérifie avant la mise à jour si ce numéro n'existe pas( clé primaire), si "oui" on envoie un message à l'utilisateur puis le champ de saisie s'efface pour taper une bonne valeur.
en bref il ne peut pas y avoir de doublon possible.

Code:

---

1 2 3 4 5 6 7

Private Sub National_BeforeUpdate(Cancel As Integer) If DCount("*", "TROUPEAU", "[Dixchiffres]='" & Me.DixChiffres & "'") > 0 Then MsgBox "Cet animal existe déjà dans la base de donnée.", , "Saisie d'un doublon" Me.Undo Cancel = True End If End Sub

---

Merci d'avance :(

Hello,
Je vais faire très théorique, car tu donnes peu d'information sur ton problème sauf à connaitre une clé existante....
Alors, je suppose que tu as un fichier [TROUPEAU] et qu'il possède un identifiant unique (IDTROUPEAU)...
Mais dans le code fourni par VBA, apparement, c'est un identifiant d'un animal, donc, à rajouter dans le fichier [TROUPEAU] un [IDANIMAL] qui sera lui aussi unique (je sais, pour les puristes, j'ai deux ID uniques, mais bon...)
Et donc, lorsque tu tapes l'identifiant de l'animal dans un champs de saisie, il faut faire cela en sortie de champs

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16

si saisie_idanimal.. modifie = vrai alors // on recherche dan sla base si cela existe hrecherche(troupeau, idanimal, saisie_idanimal) si htrouve(troupeau) alors // et oui! il existe le bougre info("L'identifiant que vous saisissez est déjà présent dans la base") // vide le champs saisie_idanimal = "" // on enleve la modification saisie_idanimal..modifie = faux // reprend la saisie sur le champs reprisesaisie(saisie_idanimal) // fin du si htrouve fin // fin de si modifie fin

---

Voilà, rien de compliqué en soit, mais je t'invite à bien suivre l'autoformation de windev, au risque pour toi d'être déçu par le produit... Il est très puissant et sa facilité d'utilisation ne doit pas cacher le temps à passer à le découvrir...

Merci beaucoup mon Ami,
Je vais suivre tes conseils, très bon logiciel mais pas simple pour démarrer avec.

Dans la version express on peut transformer le code VBA en codage Windev ?
Sinon dans la version 15 c'est possible ?

@ bientôt :ccool:

Citation:

---

Envoyé par Nounours1

Dans la version express on peut transformer le code VBA en codage Windev ?

---

À priori, presque. Il y a une fonction d'importation de code vb 6 dans Fichier >> Importer. Mais cela ne fonctionne que très partiellement et le vba et Windev sont tellement différent que la meilleur solution serait surement de reprendre à 0 avec les bons concepts de programmation.

Citation:

---

Envoyé par Nounours1

Dans la version express on peut transformer le code VBA en codage Windev ?

---

C'est certainement la plus mauvaise manière d'aborder WinDev.

WinDev est particulier et le W-Langage également.
Je suis très tenté de dire qu'il y a un "mode de pensée WinDev".
Donc, il faut "oublier" ses acquits et apprendre WinDev pour WinDev et développer en WinDev et non "traduire" du VB (ou autre) en WinDev.

Bien sûr cela ne vaut pas pour les traitements usuels comme, par exemple, les conditions, les boucles, etc.

Il est très important notamment d'apprendre à se servir de l'aide et d'avoir une bonne idée des fonctions proposées (voir ce message http://www.developpez.net/forums/d28...p/#post5043004)

Hello,
Lorsque tu dis

Citation:

---

Je vais suivre tes conseils, très bon logiciel mais pas simple pour démarrer avec.

---

Il faut bien se rendre compte que Windev est facile quand on a des bases de programmation, même de très bonnes bases. Mais sans base, voire en deçà, et quelque soit le produit, tout est très dur... et rapidement

Excusez moi du retard, merci à vous tous pour vos réponses.

;)

@+