Bonjour.
Je doit remplir une base de données de windev à access.La base simplifier ce compose de commune code insee en identifiant et d'un resp code insee clé étrangère.
j'ai ajouter mes communes sans probléme, mais lorsque je veux ajouter mes responsables ( tiré d'une autre base sans le code insee) j'ai un probléme.
Pour récupéré la clé étrangère j'ai une premiére étape qui enleve les chiffre dans le nom de la commune, ensuite une requete qui avec le nom de la commune et sont code postal me donne le code insee.
Code :
//initialisation de la jauge pour voir le traitement
Jauge1..BorneMax=HNbEnr(Responsables)
Jauge1..BorneMin=0
transfert est une chaîne
//lecture dans la table source
HLitPremier(Responsables)
TANTQUE PAS HEnDehors(Responsables)
// suprétion des chiffres dans le nom de la commune
transfert=Remplace(Responsables.VILLE,9,"")
transfert=Remplace(Responsables.VILLE,8,"")
transfert=Remplace(Responsables.VILLE,7,"")
transfert=Remplace(Responsables.VILLE,6,"")
transfert=Remplace(Responsables.VILLE,5,"")
transfert=Remplace(Responsables.VILLE,4,"")
transfert=Remplace(Responsables.VILLE,3,"")
transfert=Remplace(Responsables.VILLE,2,"")
transfert=Remplace(Responsables.VILLE,1,"")
transfert=Remplace(Responsables.VILLE,0,"")
//execution de la requete HExécuteRequête(SelcetCommuneResp,hRequêteDéfaut,Responsables.CP_RESP,transfert)
//passage des valeurs
T_RESPONSABLE.adresse1_resp=Responsables.ADRESSE1
T_RESPONSABLE.adresse2_resp=Responsables.ADRESSE2
T_RESPONSABLE.civilite_resp=Responsables.TITRE
T_RESPONSABLE.fax_resp=Responsables.FAX_RESPON
T_RESPONSABLE.id_commune_resp = SelcetCommuneResp.code_insee_commune
T_RESPONSABLE.mail_resp=Responsables.E_MAIL_RESPON
T_RESPONSABLE.nom_resp=Responsables.NOM_PRENOM
T_RESPONSABLE.port_resp=Responsables.PORTABLE_RESPON
T_RESPONSABLE.raison_social_resp=Responsables.RAISON_SOCIAL
T_RESPONSABLE.tel_resp=Responsables.TEL_RESPON
//ajout dans la nouvelle base
HAjoute(T_RESPONSABLE,hIgnoreIntégrité)
//lecture suivante
HLitSuivant(Responsables)
//incrémentation de la jauge
Jauge1++
FIN
lorsque j'effectue mes tests un message d'érreur apparait :
Erreur à la ligne 29 du traitement Clic sur Ajout_responsable.
Vous avez appelé la fonction HAjoute.
Erreur de l'accès OLE DB.
Numéro d'erreur = 170147
Echec de la mise à jour de l'enregistrement sur la base de données.
Détail de l'erreur système :
Description = Vous ne pouvez pas ajouter ou modifier un enregistrement car l'enregistrement associé est requis dans la table 'T_COMMUNE'.
Source = Microsoft JET Database Engine
Help Context = 5003000
SQL State = 3201
Error Number = -2147217887
Native Error Number = -535037517
pourriez vous éclairer ma lantérne sur le moyen de faire cette ajout dans la nouvelle base
yoh76710