Funktion skal accepter datoer 01-01-2002 og 1-1-2003

Hejsa

Jeg har denne kode:

str = "    reg = /^(([0-2][0-9])|(3[01]))\-((0[0-9])|(1[0-2]))\-2\d{3}$/" & VbCrLf
str = str & "if(!document.SaveForm." & InputNavn & ".value.match(reg)){" & VbCrLf
    str = str & "  alert(""Fejl"");" & VbCrLf

Den accepter datoer i formatet 01-01-2003 men giver fejl meddelsen når jeg har en dato i formatet 1-01-2003. Hvordan får jeg den til også at accepter datoer i formatet 1-1-2003 men samtidig skal det ikke være noget som denne:
str = "    reg = /^\d{1,2}\-\d{1,2}\-2\d{3}$/;" & VbCrLf
da den accepter datoer som 99-99-2003!