oversættelse fra jscript til vbscript

hvordan gøres understående i vb ??

<%
While (!res.EOF){
%>
  <tr>
    <td><%=res.Fields("xx")%></td>
    <td><%=res.Fields("xx")%></td>
    <td><%=res.Fields("xx")%></td>
    <td><%=res.Fields("xx")%></td>
  </tr>
</table>
<%
res.MoveNext();}
%>