ma il db lo devo fare in xp.
per xp cosa intendi?
Quando parlavo di stringa di connessione al Db pensavo al .Net in Vb6 ti posso dire che:
Ho una Db Access 2000
Riferimento a Microsoft DAO 3.6 Object library
Dim db As Database
Dim rs As Recordset
dim sql as string

Set db = OpenDatabase(App.Path & "\archivio.mdb")
sql = "SELECT..."
Set rsricette = db.OpenRecordset(sql)
Do While Not rsricette.EOF
msgbox rs.Fields("nomecampo")
rsricette.MoveNext
Loop