Amigos cá estou eu e as SQL's
Nesta SQL eu abro o relatorio atraves de um Form, mas fica pedindo o Parametro (Ano)
Os devidos textos estão nas devidas caixas no Form,,, creio que é porque o campo Ano é um Campo não acplado
Format...
Como Resolver?
StrDetento = "SELECT Detentos.ID, Detentos.[Nome] & Space (1) & [Sobrenome] As Detento, Detentos.[Nível], Detentos.[Cela]," _
& "Detentos.[Data da Prisão],Detentos.[Se Albergado, Regime], [Regime], Detentos.[Anotações], Detentos.[Sexo]," _
& "Detentos.[Crime], Detentos.[Situação Penal], Faltas.[Mês], Faltas.[DataFalta], Faltas.[UnidadePrisional]," _
& "Faltas.[ID_Falta], Faltas.[AnotacoesFalta], Format([DataFalta],'m') AS MesNumero, Format([DataFalta],'mmmm') AS Mes, Format([DataFalta],'yyyy') AS Ano " _
& "FROM Detentos LEFT JOIN Faltas ON Detentos.[ID] = Faltas.[ID_Falta] IN '" & StrPath & "'" _
& "WHERE (Faltas.[DataFalta] Is Not Null) And Ano = (" & Forms!FrmFalta_Albergado!txtAno & ") And ID = (" & Forms!FrmFalta_Albergado!txtID & ");"
Nesta SQL eu abro o relatorio atraves de um Form, mas fica pedindo o Parametro (Ano)
Os devidos textos estão nas devidas caixas no Form,,, creio que é porque o campo Ano é um Campo não acplado
Format...
Como Resolver?
StrDetento = "SELECT Detentos.ID, Detentos.[Nome] & Space (1) & [Sobrenome] As Detento, Detentos.[Nível], Detentos.[Cela]," _
& "Detentos.[Data da Prisão],Detentos.[Se Albergado, Regime], [Regime], Detentos.[Anotações], Detentos.[Sexo]," _
& "Detentos.[Crime], Detentos.[Situação Penal], Faltas.[Mês], Faltas.[DataFalta], Faltas.[UnidadePrisional]," _
& "Faltas.[ID_Falta], Faltas.[AnotacoesFalta], Format([DataFalta],'m') AS MesNumero, Format([DataFalta],'mmmm') AS Mes, Format([DataFalta],'yyyy') AS Ano " _
& "FROM Detentos LEFT JOIN Faltas ON Detentos.[ID] = Faltas.[ID_Falta] IN '" & StrPath & "'" _
& "WHERE (Faltas.[DataFalta] Is Not Null) And Ano = (" & Forms!FrmFalta_Albergado!txtAno & ") And ID = (" & Forms!FrmFalta_Albergado!txtID & ");"