CARNET D'ADRESSES - BASE DE DONNÉES ACCESS & ADO 2.0
Verbatime900MB
Messages postés
2
Date d'inscription
samedi 26 janvier 2002
Statut
Membre
Dernière intervention
26 janvier 2002
-
26 janv. 2002 à 22:46
Gixe Messages postés 2 Date d'inscription jeudi 27 mai 2010 Statut Membre Dernière intervention 4 décembre 2010 - 4 déc. 2010 à 00:37
Gixe Messages postés 2 Date d'inscription jeudi 27 mai 2010 Statut Membre Dernière intervention 4 décembre 2010 - 4 déc. 2010 à 00:37
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.
https://codes-sources.commentcamarche.net/source/2464-carnet-d-adresses-base-de-donnees-access-ado-2-0
https://codes-sources.commentcamarche.net/source/2464-carnet-d-adresses-base-de-donnees-access-ado-2-0
4 déc. 2010 à 00:37
Avec du retard merci pour cette source en plus très bien commentée, ce qui facilite le travail d'un débutant.
Pour un club de sport gérant 450 membres, je l'ai juste modifié pour y ajouter des champs supplémentaires( 27 chez moi) et elle tourne parfaitement.
19 mars 2008 à 18:22
je viens de télécharger le zip mais la base de donnet : carnet d'adresse ne contient pas de formulaire, en fait il y a seulement 1 table.
bizarre.
quel qu un a t il une idée?
merci
steph
27 août 2006 à 06:12
11 sept. 2003 à 19:07
Salutations,
Cyrille
11 sept. 2003 à 19:07
Salutations,
Cyrille
11 sept. 2003 à 18:42
11 sept. 2003 à 12:04
Si tu fais d'autres tests, je suis persuadé que d'autres erreurs vont survenir. C'est bien d'avoir utilisé une condition IF mais si tu veux faire pro, utilise plutot une fonction ou un module de gestion des erreurs. allez michele encore un peu de travail (rires).
Cyrille.
11 sept. 2003 à 11:18
J’ai testé ton carnet d’adresse qui est bien fait.
Juste une petite remarque si tu me le permets.
Lors de la recherche d’un nom comprenant un apostrophe une erreur se produit, afin d’y remédier je te propose la solution ci-dessous.
A+ Michele
Dans la partie Private Sub TextRecherche_Change() modifie de la manier suivant
Dim ListItemResultat As ListItem
Dim IntegerIndex As Integer
' Mise à jour de la ListView
ListViewResultat.ListItems.Clear
' Mise à jour des zones de texte
Dim StrApostrophe As String
If (InStr(TextRecherche, "'")) Then
StrApostrophe = SrchReplace(TextRecherche)
Else
StrApostrophe = TextRecherche
End If
' Recherche par Nom
If ((Not Trim(TextRecherche.Text) "") And (ComboRecherchePar.ListIndex 0)) Then
resultatADO.Filter = "NomPrenon LIKE '" & Trim(StrApostrophe) & "*'"
End If
Et ajoute cette fonction
Function SrchReplace(ByVal sStringToFix As String) As String
Dim iPosition As Integer
Dim sCharToReplace As String
Dim sReplaceWith As String
Dim sTempString As String
sCharToReplace = "'"
sReplaceWith = "''"
iPosition = InStr(sStringToFix, sCharToReplace)
sTempString = ""
Do While iPosition
sTempString = sTempString & Left$(sStringToFix, iPosition - 1)
sTempString = sTempString & sReplaceWith
sTempString = sTempString & _
Mid$(sStringToFix, iPosition + 1, Len(sStringToFix))
iPosition = InStr(iPosition + 1, sStringToFix, sCharToReplace)
Loop
SrchReplace = sTempString
End Function
18 mai 2003 à 18:56
Salutations,
Cyrille.
18 mai 2003 à 12:58
comment tu fait por afficher les resultat dans le listview
comme je debute en vb ce seré simpa de maider plz
merci davance
je me repète peu etr mais ton prog et super mais on peu ossi le fair en dao ?? non?
c tt ce ke javé a dire !
@+
28 nov. 2002 à 16:52
bon travail, ca marche du premier coup (je dis cela pour ceux qui envoient des projets avec des bases de données mises a des adresses fixes au lieu de faire comme Cyrille avec App.Path
connectionADO.ConnectionString = App.Path & "Adresses.mdb"
bien vu !
27 août 2002 à 04:17
J'aurais aimé pour complèter la leçon avoir des DBCombo, DBList, ....
Dans la prochaine verion peut-être.
En tout cas je suis à la recherche d'exemples qui mettent en oeuvre un DBCombo pour gèrer une colonne de table qui fait référence à une autre table.
Alors si qq'un a cela, je suis preneur
27 août 2002 à 04:17
J'aurais aimé pour complèter la leçon avoir des DBCombo, DBList, ....
Dans la prochaine verion peut-être.
En tout cas je suis à la recherche d'exemples qui mettent en oeuvre un DBCombo pour gèrer une colonne de table qui fait référence à une autre table.
Alors si qq'un a cela, je suis preneur
9 août 2002 à 15:16
9 avril 2002 à 11:38
J'y pense fortement !
Cyrille.
9 avril 2002 à 00:30
Si tu peux mettre en ligne un cours sur l'ADO ça sera mieux..........
9 avril 2002 à 00:30
Si tu peux mettre en ligne un cours sur l'ADO ça sera mieux..........
26 janv. 2002 à 22:46