Dim miConexion As New Connection Set miConexion = CurrentProject.Connection Dim sql As String sql = "SELECT tbl_forms.int_frmid, tbl_forms.str_frmnom From tbl_forms WHERE (((tbl_forms.str_frmnom)=[frm_nom]))" Dim miRecordset As Recordset.
LIbrarys: Microsoft Activex Data Objects 6.1 Library and Microsoft ADO ext 6.0 for ddlsecurity. Are charged The error says: "El uso de la palabra clave New es inválido" ("Use keyword 'New' is invalid")
I suppose that lack any library in my Ms Access configuration of VBA
