liste de noms? [Résolu]

[knucky]

bonjours;

j'ai un exercice sur access à faire et je voudrais savoir si il existe des tables toute faite avec des noms et des prénoms factices que je pourais télécharger. Je sais pas si cela existe mais cela me faciliterai la tache.

Merci d'avance.

[loufab]

Bonjour,

tu as la base exemple livrée avec Access, de mémoire elle en contient.

tu peux peut être faire un générateur aléatoire d'enregistrement, ça peut faire un excellent exercice d'apprentissage

Cordialement,

[stigma]

Voici un petit code que je viens de faire pour générer 50 noms aléatoires de 5 à 15 car chacun. Après tu les balances dans une table.

Code :

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Function RandomNoms()
 
    Dim s_nom As String
    Dim i As Integer, j As Integer
 
    For i = 1 To 50
        s_nom = ""
        For j = 1 To Int(10 * Rnd) + 5
            s_nom = s_nom + Chr(Int(26 * Rnd) + 65)
        Next j
        Debug.Print s_nom
    Next i
 
 
End Function

[knucky]

merci pour ces reponses rapide.

stigma, ton code je le copie où pour qu'il génere les noms? Car je suis pas trop une béte dans tous ce qui est code et programmation.

[stigma]

tu le mets où tu veux, dans un module ou un form.
Mais à la place de debug.print s_nom, tu devras l'envoyer à un sub du genre

Code :

Call AjouterNom(s_Nom)

le sub :

Code :

1
2
3
4
5
6
7
8
9
10
11
Sub AjouterNom(Nom As String)
 
    Set rst = db.OpenRecordset("taTable")
    With rst
        .AddNew
        .Fields ("TonChamp") = Nom
        .Update
        .Close
    End With
 
End Sub

Sans oublier un Set db = CurrentDb (par exemple) au début de ton code.

Si tu ne connais pas le VBA je te conseille de te plonger dedans si tu veux aller plus loin avec Access. Tu trouveras pas mal de tutos ici.

[knucky]

ok merci.
je crois que je vais me lancer dans le vba (d'ailleur j'y vais de ce pas) car pour l'instant je n'ai que les bases que j'ai vu en cours c'est a dire pas grand chose.

[stigma]

Tu verras, c'est pas si compliqué que ça, c'est que du Basic. Fonce !