Recherche dans une colonne
araissi
Messages postés
1
Date d'inscription
mercredi 4 février 2004
Statut
Membre
Dernière intervention
4 février 2004
-
4 févr. 2004 à 15:49
cs_labout Messages postés 1356 Date d'inscription samedi 8 décembre 2001 Statut Membre Dernière intervention 23 octobre 2006 - 4 févr. 2004 à 18:00
cs_labout Messages postés 1356 Date d'inscription samedi 8 décembre 2001 Statut Membre Dernière intervention 23 octobre 2006 - 4 févr. 2004 à 18:00
A voir également:
- Recherche dans une colonne
- Vba parcourir une colonne - Forum Visual Basic 6
- Vba rechercher une valeur dans une colonne ✓ - Forum Visual Basic 6
- Barre de recherche php - Forum PHP
- Selectionner la derniere cellule non vide d'une colonne excel vba ✓ - Forum Visual Basic 6
- Parcourir colonne pour comparaison de date ✓ - Forum VBA Office (Excel, Word ...)
1 réponse
cs_labout
Messages postés
1356
Date d'inscription
samedi 8 décembre 2001
Statut
Membre
Dernière intervention
23 octobre 2006
8
4 févr. 2004 à 18:00
4 févr. 2004 à 18:00
labout
C'est une requete qu'il faut faire
Select macolonne from matable where macolonne="montext"
Si c'est du VB
avec ADO
dim connect as new adodb.connection
dim rs as new adodb.recordset
dim req as string
sconnectstring= _
"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\mabase.MDB;Mode=ReadWrite|Share Deny None;Persist Security Info=False;Jet OLEDB:Create System Database=True;Jet OLEDB:Compact Without Replica Repair=True"
connect.connectstring=sconnectstring
req="Select macolonne from matable where macolonne='" & montext & "'"
connect.open
set rs=connect.execute req
connect.close
Bien sur il faut inclure le composant ADO par projet/composant
C'est une requete qu'il faut faire
Select macolonne from matable where macolonne="montext"
Si c'est du VB
avec ADO
dim connect as new adodb.connection
dim rs as new adodb.recordset
dim req as string
sconnectstring= _
"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\mabase.MDB;Mode=ReadWrite|Share Deny None;Persist Security Info=False;Jet OLEDB:Create System Database=True;Jet OLEDB:Compact Without Replica Repair=True"
connect.connectstring=sconnectstring
req="Select macolonne from matable where macolonne='" & montext & "'"
connect.open
set rs=connect.execute req
connect.close
Bien sur il faut inclure le composant ADO par projet/composant
