Cómo utilizar sentencias SQL en Access
Subcomando privado 1_Click()
Mostrar sql como una cadena
Marcar l como un número entero
Marcar I como un número entero
Atenuar el nombre del campo () como una cadena
sql = "seleccione gyh_riqi, suma(Shu ju 1) como HJ de Jishi jilu donde gyh _ riqi = ' " amp; 1000-061210 "Grupo por gyh_riqi"
cn. ConnectionString = " Proveedor = Microsoft. Jet . OLEDB.4.0 Fuente de datos = " ampApp. Caminos y caminos. "\wd.MDB; información de seguridad persistente = False "
cn. Abridores. UbicaciónCursor = adUseClient
rs. Abra sql, cn, adOpenDynamic, adLockOptimistic
Establezca DataGrid1. Fuente de datos = rs
Conector final
También se puede asignar a la propiedad RecordSource del control de datos ADO:
Adodc1. ConnectionString = " Proveedor = Microsoft. Jet . OLEDB.4.0 Fuente de datos = " ampApp. Caminos y caminos. "\wd.MDB; información de seguridad persistente = False "
Adodc1. record source = " select * from jishijilu donde a Shi Jian le gusta ' 81120 ' y a gyh_riqi le gusta ' 10 ' "
Adodc1. Actualizar
Establecer DataCombo1. FuenteFila = Adodc1