Pierdes un registro, simplemente por que cada vez que se va por el ELSE, no lo imprimes.
Prueba con algo asi:
Código:
%><table border=1><tr><%
a=1
while not ors1.eof
if a > 3 Then
a=1
%></tr><tr><%
End If
%>
<td align="center"><input type=text value=<%=ors1("todo")%>></td><%
a=a+1
ors1.MoveNext
Wend
set ors1=nothing
%>