S
serber
Dovrei inserire in una query un campo progressivo delle righe che compongono
un determinato ordine di acquisto.
Ho prvato l'esempio in sito comune 2.1 ma il progressivo rimane sempre a 0.
Option Compare Database
Option Explicit
Dim rval As Integer ' La variabile globale di appoggio
Public Function Progressione(Valore As String) As Integer
If Valore = "Azzera" Then
rval = 0
Else
rval = rval + 1
End If
Progressione = rval
End Function
Questa è la mia query:
SELECT Ordini.IDordine, Ordini.Codice, Progressione((IDOrdine)) AS
Progressione
FROM Ordini
WHERE (((Progressione("Azzera"))=0))
ORDER BY Ordini.Codice;
Come posso fare e/o dove sbaglio.
ciao
serber
un determinato ordine di acquisto.
Ho prvato l'esempio in sito comune 2.1 ma il progressivo rimane sempre a 0.
Option Compare Database
Option Explicit
Dim rval As Integer ' La variabile globale di appoggio
Public Function Progressione(Valore As String) As Integer
If Valore = "Azzera" Then
rval = 0
Else
rval = rval + 1
End If
Progressione = rval
End Function
Questa è la mia query:
SELECT Ordini.IDordine, Ordini.Codice, Progressione((IDOrdine)) AS
Progressione
FROM Ordini
WHERE (((Progressione("Azzera"))=0))
ORDER BY Ordini.Codice;
Come posso fare e/o dove sbaglio.
ciao
serber