webForumDet fria alternativet

Avancerad Poll

22 svar · 498 visningar · startad av M.Cheraghi · sida 2 av 2

M.CheraghiMedlem sedan juli 20015 107 inlägg
#21

jag löste det själv :) Kanske inte det mest ultimata :) men det fungerar iaf =)

<%
SQL = "SELECT Count(*) AS intAntal FROM tblAnswer WHERE PollID = "&pollid&""
Set RSCountallt = conn.execute(SQL)
if RSCountallt(0) = "0" then
	counterror = "1"
end if

Do until RSOption.eof
svar = RSOption("svarsval")
opid = RSOption("OptionID")

SQL = "SELECT Count(*) AS intAntal FROM tblAnswer WHERE PollID = "&pollid&" AND OptionID = "&opid&""
Set RSCountdel = conn.execute(SQL)
if RSCountdel(0) ="0" then
	counterror = "1"
end if
%>
  <tr>
    <td bgcolor="#E0DFE3"><%=svar%></td>
  </tr>

<%If counterror <> "1" then%>
  <tr>
    <td bgcolor="#E0DFE3"><%
procent = Round(RSCountdel(0) / RSCountallt(0) * 100)

%><IMG src="syspic/nbar.gif" height="5" width="<%=procent%>%"> <%=procent%>%</td>
  </tr>
<%else%>
    <td bgcolor="#E0DFE3"><IMG src="syspic/nbar.gif" height="5" width="2"> 0%</td>
  </tr>
<%end if%>
@ndersMedlem sedan juni 200032 969 inlägg
#22

M.Cheraghi skrev:

jag löste det själv :) Kanske inte det mest ultimata :)

Det är inget fel på den lösningen. :)

Mvh

M.CheraghiMedlem sedan juli 20015 107 inlägg
#23

@nders skrev:

M.Cheraghi skrev:

jag löste det själv :) Kanske inte det mest ultimata :)

Det är inget fel på den lösningen. :)

Mvh

Yeah! Grovt :bire det firar man morgonens försa snus!

129 ms totalt · 3 externa anrop · v20260731065814-full.30151723
0 ms — hämta forumlista (cache)
0 ms — hämta statistik (cache)
126 ms — hämta tråd, inlägg och bilagor (db)