Connexion Access

wayne2017 57 Messages postés jeudi 23 février 2017Date d'inscription 10 mai 2017 Dernière intervention - 20 mars 2017 à 12:49 - Dernière réponse : vb95 1385 Messages postés samedi 11 janvier 2014Date d'inscriptionContributeurStatut 11 décembre 2017 Dernière intervention
- 20 mars 2017 à 17:16
Bonjour, a tous

pourriez- vous m'aide a a connecte ce code a ma base de données ACCESS, car j'y arrive pas. s'il vous merci


Dim fin As Date
    Dim nbHeure As Double
    Dim nbMin As Double
        connec = New SqlConnection(str)
        connec.Open()
        cmd.Connection = connec
        cmd = New SqlComma nd("select Nom_groupe from Groupe", connec)
        cmd = New SqlCommand("select nom,prenom,heure_debut,heure_fin from Employers, where emp.id_emp=Pointage.id_emp and pointage.date_debut='" & DateEdit1.DateTime.Date & "' and pointage.date_fin='" & DateEdit1.DateTime.Date & "'", connec)
        lecteur = cmd.ExecuteReader

Try
            While lecteur.Read()
                debut = lecteur(3)
                fin = lecteur(4)
                nbHeure = DateDiff(DateInterval.Hour, debut, fin)
                nbMin = (DateDiff(DateInterval.Minute, debut, fin) Mod 60)
    ' DataGridView1.Rows.Add((lecteur(0)), (lecteur(1)), (lecteur(2)), nbHeure & "H" & ":" & nbMin & "min")
    Dim item As New DateTimePickerDate_de_demarrage_Projet(lecteur(0).ToString, 1)
                item.SubItems.Add(lecteur(1))
                item.SubItems.Add(lecteur(2))
                item.SubItems.Add(nbHeure & "H" & ":" & nbMin & "min")
                ListView1.Items.AddRange(New ListViewItem() {item})

End While

Catch ex As Exception

End Try
        lecteur.Close()


EDIT : Ajout des balises de code (la coloration syntaxique).
Explications disponibles ICI

Merci d'y penser dans tes prochains messages.
Afficher la suite 
57Messages postés jeudi 23 février 2017Date d'inscription 10 mai 2017 Dernière intervention

1 réponse

Répondre au sujet
vb95 1385 Messages postés samedi 11 janvier 2014Date d'inscriptionContributeurStatut 11 décembre 2017 Dernière intervention - 20 mars 2017 à 17:16
0
Utile
bonjour
des infos sur les bases de données avec Access
http://plasserre.developpez.com/cours/vb-net/?page=bases-donnees2
Commenter la réponse de vb95

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.