no encuentro
espero q alguien me pueda ayudar

Esta sección te permite ver todos los mensajes escritos por este usuario. Ten en cuenta que sólo puedes ver los mensajes escritos en zonas a las que tienes acceso en este momento.
Mostrar Mensajes Menú'
Set txtLogin.DataSource = adoConsulta
txtLogin.DataField = "login"
'
Set txtPassword.DataSource = adoConsulta
txtPassword.DataField = "password"
adoConsulta.RecordSource = "SELECT razon,identificador, MAX(tipocomprobante)AS Tipo,MAX(serie)AS Serie,MAX(cod_comprobante)AS Número, MAX(des_servicio) AS Descripcion, MAX(fechainicio)AS FechaInicio,MAX(fechafin)AS FechaFin, MAX(login)AS Login, MAX(password)AS Password FROM vistaFactura WHERE (cod_tipodeservicio=2)and(identificador IS NOT NULL) AND (anulado = 'No') AND (identificador like'" & txtDominio.Text & "%') group by identificador, razon"
adoConsulta.RecordSource = "SELECT razon,identificador, MAX(tipocomprobante)AS Tipo,MAX(serie)AS Serie,MAX(cod_comprobante)AS Número, MAX(des_servicio) AS Descripcion, MAX(fechainicio)AS FechaInicio,MAX(fechafin)AS FechaFin, MAX(login)AS Login, MAX(password)AS Password FROM vistaFactura WHERE (cod_tipodeservicio=2)and(identificador IS NOT NULL) AND (anulado = 'No') AND (identificador like'" & txtDominio.Text & "%') group by identificador, razon"
adoConsulta.ConnectionString = cn
adoConsulta.RecordSource = "SELECT razon,identificador, MAX(tipocomprobante) FROM vistaFactura WHERE (cod_tipodeservicio=2)and(identificador IS NOT NULL) AND (anulado = 'No') AND identificador like'" & txtDominio.Text & "%' group by identificador, razon"
adoConsulta.Refresh
adoConsulta.RecordSource = "SELECT razon,identificador,login,password, MAX(tipocomprobante) FROM vistaFactura WHERE (cod_tipodeservicio=2)and(identificador IS NOT NULL) AND (anulado = 'No') AND identificador like'" & txtDominio.Text & "%' group by identificador, razon,login,password"
le fui agregando login y password, pero al ejecutar se borra toooodo del campo dominio, mira!..... nose como hacer para llenar los demas campos... ¿q hago? pero con la misma consulta, porque lo q me muestra en la figura anterior esta bien me muestra en orden alfabetico y un dominio x cliente ya q eso es lo q quiero.adoConsulta.RecordSource = "SELECT razon,identificador, MAX(tipocomprobante) FROM vistaFactura WHERE (cod_tipodeservicio=2)and(identificador IS NOT NULL) AND (anulado = 'No') AND identificador like'" & txtDominio.Text & "%' group by identificador, razon"
adoConsulta.Refresh