21. maj 2004 - 01:46Der er
5 kommentarer og 1 løsning
if Count er 20 eller derover så skriv optaget
har lavet encount funktion på et booking system og nu vil jeg ha den til at fjerne linket hvis der er 20 eller derover og blot skrive optaget!
har prøvet med følgende kode, men den tæller bare videre efter den når de 20, hvilket den jo ikke skal, ville også gerne have koblet en hold = rsHold(holdmonday) på min WHERE, men når jeg forsøger det, skriver den bare 0 i Count.
nogen der har et forslag til en løsning på disse to problemer?
<% if Len(""&rsHold("holdmonday")) > 0 then %><p class="hold"> <% strSQL = "SELECT COUNT(username) AS Antal FROM booking where dag ='Mandag' and uge='" & Request.Querystring("uge") &"'" Set rsCount = Conn.Execute(strSQL) %> <% if Len(""&rsCount("Antal")) = 20 then %> <%Response.Write "<br /> Optaget!" %>
<%else if Len(""&rsCount("Antal")) < 20 then %> <a href="book.asp?hold=<%= Server.HTMLEncode(Replace(Replace(rsHold("holdmonday"),vbCrLf,"<br>"),"&","%26"))%>&Dag=Mandag&uge=<% Response.write Request.Querystring("uge") %>&uge1=<% Response.write Request.Querystring("uge1") %>&uge2=<% Response.write Request.Querystring("uge2") %>" class="hold"><% = Replace(rsHold ("holdmonday"),vbCrLf,"<br>")%> <% Response.Write"<br />" & rsCount("Antal") & " på holdet!" %> </a> <% end if%> <% end if%> <% end if%>
I lang tid har samarbejdsbranchen fokuseret på at forbedre enhedsfunktioner – bedre kameraer, klarere lyd og smartere software. Men den virkelige forvandling handler ikke om funktioner.
<% strSQL = "SELECT COUNT(username) AS Antal FROM booking where dag ='Mandag' and uge='" & Request.Querystring("uge") &"'" Set rsCount = Conn.Execute(strSQL) %> <% if CInt(""&rsCount("Antal")) > 20 then %> <%Response.Write "<br /> Optaget!" %>
<%else if CInt(""&rsCount("Antal")) < 20 then %> <a href="book.asp?hold=<%= Server.HTMLEncode(Replace(Replace(rsHold("holdmonday"),vbCrLf,"<br>"),"&","%26"))%>&Dag=Mandag&uge=<% Response.write Request.Querystring("uge") %>&uge1=<% Response.write Request.Querystring("uge1") %>&uge2=<% Response.write Request.Querystring("uge2") %>" class="hold"><% = Replace(rsHold ("holdmonday"),vbCrLf,"<br>")%> <% Response.Write"<br />" & rsCount("Antal") & " på holdet!" %> ---------------------------- Skriver den ikke andet end et tomt felt, hvilket den jo ikke skal...
strSQL = "SELECT COUNT(username) AS Antal FROM booking where dag ='Mandag' and uge='" & Request.Querystring("uge") &"' WHERE hold = rsHold(holdmonday)" Set rsCount = Conn.Execute(strSQL)
Jeg ville ikke ha' haft points for svaret alligevel :-)
Synes godt om
Ny brugerNybegynder
Din løsning...
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.