Bonjour à tous,
Je suis en train de créer une DB de mes chansons. Et je ne fais que débuter dans les SGBD.
Pour mes besoins, j'ai crée une table Chansons et ses champs correspondants:
[Table=Chansons]
ID en numérotation automatique
Artiste en texte
Titre en texte
etc...
Sauf les genres car il peut y en avoir plusieurs.
En effet, j'ai lu que s'il y a plusieurs infos sur un champs, alors il faut créer une table 'de jonction' (c'est ce que j'ai lu).
Je ne sais pas si c'est la bonne solution au final, mais pour l'instant je fait ainsi.
Alors soit, je créée une 2ème table:
[Table=Genres_Chanson]
ID en numéro
Genre en texte
Genres_Chanson.ID =
Chansons.ID, Donc un genre est lié à une chanson par son Index
Par exemple, j'ajoute une nouvelle chanson dans
[Table=Chansons] supposée vierge.
Donc première ligne (ou enregistrement):
ID=1 (c'est auto incrémenté)
Artiste="Balavoine"
Titre="L'Aziza"
Pour cette même chanson, j'ajoute 2 'genres' dans
[Table=Genres_Chanson]
1ère ligne:
ID=1 (celui associé à ma chanson)
Genre="Variété française"
2ème ligne:
ID=1 (Et oui, toujours celui associé à ma chanson)
Genre="Favoris"
Cette théorie est un peu longue, mais fallait bien que j'explique le contexte.
Maintenant, je passe à la pratique.
J'ai créé mon fichier
mDB sous MS Access avec les deux tables, mais vides.
Ensuite, je passe par mon appli sous VB6:
(Je précise que je travaille sous ADODB, Provider=Microsoft.Jet.OLEDB.4.0, et que ma connexion est déjà ouverte)
Enregistrement de ma 1ère chanson dans
[Table=Chansons]:
Code Visual Basic :
Dim myRs As New ADODB.Recordset
Dim sSQL As String
'# Mise en forme de la requête
sSQL = "INSERT INTO Chansons (Artiste,Titre) VALUES (""Balavoine"",""L'Aziza"")"
'# Exécution de la requête:
Set myRs = New ADODB.Recordset
'! Rappel : myCnx est déjà ouverte
With Requete_Execute
'# (La requète SQL est dans sSQL)
'# L'exécution:
.CursorLocation = adUseClient
.Open sSQL, myCnx, adOpenStatic, adLockOptimistic
End With
Ca fonctionne, ma
[Table=Chansons] est mis à jour avec
mon premier enregistrement.
Sauf que je ne sais pas comment récupérer
Chansons.ID qui est donné d'office dans cet enregistrement.
Et j'en ai besoin pour créer ma 1ère ligne dans
[Table=Genres_Chanson]
Quelqu'un peut me conseiller?
titicar