Hent dato fra database

Jeg har en dato gemt i en database i et talformat, fx. clng(\"21-08-1998\"). (På denne måde er det nemmere at sammenligne om en dato er større end en anden). Jeg plejer at bruge nedenstående kode til at hente datoen frem igen, men nu har jeg uploadet på serveren og det virker ikke længere. Kan det have noget at gøre med at serverens acces-driver kører med et andet datoformat eller sådan noget?

Dato = cdate(clng(rs(\"Dato\")))
  Select case weekday(Dato)
  case \"2\": Dag = \"Mandag\"
  case \"3\": Dag = \"Tirsdag\"
  case \"4\": Dag = \"Onsdag\"
  case \"5\": Dag = \"Torsdag\"
  case \"6\": Dag = \"Fredag\"
  case \"7\": Dag = \"Lørdag\"
  case \"1\": Dag = \"Søndag\"
  end select
  Select case month(Dato)
  case \"1\": Moned = \"Januar\"
  case \"2\": Moned = \"Februar\"
  case \"3\": Moned = \"Marts\"
  case \"4\": Moned = \"April\"
  case \"5\": Moned = \"Maj\"
  case \"6\": Moned = \"Juni\"
  case \"7\": Moned = \"Juli\"
  case \"8\": Moned = \"August\"
  case \"9\": Moned = \"September\"
  case \"10\": Moned = \"Oktober\"
  case \"11\": Moned = \"November\"
  case \"12\": Moned = \"December\"
  end select

Hilsen Andreas