Petit problème AccessRésolu

Question

Bonjour, voilà j'ai un petit blème qui me turlupine la tête depuis un petit moment....
Voilà : comment détecter dans une base Access si un champs existe et si il n'existe pas pouvoir le créer....

Je vous remercie d'hors et déjà pour vos réponses....

:)Sator :)

cs_Exploreur · Accepted Answer

Salut,

Aprés une recherche tu peux regarder ces 2 liens qui pourront peut-être répondre à ta question avec un peu de revue au niveau du code (+ le lien1) :

Lien1 ; Lien2

A+
Exploreur

cs_Exploreur · Answer

Salut,

Je pense et peut me tromper, mais quand tu va faire l'enregistrement d'une donnée dans ton champ qui n'existe pas, cela va te retourner un numéro d'erreur...De là tu peut en déduire que ton champ n'existe pas et le créer...Maintenant il se peut qu'il y est une méthode plus rapide de faire la vérification(présence d'un champ)...D'ailleurs je vais faire un tour sur un site, pour pouvoir t'en dire un peu plus(si défois pas de réponse avant...)

A+
Exploreur

cs_Sator · Answer

Je te remercie pour tes recherches.... effectivement j'aurais dù commencer par là....
en fait le lien 2 m'a appris pleins de chose raison pour là-quelle je met que la réponse à été accepté et si dans tous ça je trouve pas mon bonheur.... bref tu m'as compris....
Mille fois merci pour ton aide,

@+ Sator

mortalino · Answer

Salut, voici déjà comment savoir si un champs existe : Dim Rs As Recordset Dim Db As Database Dim fld As Field Dim bExiste As Boolean Set Db = DBEngine.Workspaces(0).OpenDatabase("C:\Chemin\NomBase.mdb") sql = "SELECT * FROM Nom_Table" On Error Resume Next Set Rs = Db.OpenRecordset(sql) Rs.MoveFirst For Each fld In Rs.Fields If "NomChampsAVerifier" = fld.Name Then bExiste = True Next fld Set Rs = Nothing ' on ne vide pas la variable Db référencée (pour la suite) On Error GoTo 0 MsgBox "Existance du champs : " & Cstr(bExiste) ~ Mortalino ~ Colorisation automatique @++

--Mortalino-- "J'peux vous dire que tavernier, c'est pas une sinécure."

cs_Sator · Answer

En fait ça à l'air prometteur... mais je plante sur : Dim Db As Database il me refuse le database comme non défini par l'utilisateur... donc quel est la bibliothèque stp... 
sinon merci beaucoup, en espérant lire la suite....

:)Sator :)

cs_Sator · Answer

En fait j'ai trouvé.... c'est une bibliothèque DAO et je bosse en ADO .... mais voilà donc pour la bibliothèque puis j'ai dimensionner la variable sql... sinon nickel... merci infiniment A vous deux....

:)Sator :)

cs_Sator · Answer

ps : j'ai parlé trop vite.... Mortalino
en fait n'importe quel champ existe.... le champ Id qui existe dans ma base existe pour ton code en revanche le champ "abcd" qui n'existe pas dans ma base existe pour ton code.... moi pas tout comprendre, car ton code a l'air logique....

merci quand même

:)Sator :)

mortalino · Answer

Salut Sator,

oui effectivement mon code est en DAO, et tu as raison de préférer ADO.
Je ne m'y suis pas encore mis mais peux tu me filer un bout de ton code, j'essaierai  ;)

@++ 

<hr width="100%" size="2" />
  --Mortalino--
Le mystérieux chevalier, ~Provençal, le Gaulois~
/D

cs_Sator · Answer

Salut, je vois pas très bien ce que je peux te refiler...  compte tenu le fait que c'est la vérification de l'existance d'un champ...
j'ai placer un logiciel que j'ai fais chez quelqu'un puis j'ai modifier les bases de données...
car les exigences clients avaient changé... donc plutôt que des les modifier manuellement j'aurais préféré que le logiciel s'en charge...
voilà. merci pour ton attention

:)Sator :)

Petit problème Access

9 réponses

Votre réponse

Discussions similaires