romagny13
Messages postés687Date d'inscriptionlundi 10 janvier 2005StatutMembreDernière intervention27 août 20143 21 oct. 2006 à 01:19
Bonjour,
tiens voila un morceau de code qui peut t'être utile
ne pas oublier de faire un import
Imports System.Data.OleDb
et déclarer
Dim cnConnexion as OleDbConnection
puis il suffit appeler une methode pour ouvrir la connexion ou l'autre pour la fermer
Public
Sub ouvrirconnexion()
Try
' 1 definir chaine de connexion
Dim sConnexionString
As
StringsConnexionString =
""
' 2 associer la chaine à objet connexion
If cnConnexion
Is
NothingThencnConnexion New OleDbConnection()cnConnexion.ConnectionString sConnexionString
End
If
' 3 ouvrir la connexion
If cnConnexion.State = ConnectionState.Closed
ThencnConnexion.Open()
End
If
Catch ex
As Exception
Throw
New Exception(
"OuvrirConnexion", ex)
End
Try
End
Sub
Public
Sub fermerconnexion()
TrycnConnexion.Close()
Catch ex
As Exception
End
Try
End
Sub
l'exemple precedent marche pour se connecter a une base Microsoft ACCESS pour une base SQL SERVER 2000 ou 2005
il faut utiliser
System.Data.SQLClient a la place de System.Data.OleDb
ensuite voila la demarche que j'ai observée et qui est toujours la même travailler avec une base de donnée
' I CONNEXION
' 1 definir chaine de connexion
' 2 associer la chaine à objet connexion
' 3 ouvrir la connexion' II COMMAND
' 1 definir COMMAND
' a proprietes
' b parametres
' 2 executer la COMMAND