När man använder datum i en selectsats mot en Access databas måste datumet inneslutas med #
SQLStmt = "SELECT namn1,namn2 FROM Namnsdag WHERE Manad=#"&Month(Date)&"# AND Dag=#"&Day(Date)&"#"
------------------
Pelle Johanssson (www.pellesoft.nu)
Frågan#1
<%
' Här skapar vi en dsn-less connection mot namnsdag
Set Connect = Server.CreateObject("ADODB.Connection")
dbFilePath = Server.MapPath("namnsdagar.mdb")
Connect.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & dbFilePath & ";"
SQLStmt = "SELECT namn1,namn2 FROM Namnsdag WHERE Manad="&Month(Date)&" AND Dag="&Day(Date)&""
Set namnsdag = Connect.Execute(SQLStmt)
%>
<%=namnsdag("namn1")%>
<%If namnsdag("namn2")<>"" Then %>
och <%=namnsdag("namn2")%>
<%End If%>
har namnsdag, grattis.<br>
<%
'Vi stänger databasen
Connect.close
Set Connect=nothing
%>
Får följande felutskrift:
Microsoft OLE DB Provider for ODBC Drivers fel '80004005'
[Microsoft][Drivrutin för ODBC Microsoft Access] Ogiltig kopplingssekvens som inte kan hanteras av operativsystemet.
/Index.asp, rad 7