L limpon Medlem sedan sep. 2001 175 inlägg Frågan 9 okt. 2001 13:31 #1 Har ett problem här med mitt röstnings script som jag gjort till min sida.
Men då jag ska lägga in den valda röster i databasen så har jag gjort så att den ska bli +1 så jag sedan kan skriva ut hur många röster som har röstat på de olika sakerna.
Men det är något fel, jag förstår inte vad. Hoppas nån kan hjälpa mig jag visar filen vote.asp här nu.
----------------------------------
och sedan votehandle.asp
---------------------------------
Set Connect = Server.CreateObject("ADODB.Connection")
Set RecSet = Server.CreateObject("ADODB.Recordset")
temp = Request.Form("vote")
JA = RecSet("Ja") / RecSet("total") * 100
response.write "Totalt" & recset("total") & "<br>"
%>
-----------------------------------
Det är ju i SQL satsen som felet ligger, men vad är felet?
------------------
spango Medlem sedan juni 2000 8 205 inlägg Tja, du kör ju aldrig UPDATE-satsen, till att börja med.
------------------You can't be young forever, but you can be immature indefinitely.
L limpon Medlem sedan sep. 2001 175 inlägg Jag missade och skriva in den sorry.
den ska vara med där också
------------------
L LarsG Medlem sedan dec. 2000 12 464 inlägg Du borde uppdatera total också och sen så borde du ha med ett villkor på voteid i din update för nu uppdaterar du alla röstningar.
Det du visar nu är resultatet innan du uppdateringen sker. Du borde lägga select efter det att du har gjort update.
------------------essentitia preter non sans multiplicandum
L limpon Medlem sedan sep. 2001 175 inlägg Jo Total är ju en sak jag tänkte ta senare, går ju att göra lite onödiga satser som räknar ut det för o vara lättsam av sig =)
Men hur tänkte du jag ska lösa det som då? Jag har bara hållit på med det här en månad, men försöker lära mig =)
------------------
L LarsG Medlem sedan dec. 2000 12 464 inlägg Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("../database/database.mdb")&";"
set recset = connect.execute("select max(voteid) from vote)
voteid = recset(0)
recset.close
temp = Request.Form("vote")
SQL="UPDATE vote SET " & temp & " = " & temp & " + 1 where voteid = " & voteid
connect.execute sql,,128
Set RecSet = Connect.Execute("SELECT * FROM vote where voteid = " & voteid)
Ja = recset("JA")
Nej = recset("Nej")
Vet_inte = recset("Vet_inte")
Kanske = recset("kanske")
total = clng(Ja) + clng(Nej) + clng(Kanske + clng(Vet_inte)
ProcentJA = (Ja / total) * 100
ProcentNej = (Nej / total) * 100
ProcentVet_inte = (vet_inte) /total) * 100
ProcentKanske = (kanske / total") * 100
response.write "Totalt " & total & "<br>"
response.write "Ja "& JA & "<br>"
response.write "Nej "& NEJ & "<br>"
response.write "Vet inte "& vet_inte & "<br>"
response.write "Kanske "& Kanske & "<br>"
%>
Uträkningarna med *3 förstod jag inte vad dom betydde.
------------------essentitia preter non sans multiplicandum
L limpon Medlem sedan sep. 2001 175 inlägg Det var för bilderna som jag tänkte använda sedan, dom blir lite för kort annars så jag multiplicerade det med 3.
Men nu fick jag direkt några frågor.
Vad gör dessa rader? Och varför?
Vad innebär clng ?
Den som inte frågar får inget veta =)
Men tusen tack för kodsnutten ska testa om det funkar med det nya nu
------------------
L LarsG Medlem sedan dec. 2000 12 464 inlägg
set recset = connect.execute("select max(voteid) from vote)
Detta är för att hämta upp högsta värdet för voteid. Det blir samma resultat av
set recset = connect.execute("select voteid from vote order by voteid desc")
voteid = recset(0)
recset.close
men varianten med Max borde vara effektivare.
connect.execute sql,,128
128 innebär att man säger åt ADO att inte skapa något recordset alls. Om man inte anger 128 så skapas ett tomt och stängt recordset.
total = clng(Ja) + clng(Nej) + clng(Kanske + clng(Vet_inte)
Vad innebär clng ?
clng används för att konvertera ett uttryck till subtypen long. Det är för att + skall tolkas som aritmetiskt plus och inte som strängkonkatenering.
T.ex
a = "4"
c = clng(a) + clng(b) 'ger 5
------------------essentitia preter non sans multiplicandum
L limpon Medlem sedan sep. 2001 175 inlägg aha okej tusen tusen tack för hjälpen!
------------------
