bug report

Hai: I have vba coding like this, Set conn = New ADODB.Connection conn.provider = "Microsoft.jet.OLEDB.4.0" conn.Open "c:acc/estmstr.mdb" Dim acc As ADODB.Recordset Set acc = New ADODB.Recordset estmstr.Open "estmstr", conn, est_code, est_ext, est_name acc.MoveFirst Do Until acc.EOF Msg box(estmstr.fields("ID")) acc.MoveNext Loop acc.Close Set acc.activeConnection = Nothing conn.Close Set conn = Nothing End sub but it shows the error user defined type not defined, how to i define that error Dim conn new.adodb connection is correct ? or send some source for this