Avatar billede bogologo Nybegynder
21. maj 2004 - 01:46 Der 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%>
Avatar billede thesurfer Nybegynder
21. maj 2004 - 02:04 #1
Len bruger til antallet af tegn: http://www.w3schools.com/vbscript/func_len.asp
Hvis der skal regnes (f.eks. noget større end 20), skal du bruge CInt: http://www.w3schools.com/vbscript/func_cint.asp

Og "" indikere at det er en streng..
Avatar billede bogologo Nybegynder
21. maj 2004 - 10:46 #2
med:
-----------------------------

<%
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...
Avatar billede bogologo Nybegynder
21. maj 2004 - 11:08 #3
så fik jeg den sørme til at virke.... nu skal jeg bare ha koblet  hold = rsHold(holdmonday) på min where... det driller... nogen forslag?
Avatar billede tzag_dk Nybegynder
21. maj 2004 - 13:23 #4
Mon ikke dette skulle virke :-)

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)
Avatar billede bogologo Nybegynder
21. maj 2004 - 13:25 #5
sorry, havde fået den til at virke, bare ik fået lukket... gør jeg nu... lukker
Avatar billede thesurfer Nybegynder
21. maj 2004 - 15:26 #6
Jeg ville ikke ha' haft points for svaret alligevel :-)
Avatar billede Ny bruger Nybegynder

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.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester