[Resolvido]DateAdd - por um mês a seguir a hoje

Bom dia Amigos

Onde estou a errar

No click de um botão

Expira é campo Data

CurrentDb.Execute "UPDATE TabProprietario SET Expira =DateAdd("m", 1, Date())"

Marca o "m"

Obrigado

Bom dia Assis,

Código:

CurrentDb.Execute "UPDATE TabProprietario SET Expira = " & DateAdd("m", 1, Date)

Abraço

Bom dia Teixeira

Devolve 30/12/1899

Olá Assis,

Tente assim:

Código:

CurrentDb.Execute "UPDATE TabProprietario SET Expira = " & DateAdd("m", 1, format(Date,"mm/dd/yyyy"))

Abraço

Teixeira

Igual ....  

Assim devolve a data de hoje

CurrentDb.Execute "UPDATE TabProprietario SET Expira=Date()"

Olá Assis,

Assim deve resolver:

Código:

CurrentDb.Execute "UPDATE TabProprietario SET Expira = #" & Format(DateAdd("m", 1, Date), "mm/dd/yyyy") & "#"

Abraço

Estava fundo ....

Obrigado

Olá Assis

Não sei qual o santo aí em Guimarães, mas bom São João.