Ayuda Urgente Error en SQL.

Hola que tal foro acudo a ustedes nuevamente soy nuevo en esto de los
ASP y resulta que estoy empezando a hacer una aplicacion pero al correr el
siguiente query :
sSql=" Select Folio_Pedido_ID " & _
" FROM tbl_M_Pedidos " & _
" Where (Almacen_ID=" & vnAlmacenID & ") AND " & _
" (No_Farmacia=" & vnNoFarmacia & ") AND " & _
" (Folio_Gen_Far=" & nFolGenFcia & ")"

La instruccion Select anterior ya en el codigo cuando se ejecuta queda
armada de la siguiente forma:
Select Folio_Pedido_ID
FROM tbl_M_Pedidos
Where (Almacen_ID=1) AND (No_Farmacia) AND (Folio_Gen_FarT47)

Pero cuando se ejecuta me marca el siguiente error:
Arguments are of the wrong type, are out of acceptable range, or
are in conflict with one another.

Lo estoy ejecutando de esta forma:

RstObtIDPedido.Open sSql,cnnPedidos,adOpenDynamic,adLockReadOnly

Por favor me urge muchisimo el poder solucionar esto espero cualquier
sugerencia gracias.

Atte. Luis Rubio