Ej ifyllt fält!!!

Hur gör man smidigast typ.. du har inte fyllt i alla fält.. har en lösning men en osmidig sådan... så här ser koden som tar emot formuläret ut:

<!-- #Include File="databas.asp" -->
<!-- #Include File="adovbs.inc" -->

<% Addera = "Select * from lenkar"
RecSet.Open Addera, Connect, adOpenStatic, adLockOptimistic

RecSet.Addnew

RecSet("Namn") = Request.Form("namn")
RecSet("Datum") = Request.Form("datum")
RecSet("Mail") = Request.Form("mail")
RecSet("Hemsida") = Request.Form("hemsida")
RecSet("Kategori") = Request.Form("kategori")
RecSet("Info") = Request.Form("keff")
	
RecSet.Update
RecSet.Close
Connect.Close %\>

<% Response.redirect "lenk.asp" %>