Newsgroup: it.comp.appl.access
Titolo: MSG ERRORE: Utilizzo non valido di null

Buona era ai presenti,
Ho una funzione che richiamo con:
Call fctAggDataUltimoUtilTutti2(dData)
a fronte dell'evento click del mio pulsante.
ecco il codeice del modulo in cui risiede la funzione:
-------------------
Option Compare Database
Function fctAggDataUltimoUtil(codx As String, prex As Date)
Dim rst As DAO.Recordset
Set rst = CurrentDb.OpenRecordset("select * from Tb_Prodotti where 
lCodiceBarreProdotto = '" & codx & "'")
With rst
    .Edit
    !DataUltimoUtil = prex
    .Update
    .Close
End With
Set rst = Nothing
End Function
Function fctAggDataUltimoUtilTutti2(Nux As Date)
Dim RstArt As DAO.Recordset
Set RstArt = CurrentDb.OpenRecordset("select * from Tb_Prestazioni_oggi 
WHERE dData = # " & Nux & "#")
With RstArt
Do
    If Not .EOF Then
        Call fctAggDataUltimoUtil(!lProdottoVenduto, Nz(!dData))
    .MoveNext
    End If
Loop Until .EOF
MsgBox "Aggiornata la Data Ultimo Utilizzo"
End With
End Function
-----------------------------
Mi segnala l'errore:
Utilizzo non valido di null
Salutoni
Napoleone

[CUT]
Ciao,
la tua funzione richiede 2 parametri
Function fctAggDataUltimoUtil(codx As String, prex As Date)
e tu gliene passi uno solo
fctAggDataUltimoUtilTutti2(dData) 

[CUT]
Pardon...lascia perdere la "scemata" che ti ho appena detto ! 

 Pardon...lascia perdere la "scemata" che ti ho appena detto !
Ciao Gaspare,
Napoleone 

 controlla bene i parametri che passi...vedi che valore assumono
Mi si dovrebbe passare una data, ma niente!
Napoleone 



[CUT]
Allora vediamo insieme:
1)la prima funzione è la seguente-> fctAggDataUltimoUtilTutti2(Nux As 
Date)-> passi a questa una data?
2) dopodichè si passa alla seguente -> 
fctAggDataUltimoUtil(!lProdottoVenduto, Nz(!dData))-> passi a questa 2 
valori validi?
ovviamente non entro nel merito

Forse nell'espressione Nz(!dData) manca il valore che deve assumere
dData nel caso sia Null. Credo debba essere qualcosa del tipo
Nz(!dData, 0) o similare...


no Giulio.
Nota  Se si utilizza la funzione Nz in un'espressione di una query senza 
utilizzare l'argomento valsenull, nei campi che contengono valori Null 
risulterà una stringa a lunghezza zero.
--
a.cara

 ha scritto nel messaggio 
news:B4hwe.34658$bc.1...@tornado.fastwebnet.it...

Ciao Alessandro,
ma non sto parlando di una query, è una funzione in un modulo.
Ciao
Napoleone 


Ma le mie date non sono nulle!
Ciao Giulio
Napoleone
Poi ieri come hai risolto il quesito idutente?

 Napoleone
-- 
_ _
Ciao
MAssimiliano Amendola            
www.accessgroup.it
Cisa - Conferenza Italiana per Sviluppatori Access
Info:  
www.donkarl.com/it


Mettici un bel punto di interruzione, segui il codice e vedi dove si ferma
Altrimenti diventa difficile capire quale sia il valore null


 ha scritto nel messaggio 
news:Cwrwe.22569$TR5....@news.edisontel.com...

Buongiorno MA,
ho notato che se tolgo questa riga di codice,
  'Call fctAggDataUltimoUtil(!lProdottoVenduto, Nz(!dData))
il msg scompare, ma è pur vero che non funziona!
Non mi posso spiegare com la stessa funzione in altra maschera funziona, qui 
no!
Buona giornata
Cataldo


MA La cosa strana che ho notato, se chiudo il db e lo riapro 1 o 2 volte va,
poi mi da il msg di utilizzo non valido di null.
NApoleone


Ne codice premi Ctrl+G
Ti compare la finestra immediata
prima di
Call fctAggDataUltimoUtil(!lProdottoVenduto, Nz(!dData))
mettici
debug.print "prodotto " & !prodottovenduto & " data " & !data
nella finestra immediata ti restituira i valori e vedi quale dei due manca



MA, ci debbo inserire tutte e due le righe di codice?
o solo una?
In ogni modo mi restituisce:
Espressione di controllo non valida.
-----
Ho l'impressione, com se non trovasse la data o altro (in 
Tb_Prestazioni_Oggi),
altrimenti, perche uscendo e poi riaprendo, funziona?
Napoleone 


Tutt'e due
prova prima questo e segui il codice guardando dove si ferma.
Ogni volta che hai una variabile, se ci passi il mouse sopra, con un
controlTip lui ti dice il valore della variabile,
segui il codice facendolo avanzare con F8 e vedi dove si ferma


 ha scritto nel messaggio 
news:YCswe.22581$TR5....@news.edisontel.com...

Non succede proprio nulla e mi sembra proprio strano!
Napoleone 


Hai messo il punto di interruzione?


 ha scritto nel messaggio 
news:6Xswe.22582$TR5....@news.edisontel.com...

Ho messo precisamente questo :
debug.print "prodotto " & !prodottovenduto & " data " & !data
Call fctAggDataUltimoUtil(!lCodiceBarreProdotto, Nz(!dDataMovimento))
poi ho dato l'invio e quindi mi segnala l'errore di utilizzo non valido di 
null.
Napoleone 

 Napoleone
Pardon
Espressione di controllo non valida
Ciao 


Aspetta, tu non sai cosa è successo.
Visualizza il codice partendo dalla chiamata della function
clicka sulla barra a sx, lui ti mette un punto rosso.
bene rilancia la routine e lui ti riporta nel codice e lo segui.
Per farlo avanzare premi F8  ad ogni passo


 Per farlo avanzare premi F8  ad ogni passo
l'ho fatto fino alla fine
MA! Non ciò capito una mazza! Mi sta uscendo il fumo, che trasforma i sudori 
in vapori, che quasi mi appannano gli occhiali.
Napoleone

 Napoleone
