Problem med If rs ugeDag Weekday Now Then
Koden ser sådan ud. Men den køre kun Else<%
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("/data/bildTest.mdb")
Conn.Open DSN
%>
<html>
<head>
<title>»» Bildgalleri ««</title>
<META NAME=""ROBOTS"" CONTENT=""NOINDEX, NOFOLLOW"">
<link rel="stylesheet" href="stil.css" type="text/css">
</head>
<body bgcolor="#f0f0f0" >
<%
strSQL= " Select * From bildArkiv "
Set rs = Conn.Execute(strSQL)
If rs("ugeDag")=(Weekday(Now)) Then
Response.Write RS("ugedag")
Response.Write("<img src='" & rs("filNavn") & "'>")
Response.Write rs("bildTekst")
Else
Response.write ("ØV")
End If
Conn.Close
Set Conn = Nothing
%>
</body>
</html>
I db er dagene nummerede 1-7 men viser ikke de tilknyttede billeder. Hvad er problemet
