Recordset con solo un record

[ambar]

Aqui les pongo el codigo ...

<%
Dim SQL, oConn, RS, opcion
opcion = Request.QueryString("opcion")
Response.Write opcion

Set oConn = Server.CreateObject("ADODB.Connection")
oConn.Open ("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ= "& Server.MapPath ("datos.mdb"))
SQL = " Select * From datos1 Where (nombre = '"&opcion&"') "
Set RS = oConn.Execute(SQL)
%>

codigo html
<table>
<%
IF RS. EOF
Response.Write (" Opcion no valida ")
else
Response.Write("<tr><tdcolspan=&quot ;"3"">"&RS("nombre ")&"</td></tr>")
Response.Write ("<tr><td colspan=""3""> &lt ;/td></tr>")
Response.Write ("<tr>")
Response.Write("<td class=""texto""><img src="& RS("fotog") &"></td>")
Response.Write("<td> </td>")
Response.Write("<td class=""texto"">" & RS("texto1")&"</td>")
Response.Write ("</tr>")
Response.Write("<tr>")
Response.Write("<td colspan=3 class=""texto"">" & RS("texto2")& "</td>")
Response.Write("</tr>")
RS.MoveNext
End If
oConn.Close
Set RS = nothing
Set oConn = nothing

%>
</table>