>Ciao a tutti...
>Dovrei collegare un'applicazione vb6 con un db sql server 2000.
>potete dirmi quali sono i parametri per l'apertura della connesione
>e del recordset utilizzando codice ADO????
>Grazie
Ciao,
è abbastanza semplice:
Dim con As new ADODB.Connection
con.open "Provider=SQLOLEDB.1;Server=localhost;UID=nome;PWD=password;Initial Catalog=DB"
Dim rs As new ADODB.Recordset
rs.open ("SELECT * FROM Table",con)
While Not rs.EOF
debug.print( rs("ColumnName") )
rs.movenext ' go to next row
Wend
rs.close
con.close
Naturalmente al posto di localhost, nome, password e DB ci devi mettere il nome del tuo server, le tue credenziali e il nome del database e poi devi sostituire SELECT * FROM Table con la tua query.
ciao
David De Giacomi
Microsoft MVP
http://blogs.dotnethell.it/david/