(Resolvido) String de consulta a tabela Access

[Danleonhart]

Pessoal...

Ajudinha aê :blush:

Quero criar uma string de consulta ao BD entre período de datas...

Assim: de 10/02/2011 a 20/02/2011...

Peguei este exemplo:

Public Sub Pesquisar()

Dim SQLcons As String
Dim vVal1 As Variant
Dim vVal2 As Variant

vVal1 = Format(DPicker1.Value, "DD/MM/YYYY")
vVal2 = Format(DPicker2.Value, "DD/MM/YYYY")

SQLcons = "SELECT * FROM ProdGeral WHERE ProdData= #" & vVal1 & "# AND #" & vVal2 & "#"""

Só que está apresentando erro de sintaxe e aponta para linha da consulta:

Onde foi que eu errei !!! :unsure:

[Danleonhart]

Já encontrei a solução pessoal :blush:

encontrei uma forma em SQL, foi só adaptar para o Access:

Public Sub Pesquisar()

Dim SQLcons As String
Dim vVal1 As Variant
Dim vVal2 As Variant

vVal1 = Format(DPicker1.Value, "DD/MM/YYYY")
vVal2 = Format(DPicker2.Value, "DD/MM/YYYY")

SQLcons = "SELECT * FROM ProdGeral WHERE ProdData BETWEEN '" & vVal1 & "' AND '" & vVal2 & "'"
script......

Fonte:http://www.w3schools.com/sql/sql_between.asp

Fica a dica :rolleyes: .