IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

VB.NET Discussion :

Probleme de Recherche


Sujet :

VB.NET

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre averti
    Inscrit en
    Février 2008
    Messages
    15
    Détails du profil
    Informations forums :
    Inscription : Février 2008
    Messages : 15
    Par défaut Probleme de Recherche
    Bonjour à tous
    Je suis un debutant en vb.net.
    Je voudrais afficher sur mon formulaire le Nom, Prenom, DateNaissance...., en saisisant le Numero dans un texbox ensuite cliquer sur un bouton Rechercher.
    Donc faire afficher l'enregistrement correspondant au numero saisie dans le textbox sur mon formulaire
    NB. l'enregistrement doit provenir d'une base access.
    S'il vous plait si quelqu'un à une idée
    Merci pour tout

  2. #2
    Membre éprouvé
    Homme Profil pro
    Inscrit en
    Mars 2008
    Messages
    161
    Détails du profil
    Informations personnelles :
    Sexe : Homme

    Informations forums :
    Inscription : Mars 2008
    Messages : 161
    Par défaut
    Salut,

    Essai d'adapter ce code à ton projet. Tu le met derrière ton bouton en question et tu ajuste la requete et les textBox en fonction de ton projet. J'espère que ça ira.
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
    20
    21
    22
    23
    24
     
     
            Dim connectionString As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\MonDossierProjet\MaBase_De_Donnee.mdb"
     
            Dim connectstr As New OleDb.OleDbConnection(connectionString)
            connectstr.Open()
     
            Dim command As New OleDb.OleDbCommand
     
            command.CommandText = "SELECT * FROM TA_TABLE where Champ_Numero= '" & TextBox1.Text & "' "
            Dim LeReader As OleDb.OleDbDataReader = command.ExecuteReader()
            If LeReader.Read() Then
                TextBox2.Text = LeReader!Nom
                TextBox3.Text = LeReader!Prenom
                TextBox4.Text = LeReader!DateNaissance
     
            End If
     
            LeReader.Close()
            LeReader = Nothing
     
            connectstr.Close()
            connectstr.Dispose()
            connectstr = Nothing

Discussions similaires

  1. [SGBD] problème de recherche dans une base de donnée mysql
    Par Xini28 dans le forum SQL Procédural
    Réponses: 1
    Dernier message: 23/10/2005, 23h06
  2. probleme requete recherche approximative
    Par Immo dans le forum Langage SQL
    Réponses: 5
    Dernier message: 04/08/2005, 16h18
  3. [SQL] probleme sur recherche
    Par Tib781 dans le forum Access
    Réponses: 2
    Dernier message: 19/05/2005, 12h31
  4. Probleme de recherche par listbox
    Par haigwepa dans le forum IHM
    Réponses: 6
    Dernier message: 12/10/2004, 19h57
  5. [BPW]Problème de recherche dans une boîte liste
    Par Alcatîz dans le forum Turbo Pascal
    Réponses: 14
    Dernier message: 05/07/2003, 15h10

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo