consulta SQL ¡¡¡ - me rindo - !!!!

[almaluz]

Holasss

Este trozo de codigo ha podido má que yo.
tengo dos tablas:
carrito que tiene
idcarrito (autonumerico)
idclienteC (numerico)
idproductoC (texto)
cantidadC (numerico)
y ademas articulo que tiene:
referencia - texto
nombre - texto
pvp5 - numero


y ahora tengo este codigo

Código:

 
<%
Dim IDUsuario, sqlstring, con, rs
IDUsuario= 17
SET con=Server.CreateObject("ADODB.Connection")
SET rs=Server.CreateObject("ADODB.RecordSet")
sqlstring="SELECT idcarrito, nombre, pvp5, cantidadC "
sqlstring= sqlstring & "FROM carrito, articulo WHERE idusuarioC="&IDUsuario&" AND idproductoC='"&referencia&"';" 
con.Open "catalogo"
rs.Open sqlstring, con

IF rs.EOF THEN
	Response.Write " El carro está vacíao"
ELSE
	%>
	<table>
	<%
	Do Until RS.EOF
	%>
	<tr>
	<td><%= rs("idcarrito") %></td><td><%= rs("nombre")%></td><td><%= rs("pvp5") %></td><td><%= rs("cantidadC")%></td>
	</tr>
	<% rs.MoveNext
	Loop
END IF
	%>
	</table>

y no me muestra los datos del carrito.
O sea, deduzco que el recordçset esta vacío.
Bien ¿QUE HE ESCRITO MAL?

Me he asegurado de:
* el carrito tiene datos ( por supuesto con el cliente 17)
* la tabla articulo tiene referencia con el mismo valor que idproductoC .

¿qUE HAGO?

A) me tomo vacaciones.
b) Le doy dos patadas al libro.
c) Me dedico a otros menesteres.

Saludos amigos