datauno=Request.Form(datauno)
datadue=Request.Form(datadue)


Select min(data1) as minim, max(data1) as maxim from tabella;

mm=rs("minim")
mx=rs("maxim")

if datauno < mm then
quellochevuoitu

etc. etc. etc.