5/5 (5 avis)
Snippet vu 14 835 fois - Téléchargée 20 fois
Imports System.Data Module Module1 Public cnx As New ADODB.Connection Public rs As New ADODB.Recordset Public Sub data() 'Déclarationdes variables Dim NomServeur As String NomServeur = "nomDeMonPc" Dim NomBaseDeDonnes As String NomBaseDeDonnes = "gestionSQL" 'Ouverture de la base de données If cnx.State = 1 Then cnx.Close() End If cnx.Open("Provider=SQLNCLI;Server=" & NomServeur & ";Database=" & NomBaseDeDonnes & ";Trusted_Connection=yes;") End Sub End Module
16 juin 2014 à 19:43
1 sept. 2012 à 17:57
31 mars 2011 à 09:19
De préférence utilisez les objets SqlConnection, SqlCommand, SqlDataReader, SqlDataAdapter et DataSet
D'autre part, vous spécifiez une connexion approuvée ce qui n'est pas forcement le cas général, donc un peu plus généraliste :
http://www.connectionstrings.com/
cordialement
Megafan
28 mars 2011 à 21:40
le non du serveur est tt simplement le nom de votre machine.
il faut changer ce nom lorsque vous changez la machine/le serveur.
bonne chance.
28 mars 2011 à 15:34
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.