Código:
La consulta sería:Dim Conn As New SqlServerCe.SqlCeConnection("Data Source =db.sdf;") Dim cmd As SqlServerCe.SqlCeCommand = Conn.CreateCommand() cmd.CommandText = "SELECT estado FROM aviso,publi, recepcionista, trabajo,cliente,operarios WHERE aviso.ID_CLIENTE=cliente.ID_CLIENTE AND aviso.ID_PUBLI=publi.ID_PUBLI AND aviso.ID_REP=recepcionista.ID_REP AND aviso.ID_TIPO=trabajo.ID_TIPO AND aviso.ID_OPER=operarios.ID_OPER AND aviso.fecha_llamada like '" & fecselect & "' AND aviso.ID_CLIENTE=" & apeselect & ";" Conn.Open() Dim rdr As SqlServerCe.SqlCeDataReader = cmd.ExecuteReader rdr.Read() lblestado.Text = rdr("estado") lbltipo.Text = rdr("descripcion") rdr.Close() Conn.Close()
Código:
y me tira el error: Data conversion failed. [ OLE DB status value (if known) = 2 ] "SELECT estado FROM aviso,publi,recepcionista,trabajo,cliente,operarios WHERE aviso.ID_CLIENTE=cliente.ID_CLIENTE AND aviso.ID_PUBLI=publi.ID_PUBLI AND aviso.ID_REP=recepcionista.ID_REP AND aviso.ID_TIPO=trabajo.ID_TIPO AND aviso.ID_OPER=operarios.ID_OPER AND aviso.fecha_llamada like '09/12/2007' AND aviso.ID_CLIENTE=1;"