Like this?
Can this be inserted into an html page?
mode = request("mode"

if mode="" then
Function FORM %>
<%=Request.ServerVariables("REMOTE_HOST"
%>
<form method="post">
<table>
<tr>
<td width="145"><b><font face="" size="" color="<%if a1 = 1 then%>red<%
else%><%end if%>">Name<%if a1 = 1 then%> <br>
<small><small>min 3 / max </small></small><%end if%></font></b></td>
<td> <font face="Arial" size="2" color="#000000">
<input type="text" name="re1" size="30" maxlength="" value="<%=request("re1"

%>">
</font></td>
</tr>
<tr>
<td width="145"><b><font face="" size="" color="<%if a2 = 1 then%>red<%
else%><%end if%>">E-mail<%if a2 = 1 then%> <br>
<small><small>min 5 / max </small></small><%end if%></font></b></td>
<td> <font face="Arial" size="2" color="#000000">
<input type="text" name="re2" size="30" maxlength="" value="<%=request("re2"

%>">
</font></td>
</tr>
<tr>
<td width="145"><b><font face="" size="" color="<%if a3 = 1 then%>red<%
else%><%end if%>">Comments<%if a3 = 1 then%> <br>
<small><small>min 2 / max </small></small><%end if%></font></b></td>
<td> <font face="Arial" size="2" color="#000000">
<textarea cols="50" rows="8" name="re3"><%=request("re3"

%></textarea>
</font></td>
</tr>
<td> </td>
<td>
<input type="hidden" name="mode" value="check">
<input type="submit" value="submit" name="submit">
</td>
</table>
</form>
<%End Function%><%FORM%> <%elseif mode = "check" then%><%
if len(request("re1"

) > 9999 Or len(request("re1"

) < 3 then
a1 = 1
x = 1
end if
if len(request("re2"

) > 9999 Or len(request("re2"

) < 5 then
a2 = 1
x = 1
end if
if len(request("re3"

) > 9999 Or len(request("re3"

) < 2 then
a3 = 1
x = 1
end if
if x = 1 then
%><%FORM%><%
else
%>OK<%
end if
end if
%>