MsSQL database connection with VB6 using DAO

how do i connect, open and update records in an SQL database using VB6 and DAO?

DAO (and even RDO) these days is a complete obsolete. Can't you use ADO? It's much more robust and flexible. We have tons of samples available throughout the forums.

had an application running on DAO in MsAccess but will certainly change to ADO.
thanx

thes Code To Connect In Ado

VB Code:

Dim cn As New ADODB.Connection
Dim X As String
X = "Provider=MSDASQL;DRIVER=MySQL ODBC 3.51 Driver;Server=localhost;database=agc;Option=16387"
cn.ConnectionString = X
cn.Open