Ciao...

ho un campo DATA in una tbl access... dovrei avvisare l'utente tramite una finestra di alert quando questo campo non contiene valori... ho scritto così ma il controllo non funziona:
codice:
 strSQL = "SELECT * FROM ListFiles WHERE UploadID="&cod
Set strREC=ConnDown.Execute(strSQL)

Function ConvertiData(data)
    giorno = Mid(data, InStr(1, data, "/") + 1, InStrRev(data, "/") - InStr(1, data, "/") - 1)
    mese = Left(data, InStr(1, data, "/") - 1)
    anno = Right(data, Len(data) - InStrRev(data, "/"))
    ConvertiData = giorno & "/" & mese & "/" & anno
End Function

strREC.MoveFirst 
DO WHILE NOT strREC.EOF 

IF strREC("DATA_PRELIEVO") = "" then %>
                
<script language="javascript">
alert("Attenzione: errore nel camnpo data!")
</script>
               <%
               
               data = ConvertiData(CStr(strREC("data_prelievo"))) 
               
                end if
Dov'è l'errore? :master: