Non cambia nulla, questo è il code completo:
codice:
<%

id = request.querystring("id")
DATA = Request.Form("DATA")

on error goto 0

If IsNull(DATA) then 
DATA= "NULL" 
SQL = " UPDATE tabella set DATA = NULL WHERE ID = "&ID 
Response.Write("A - SQL") 

If IsDate(DATA) then 
SQL = " UPDATE tabella set DATA=#"&DATA&"# WHERE ID = "&ID 
Response.Write("B - SQL") 
Conn.Execute(SQL) 

END IF 
END IF