Discussion :

[Funtrac]

Bonsoir a tous,
Je vous contacte car j'ai besoin de votre aide pour mon projet.
Je n'ai que des bases en VB.NET et je n'ai vraiment pas envie de me plonger dans la complexité(je trouve) de la progammation orientée objet en VB.NET.
Enfin bref, j'aurais besoin de savoir comment me connecter a une BDD, faire une requête et regarder le nombre de ligne en résultat.

Merci de votre aide

[kevin254kl]

Bonsoir, ici http://plasserre.developpez.com/cour...bases-donnees3 tu regardes pas la création de la base mais juste la connexion.

[Funtrac]

Alors faut faire ça si j'ai bien compris pour se connecter (en commentaire ce que je n'ai pas compris):

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
    Protected Const SQL_CONNECTION_STRING As String = _
    AdresseDuServeur;" & _
    NomDeLaBDD;" & _
    "Integrated Security=SSPI ???" ' Pas compris SSPI
    ' Il manque pas le mot de passe ?
    Dim BDDConnection As New SqlConnection(connectionString)
    BDDConnection.Open()
    'Insérer la requête sql ici
    BDDConnection.Close()

Comment faire la requete sql j'ai rien compris a ce qui est fais sur ton lien

[kevin254kl]

Fait sa ,

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
Imports System.Data.OleDb
Module Module1
    Public Sub connexion()
        Dim cn As New OleDb.OleDbConnection
        cn = New OleDb.OleDbConnection("provider=Microsoft.jet.oledb.4.0; data source=mabase.mdb")
    End Sub
End Module

dans datasource c'est le chemin vers ta base de donnée

[Funtrac]

C'est la bdd d'un site web

[kevin254kl]

Tu ne l'avais pas dit

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
Public Class Form1
 
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        WebBrowser1.Navigate("http://login.website.co/") //ici ton url
    End Sub
 
    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        WebBrowser1.Document.GetElementById("login").SetAttribute("value", TextBox1.Text) //ici ton log
        WebBrowser1.Document.GetElementById("passwd").SetAttribute("value", TextBox2.Text)// ici ton mot de passe
 
        WebBrowser1.Document.GetElementById(".save").InvokeMember("click")
    End Sub
 
End Class

je n'ai pas testé sinon il faut voir du côté des sockets.