Gestion de données avec access

Télécharger le projet
Commenter

Description

Cette source est un petit exemple qui a pour rôle de gérer les fonctions les plus utilisable en Base de données Ex:Insertion,Modification,Suppression,Recherche. (La source conçerne Microsoft Access)

Source / Exemple : 


Imports System.Data.OleDb
Module Connect
    Public Cn As OleDbConnection
    Public CmdR As OleDbCommand
    Public Sub Connection()
        Dim strCon$ = CStr("Provider=Microsoft.Jet.OLEDB.4.0;" + "Data Source=" + My.Application.Info.DirectoryPath & "\DataBase\test.mdb;")
        Cn = New OleDbConnection(strCon)
        Cn.ConnectionString = strCon
        Cn.Open()
    End Sub

    Public Sub Affichage()
        With main.la
            .Items.Clear()
            CmdR = Cn.CreateCommand() 'Creation de commande
            CmdR.CommandText = "select * from liste" ' Creation de la requete SQL
            CmdR.ExecuteNonQuery() 'Exécution de requet
            Dim enumerate As OleDbDataReader = CmdR.ExecuteReader()
            Dim i% = 0
            Do While enumerate.Read
                .Items.Add(enumerate.Item(0).ToString)
                .Items(i).SubItems.Add(enumerate.Item(1).ToString)
                .Items(i).SubItems.Add(enumerate.Item(2).ToString)
                .Items(i).SubItems.Add(enumerate.Item(3).ToString)
                i += 1
            Loop
            enumerate.Close()
        End With
    End Sub
End Module

'La suite de code est dans le fichier .zip
Télécharger le projet

Codes Sources

A voir également

S'inscrire maintenant

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.