Amigos eu escrevi o codigo de um amigo que me escreveu aqui:
SQL = "Select Orpenf.Numero, Orpenf.Cliente, Cadastro.Cep from Orpenf, Cadastro "
SQL = SQL & "where (Data_inicial>= #" & Data_Inicial & "#) and (Data_final<= #" & Data_Final & "#) and (Orpenf.Tipo = 'NF') and (Orpenf.Cliente = Cadastro.Codigo)"
mas da a mensagem: nenhum valor foi fornecido para um ou mais parametros necessarios
alguem pode me ajudar ???