Saber um determinado de dado numa base de dados

[jcbiker]

Boa tarde,

Tou a fazer uma aplicação ligada a uma base e necessito de saber como posso fazer para saber qual o maximo valor de uma determinada pesquisa.

eu estou a utilizar este código

Using Context As New viatEntities2
Dim esquadr = Context.Relatório.Where(
Function(c) c.Id = dt).

[Caça]

Para isso usa a função MAX()

[jcbiker]

Ok.

[jcbiker]

Eu estou a fazer assim:

Module Pesq
Sub PesqT(ByVal dt, ByRef DtR, ByRef T, ByRef K)
 Dim ano As Date = Date.Today
 Using Context As New viatEntities2
	 Dim esquadr = Context.Relatório.Max.KmFim(
				 Function(c) c.IdMatViat = dt And c.Data = ano)
	 If esquadr IsNot Nothing Then

	 End If
 End Using
End Sub
End Module

Mas dá erro nesta linha

Context.Relatório.Max.KmFim

Edited June 26, 2012 at 05:15 PM by Caça

[Caça]

Vê isto

http://msdn.microsoft.com/en-us/vstudio/bb737904#maxsimp

[jcbiker]

mas assim como é que faço a ligação a base?

eu estou a utilizar este codigo

Using Context As New viatEntities2

Dim categories = From p In products _
	 Group p By p.Category Into Group _

Edited June 27, 2012 at 08:27 AM by Caça

[Caça]

Qual é o campo que queres fazer o MAX?

[jcbiker]

O campo é este kmfim eu já tentei assim,

Dim pq = From p In Relatório _
				 Select max.kmfim Where (Function(p) p.idmatViat = dt And p.data = ano)

mas não funciona.

ou seja eu queria o valor maximo de km deste campo com aquelas condicões

Edited June 27, 2012 at 10:14 AM by Caça

[Caça]

Tenta assim

Dim pq = From p In Relatório _
Where p.idmatViat = dt And p.data = ano _
Group p By p.KmFim Into Group = Group.Max(Function(p) p.KmFim)

[jcbiker]

Ok. vou tentar

Obrigado

[jcbiker]

ainda me dá erro. diz que espera o fim da espressão.