Bytter om på måned og dato

Access bruger mm-dd-yyyy og yyyy-mm-dd formaterne når der connectes gennem ASP. Prøv at bruge denne på datoerne:

Function ConvertToSqlDate(dato)
dim SQLYear,SQLMonth,SQLDay
  SQLYear = Year(dato)
  SQLMonth = Month(dato)
  SQLDay = Day(dato)
  if SQLDay<10 then
    SQLDay = 0&SQLDay
  end if
  if SQLMonth<10 then
    SQLMonth = 0&SQLMonth
  end if
  ConvertToSqlDate = SQLYear&SQLMonth&SQLDay
End Function

strsql = "Select * From vagter where (dato = #" & ConvertToSqlDate(visdato) & "# and stedid=" & steder("id") & ")"

Takker det virket.. der sku dog lige nogle - mellem datoerne..

Ka jeg få et svar så du ka få nogle point. ;o)

.o) <-- One Eyed Jack