Discussion :

[ahomadon]

je voudrais savoir "comment connecter une application vb6 àune base de donnée SQL Serveur au moyen d'ADO".
au fait je suis entrain de réaliser une application vb6 qui me permettra d'interconnecter plusieurs postes.je crée le serveur et base avec SQL Serveur
et je veux savoir quoi faire après.merci

[OhMonBato]

Bonjour egalement,
Tu trouveras une mine d'informations dans les tutos ou la FAQ dont tu trouves les liens dans ma signature et en haut de page. Ce tuto en particulier devrait pouvoir t'etre utile : http://drq.developpez.com/vb/tutoriels/ADO/Chapitre2/

Sinon il y a le bouton rechercher sur le forum, je n'ai pas fait l'essai pour ton sujet mais souvent on trouve des discussions precedentes qui ont trait au probleme que l'on rencontre.

[porki]

ben moi voilà ce que j'ai fait et ca marche

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
dim recordset as ADODB.recordset
dim command as ADODB.command
din sql as string

set recordset = new ADODB.recordset
set command = new ADODB.command

sql= " select.....from...."

command.activeconnection="driver={SQL Server};server=monserveur;database=mabase;UID=monuser;PWD=monpass"
ou
command.activeconnection="driver={SQL Server};server=monserveur;database=mabase;"
ou
command.activeconnection="provider=SQLOLEDB;Data Source=monserveur;Initial Catalog=mabase;User Id=monuser;Password=monpass"

command.commandtext=sql
recordset=command.execute

'pour afficher

Do While not recordset.EOF
      list.additem(recordset("colonne1") & "-" & recordset("colonne2")) 
      recordset.movenext
loop
set recordset = nothing
set command=nothing