<% '***** Connection Set ConnLHG = Server.CreateObject("ADODB.Connection") ConnLHG.Open "Driver={Microsoft Access Driver (*.mdb)};DBQ=D:\wwwroot\lozere-histoire-genealogie.com\databases\LHG.mdb;" '***** Recherche des BMS SQL_Travaux="select * from Travaux" set RsTravaux = Server.CreateObject("ADODB.Recordset") RsTravaux.Open SQL_Travaux, ConnLHG, 3, 3 %> LHG - Notaires <% '***** Recherche des Notaires SQL_Travaux="select * from Travaux where Type='Notaires' order by Argtri asc, TxtFichier asc" set RsTravaux = Server.CreateObject("ADODB.Recordset") RsTravaux.Open SQL_Travaux, ConnLHG, 3, 3 Commune="" If Not RsTravaux.eof Then While Not RsTravaux.eof ' ATTENTION ' il faut tester different pour la rupture de commune ' sinon les lettres accentuees sont > que les lettres normales ' le cas de Séverac qui est > que St Chély ' If RsTravaux("Argtri")<> Commune then Commune = RsTravaux("Argtri") Nomcom = mid(Commune,2,40) Response.Write("" & VbCr) End If Nouv = RsTravaux("TxtFichier") Nomnot = mid(Nouv,1,1) ' tester le premier caractère, avant le nom du notaire, qui doit être espace pour ne pas affichier le fichier ' test des relevés de Philippe Maurice afin de ne pas pointer sur le fichier ' mais faire référence à sa rubrique pour obtenir le .pdf If Nomnot = " " then Response.Write("" & VbCr) else Nouveau = mid(Nouv,1,1) If Nouveau = "*" then Nomfic = replace(Nouv,"*"," ") Response.Write("" & VbCr) Else Response.Write("" & VbCr) End if End if RsTravaux.MoveNext Wend End If %>
Les relevés systématiques et les travaux présents sur notre site sont la propriété de l'association. Ils sont d'ailleurs tous enregistrés chez Copyright. Ils sont destinés aux généalogistes amateurs pour un usage personnel et tout commerce est formellement INTERDIT. Il est également interdit de publier nos relevés systématiques sous quelque autre format que ce soit . Les associations de généalogie, les sociétés ou les particuliers ne peuvent en aucun cas les publier sur leur site Internet. Pour tout autre référencement, nous contacter.
Malgré l'attention et le soin que nous portons à nos relevés, les erreurs de lecture sont inévitables. Il vous est conseillé de toujours les vérifier.

Relevés des minutes des notaires

Nos états sont classés par ordre ALPHABETIQUE et nous vous conseillons de chercher toutes les variantes possibles, par exemple :
AYGLIN / EYGLIN - HEBRARD / EBRARD - CROS / DUCROS - VALES / BALES  etc...
" & Nomcom &"
 " & RsTravaux("TxTFichier") & "
 " & Nomfic & "
 " & RsTravaux("TxTFichier") & "