46 svar · 596 visningar · startad av Qimen
Hej
Hur gör man för att den ska räkna hur många "bollar" användaren har? Användaren ligger sparad i en session och det ligger flera olika saker i "sak". Jag vill att den bara räknar "bollar".
Nu använder jag:
SQL = "SELECT sak From saker WHERE namn = '"&Session("username")&"' "
Set RecSet = Connect.Execute(SQL)
Response.Write RecSet.Fields(0)%>
Men då hämtar den allt som den användaren har.
Vad lite mer exakt ligger det i "sak" då?
I sak finns det blandade saker. Finns typ bollar, skor. Men jag vill bara räkna bollar.
strSQL = "SELECT COUNT(*) AS bollcount FROM saker WHERE namn = '" & Session("username") & "' AND sak = 'bollar'"
Set objRS = objCon.Execute(strSQL)
Response.Write(objRS("bollcount"))
Kanske??
Hur skriver jag ut det istället för
Set RecSet = Connect.Execute(strSQL)
Response.Write RecSet.Fields(0)
Som jag använde innan?
Hade redan redigerat mitt inlägg... Men men, skriver väl det igen då 
strSQL = "SELECT COUNT(*) AS bollcount FROM saker WHERE namn = '" & Session("username") & "' AND sak = 'bollar'"
Set objRS = Connect.Execute(strSQL)
Response.Write(objRS("bollcount"))
ah såg inte det 
Humn nu får jag bara "Det har inte angetts något värde för en eller flera nödvändiga parametrar." på raden:
Set objRS = Connect.Execute(strSQL)
Koden jag försöker med:
<%
Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source ="& Server.MapPath("db/egenskaper/saker.mdb") &" "
'Set RecSet = Server.CreateObject("ADODB.Recordset")
'SQL = "SELECT sak From saker WHERE namn = '"&Session("username")&"' "
'SQL = "SELECT sak From saker WHERE namn = '"&Session("username")&"' AND sak = '"bollar"' "
strSQL = "SELECT COUNT(*) AS bollcount FROM saker WHERE namn = '" & Session("username") & "' AND sak = 'bollar'"
Set objRS = Connect.Execute(strSQL)
Response.Write(objRS("bollcount"))
%>
Har kommenterat bort vissa saker baraför i fall att jag skulle behöva dem igen. Kanske har kommenterat bort för mycket?
/red Oj, läste inte ditt tidigare meddelande 
"Det har inte angetts något värde för en eller flera nödvändiga parametrar." på raden:
Set objRS = Connect.Execute(strSQL)
hehe lite sen igen jag då 
Vad händer om du skriver ut SQL-strängen?
strSQL = "SELECT COUNT(*) AS bollcount FROM saker WHERE namn = '" & Session("username") & "' AND sak = 'bollar'"
Response.Write(strSQL)
Qimen skrev:
Inkompatibla typer: 'objRS'
Huh?? 
Kommentera bort alla andra rader förutom SQL-strängen. Vill nämligen se vad Session("username") innehåller
Hepp det blev inget fel då.
Vad skrivs ut!? 
Inget.
<%
Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source ="& Server.MapPath("db/egenskaper/saker.mdb") &" "
strSQL = "SELECT COUNT(*) AS bollcount FROM saker WHERE namn = '" & Session("username") & "' AND sak = 'bollar'"
%>
Men inget ska väl skrivas ut med den?
<%
strSQL = "SELECT COUNT(*) AS bollcount FROM saker WHERE namn = '" & Session("username") & "' AND sak = 'bollar'"
Response.Write(strSQL)
%>
<%
strSQL = "SELECT COUNT(*) AS bollcount FROM saker WHERE namn = '" & Session("username") & "' AND sak = 'bollar'"
Response.Write(strSQL)
response.end
%>
Testa det och posta sen det som sidan skriver ut.