Forum |  HardWare.fr | News | Articles | PC | S'identifier | S'inscrire | Shop Recherche
776 connectés 

  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  aide sur acces table access en vb

 



 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

aide sur acces table access en vb

n°1376141
pouetpouet​60
Posté le 28-05-2006 à 10:42:03  profilanswer
 

bonjour
je suis debutant en vb et je cherche a acceder a une table sous access pour aller sélectionner certains enregistrements et les sortir dans un fichier texte.
merci de vos reponses

mood
Publicité
Posté le 28-05-2006 à 10:42:03  profilanswer
 

n°1376149
kiki29
Posté le 28-05-2006 à 11:14:11  profilanswer
 

Voir liens sur
http://forum.hardware.fr/hardwaref [...] 1125-1.htm


Message édité par kiki29 le 28-05-2006 à 11:15:04
n°1376153
pouetpouet​60
Posté le 28-05-2006 à 11:49:40  profilanswer
 

c'est pas ce que je veux !!!!!! en fait je fait saisir une date dans un caption et je veux selectionner dans la table access externe les enregistrements concernant cette date et les sortir dans un fichier texte!!!!
merci

n°1376177
kiki29
Posté le 28-05-2006 à 13:18:26  profilanswer
 

Pas de bras pas de chocolat
ce qui se conçoit bien s'énonce clairement


Message édité par kiki29 le 28-05-2006 à 13:24:09
n°1377552
erefdata
"Fiat Lux"
Posté le 30-05-2006 à 14:19:37  profilanswer
 

Je pense que tu dois te pencher sur une requète SQL du style:
" SELECT * FROM maTable Where DateMémorisée= '25/12/2005' " par exemple, où maTable est le nom de la table à explorer, et 'DateMémorisée' est le champ présent dans 'maTable', contenant les dates .
Cette requète veux dire: Selectionne tous les champs de la table 'maTable' pour lesquels, le champ 'DateMémorisée' est içi égal à '25/12/2005'.
regarde dans l'aide de VB (c'est assez explicite), à la rubrique: 'SELECT'
 
Ton code doit donner à peu près ça:
 
Option Explicit
' variables communes à toutes les commandes
Dim DB As Database
Dim ra As Recordset
 
Private Sub Form_Load()
Set DB = OpenDatabase("C:\........\BDD.mdb" )
Set ra = DB.OpenRecordset("SELECT * FROM maTable Where DateMémorisée= '25/12/2005'", dbOpenDynaset)
End Sub
 
Ce qui veut dire que 'ra' ne contient que les enregistrements dont le champ 'DateMémorisée' est au '25/12/2005".
(Attention aux espaces qui peuvent 'pourrir' la vie !!)
 
Voilà !!  essaie ça !!
 
Fred....  

n°1377858
kiki29
Posté le 30-05-2006 à 23:34:42  profilanswer
 

http://www.vb-helper.com/AdoTalk/AdoTalk.zip tu as un programme nommé QueryFld.vbp qui te permet de créer des requêtes dont le
résultat est affiché dans une MSFlexgrid
sur le même site http://www.vb-helper.com tu as des exemples de manipulation de MSFlexgrid
 
Pour les dates il me semble que la syntaxe dans une requête doit ressembler à #25/12/2005#
 
pour le Programme QueryFld.vbp
dans la Function WhereClause() as string
tu places un
 
ElseIf IsDate(txtValue(i)) Then
                    where_clause = where_clause & _
                        "([" & cboField(i).Text & "] " & _
                        cboOperator(i).Text & " #" & _
                        Format$(txtValue(i).Text, "mm/dd/yyyy" ) & _
                        "#)  AND "
 
à l'endroit correct
Les crochets permettent d'avoir des champs contenant des espaces
il serait souhaitable d'en ajouter ailleurs
tu as ajouté un champ Date avec qqs valeurs à la base VBUG.mdb
 
Dans Public Sub OpenDatabase(ByVal db_name As String)
 
 m_DBConnection.Open _
  "Provider=Microsoft.Jet.OLEDB.3.51;" & _
  "Persist Security Info=False;" & _
  "Data Source=" & db_name
 
si l'on change de version d'Access pour la base exemple VBUG.mdb
"Provider=Microsoft.Jet.OLEDB.3.51;" sera à changer par exemple en 4.0


Message édité par kiki29 le 31-05-2006 à 00:00:58

Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  aide sur acces table access en vb

 

Sujets relatifs
Aide pour configurer Coppermine SVPBesoin d'aide pour apprendre flash
Exporter de vb6 vers accessbesoin d'aide en sql
besoin d'aide projet vba sous excel (finance)Aide sur un tris de tableau
Bonjour, besoin d'aide svp[Access 2003] Fusionner 2 valeurs en SQL lors d'un import de données
[Access 2003] Ajouter des valeurs au résultat d'une requête[Access] requete SQL, comment connaitre la taille d'une chaine ?
Plus de sujets relatifs à : aide sur acces table access en vb


Copyright © 1997-2018 Hardware.fr SARL (Signaler un contenu illicite / Données personnelles) / Groupe LDLC / Shop HFR