Varför funkar inte detta???
<% manad = request.querystring("manad")%>
<%
Set conn = Server.CreateObject("ADODB.Connection")
conn.open
sql = "Select \* From kalender where manad='" & manad & "' order by datum"
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open sql,conn,3,3
%>
<% if (rs.Eof) then response.write "Det finns inga poster för denna månad"
else
%>
<tr bgcolor="#663300">
<th><font face="Verdana, Arial, Helvetica, sans-serif" size="2" color="#FFCC66"><%=rs("manad")%></font></th>
</tr>
<%Do until rs.EOF %>
<tr>
\<td\>\<font face="Verdana, Arial, Helvetica, sans-serif" size="1" color="#663300"\>
\</font\>
\<table width="100%" border="0" bgcolor="#FFCC66"\>
\<tr\>
\<td\>\<font face="Verdana, Arial, Helvetica, sans-serif" size="1" color="#663300"\>\<%=rs("notis")%\>\</font\>\</td\>
\</tr\>
\</table\>
\</td\>
\</tr\>
\<%rs.MoveNext
Loop%\>
<% end if %>
[Redigerat av pellsäter den 29 nov 2001]
LarsGMedlem sedan dec. 200012 464 inlägg Om du skriver
if (rs.Eof) then response.write "Det finns inga poster för denna månad"
på en rad så skall det inte vara något end if och du kan inte ha en else efteråt.
if (rs.Eof) then
response.write "Det finns inga poster för denna månad"
------------------
essentitia preter non sans multiplicandum
ok det är bra, men om nu det inte finns något för den månaden man vill se så ska ju sidan liksom ta slut efter response.write texten!!
Nu står det ju
ADODB.Field error '80020009'
Either BOF or EOF is True, or the current record has been deleted. Requested operation requires a current record.
?
LarsGMedlem sedan dec. 200012 464 inlägg Ser din kod ut så här nu?
<% manad = request.querystring("manad")%>
<%
Set conn = Server.CreateObject("ADODB.Connection")
conn.open "batang.com-fame/gastbok"
sql = "Select * From kalender where manad='" & manad & "' order by datum"
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open sql,conn,3,3
%>
<% if (rs.Eof) then
response.write "Det finns inga poster för denna månad"
else
%>
<tr bgcolor="#663300">
<th><font face="Verdana, Arial, Helvetica, sans-serif" size="2" color="#FFCC66"><%=rs("manad")%></font></th>
</tr>
<%Do until rs.EOF %>
<tr>
<td><font face="Verdana, Arial, Helvetica, sans-serif" size="1" color="#663300">
</font>
<table width="100%" border="0" bgcolor="#FFCC66">
<tr>
<td><font face="Verdana, Arial, Helvetica, sans-serif" size="1" color="#663300"><%=rs("notis")%></font></td>
</tr>
</table>
</td>
</tr>
<%rs.MoveNext
Loop%>
<% end if %>
dvs, att du bara lägger in en radbrytning mellan then och response.write. I så fall borde det fungera.
------------------
essentitia preter non sans multiplicandum
kanon tack!!
Du kanske kan hjälpa mig med en annan ska också. Jag vill visa en bild om ex man väljer januari månad. En bild för var månad så att säga.
Jag provade med
<% if request.querystring("manad") = Januari then response.write "<img src=""januari.jpg"">"
Men det funkar inte!!
LarsGMedlem sedan dec. 200012 464 inlägg <% if ucase(request.querystring("manad")) = "JANUARI" then response.write "<img src=""januari.jpg"">"
eller?
------------------
essentitia preter non sans multiplicandum
Bra!
Om jag nu vill tilldela en variabel den bilden för att sedan ha som body background, hur gör jag då
LarsGMedlem sedan dec. 200012 464 inlägg <%
picture = request.querystring("manad") & ".gif" %>
<body background="<%= picture%>">
------------------
essentitia preter non sans multiplicandum
