<html>
<head>
<SCRIPT LANGUAGE="VBScript">
Sub Button1_OnClick
Dim TheForm,years,months,days
Set TheForm = Document.myform
years=TheForm.years.value
months=TheForm.months.value
days=TheForm.days.value
call search(years,months,days)
End Sub
</SCRIPT>
</head>
<body>
<%
sub search(years,months,days)
response.write years&"<br>"
response.write months&"<br>"
response.write days&"<br>"
end sub
%>
</body>
</html>