Que tal Edohen.
Lo que tienes que hacer es leer de dos en dos registros para que puedas mostrarlos en la forma que indicas, te dejo el siguiente código, espero que sea claro.
Recuerda que con tablas puedes dar el formato que tu quieres a tus datos, no necesariamente como vienen de la base de datos.
Código:
<table>
<%
dim x
x=1
devuelve="Select * From noticias order by id DESC"
set RS = Conn.Execute(devuelve)
Do While Not RS.Eof
%>
<% if x <= 2 then
Dim lstTituloIzq
Dim lstIdIzq
Dim lstTituloDer
Dim lstIdDer
lstTituloIzq =rs.Fields("titulo")
lstIdIzq = rs.Fields("id")
RS.MoveNext
x=x+1
If Not RS.Eof Then
lstTituloDer =rs.Fields("titulo")
lstIdDer = rs.Fields("id")
Else
lstTituloDer =""
lstIdDer = ""
End If
%>
<tr>
<td><% Response.Write(lstTituloIzq )%></td>
<td><% Response.Write(lstTituloDer %> </td>
</tr>
<tr>
<td><% Response.Write( lstIdIzq )%></td>
<td><% Response.Write( lstIdDer ) %> </td>
</tr>
<% end if %>
<%
RS.MoveNext
Loop
Conn.Close
%>
</table>
Saludos.
P.D. Procurá marcar tu código con el tag [CODE], para que sea un poco más legible, así como lo hice yo.