Problema con consulta de Fechas con SQL

[Ricardo R]

A continuación una porción de código ASP donde se recibe la indormación de un código de cliente para hacer consulta sobre una base de datos en Visual Foxpro, si ven en la ultimas lineas hay una variable sql sin comillas la cual se ejecuta sin problema. Cuando intento hacer la consulta con una condición adiconal de fecha ('sql) como se ve el servidor me da error, agradezco a los que conozcan el uso de sql con fechas me ayuden, graciad de antemano



<%@ language=VBScript %>

<%
Opciong = Request.Form()
'Definicion de Variables
Dim Obj_conn 'Variable/Objeto Connection para acceder a la base de datos
Dim Obj_RS 'Variable/Objeto RecordSet para accesar a las tablas de la base de datos

Dim SQL 'String para crear la consulta sql
Dim Ruta 'Auxiliar para almacenar una ruta ???

jCod_cli = Session ("Cod_cli")
jpasw_cli = Session ("Pasw_CLI")
' FIN DE DECLARACION DE VARIABLES

' ASIGNACION/CREACION DE OBJETOS (BASE DE DATOS Y TABLAS) A VARIABLES
SET Obj_Conn = Server.CreateObject ("ADODB.Connection")
SET Obj_RS = Server.CreateObject ("ADODB.RecordSet")

' PROPIEDADES PARA CONEXION A LA BASE DE DATOS
Obj_conn.mode = 16
Obj_Conn.connectionString="Driver=Microsoft Visual Foxpro Driver;SourceType=DBC;UID=;SourceDB=d:\database\op enplus_db\emp55web\emp55.dbc"
obj_Conn.Open

' INDICACION Y EJECUCION DE SENTENCIA SQL
fecha_aux = FormatDateTime(Date, 2)
fecha_aux = CDate(fecha_aux)
Response.Write(fecha_aux)

sql = "select * from ESTATUS where cod_cli = '"&jCod_cli&"'" 'sql = "select * from ESTATUS where cod_cli = '"&jCod_cli&"' and fecha_lleg = '"&fecha_aux&"'"
SET Obj_RS = Obj_conn.execute(sql)
%>