kısacası

Dim veri
veri = request.form("adet") 'Textbox 'ın adı
' yazdırmak için
<% response.write veri %> yada <%=veri%>

if not veri = "" or veri="0" then ' eğer textbox boş veya sıfıra eşit değilse işlemi yap
'buraya veri tabanına kayıt kodlarını yazarsın
end if