Person søges til hjælp af koder

hvilket sprog er der kodet i, og er point alt der er for det?

Siden er en fritids/fanside så det er desværre nød til kun at være point.
Og der er ASP

oky, kender ikke til asp, kun php....

Det er bare OK (c:

så læg dog dit spørgsmål i en passende kategori!
der er rent faktisk en kategori der heddder programmeringsopgaver, og hvis du ikke vil have det der er der også en asp kategori

Helt ærligt, hvis du ikke kan hjælpe så synes jeg godt nok du skulle passe dig selv!

Hvor meget mangler der at blive kodet?

jeg vil godt kunne se vinderne inde på adminsiden i stedet for at skulle ind på MySQL siden.
Inde på adminsiden skal man så også kunne skille de personer fra som har svaret helt rigtig på spørgsmålene. Så det er nemmere at finde vinderne.

Jeg tror ikke det er særlig meget for en som er god til koder

jeg kan godt kigge på det...

Men det bliver nok først i morgen hvis det er iorden....

Ja! Det er bare i orden

isaac og jeg har i fællesskab løst dette problem...

løsningen var:
Case "vind"
submode = request.querystring("submode")
if submode = "" then submode = "vindere" end if
select case submode
case "alle"


Set conn = Server.CreateObject("ADODB.Connection")
Conn.Open tempConn

spg = 3
sqlVinder = "Select * from svartabel"
set conn = conn.execute(sqlVinder)


response.write "<table border='1' width='100%' cellspacing='0' cellpadding='3' style='border-left: 1px solid rgb(0,0,0); border-right: 1px solid rgb(0,0,0); border-top: 1px solid rgb(0,0,0); border-bottom: 0px solid rgb(0,0,0)'>"
while not conn.eof
response.write "<tr>"
if not conn.eof then
response.write "<td width='33%'style='border-left: 0px solid rgb(0,0,0); border-right: 1px solid rgb(0,0,0); border-top: 0px solid rgb(0,0,0); border-bottom: 1px solid rgb(0,0,0)'>"
response.write conn.fields("navn") & "<br>"
response.write conn.fields("adresse") & "<br>"
response.write conn.fields("postnummer") & " " & conn.fields("bynavn") & "<br>"
response.write "<a href='mailto:" & conn.fields("email") & "'>" & conn.fields("email") & "</a><br>"
response.write "Antal rigtige: " & conn.fields("antalRigtige") & "<br>"
response.write "<a href='"&adminFilNavn&"?mode=vind&submode=slet&id=" & conn.fields("svarID") & "'>Slet</a><br>"
response.write "</td>"
conn.movenext
else
response.write "<td width='33%'style='border-left: 0px solid rgb(0,0,0); border-right: 1px solid rgb(0,0,0); border-top: 0px solid rgb(0,0,0); border-bottom: 1px solid rgb(0,0,0)'>&nbsp;</td>"
end if

if not conn.eof then
response.write "<td width='33%'style='border-left: 0px solid rgb(0,0,0); border-right: 1px solid rgb(0,0,0); border-top: 0px solid rgb(0,0,0); border-bottom: 1px solid rgb(0,0,0)'>"
response.write conn.fields("navn") & "<br>"
response.write conn.fields("adresse") & "<br>"
response.write conn.fields("postnummer") & " " & conn.fields("bynavn") & "<br>"
response.write "<a href='mailto:" & conn.fields("email") & "'>" & conn.fields("email") & "</a><br>"
response.write "Antal rigtige: " & conn.fields("antalRigtige") & "<br>"
response.write "<a href='"&adminFilNavn&"?mode=vind&submode=slet&id=" & conn.fields("svarID") & "'>Slet</a><br>"
response.write "</td>"
conn.movenext
else
response.write "<td style='border-left: 0px solid rgb(0,0,0); border-right: 1px solid rgb(0,0,0); border-top: 0px solid rgb(0,0,0); border-bottom: 1px solid rgb(0,0,0)'>&nbsp;</td>"
end if

if not conn.eof then
response.write "<td width='33%'style='border-left: 0px solid rgb(0,0,0); border-right: 0px solid rgb(0,0,0); border-top: 0px solid rgb(0,0,0); border-bottom: 1px solid rgb(0,0,0)'>"
response.write conn.fields("navn") & "<br>"
response.write conn.fields("adresse") & "<br>"
response.write conn.fields("postnummer") & " " & conn.fields("bynavn") & "<br>"
response.write "<a href='mailto:" & conn.fields("email") & "'>" & conn.fields("email") & "</a><br>"
response.write "Antal rigtige: " & conn.fields("antalRigtige") & "<br>"
response.write "<a href='"&adminFilNavn&"?mode=vind&submode=slet&id=" & conn.fields("svarID") & "'>Slet</a><br>"
response.write "</td>"
conn.movenext
else
response.write "<td width='33%'style='border-left: 0px solid rgb(0,0,0); border-right: 0px solid rgb(0,0,0); border-top: 0px solid rgb(0,0,0); border-bottom: 1px solid rgb(0,0,0)'>&nbsp;</td>"
end if


response.write "</tr>"

wend
response.write "</table>"
response.write "<div align='right'><a href='"&adminFilNavn&"?mode=vind&submode=slet&id=alle'>Slet alle poster</a></div><br>"
Response.write "<a href='" & adminFilNavn & "?mode=vind'>Tilbage</a>"

case "slet"
if isNumeric(request.querystring("id")) then
sql = "Delete from svartabel WHERE svarID = " & request.querystring("id")
elseif request.querystring("id") = "alle" then
sql = "Delete from svartabel"
else
response.redirect(adminFilNavn & "?mode=vind")
end if
Set conn = Server.CreateObject("ADODB.Connection")
Conn.Open tempConn
set conn = conn.execute(sql)
response.redirect(adminFilNavn & "?mode=vind")

case "vindere"

Set conn = Server.CreateObject("ADODB.Connection")
Conn.Open tempConn

spg = 3
sqlVinder = "Select * from svartabel where antalRigtige = " & CInt(spg)
set conn = conn.execute(sqlVinder)

response.write "<table border='1' width='100%' cellspacing='0' cellpadding='3' style='border-left: 1px solid rgb(0,0,0); border-right: 1px solid rgb(0,0,0); border-top: 1px solid rgb(0,0,0); border-bottom: 0px solid rgb(0,0,0)'>"
while not conn.eof
response.write "<tr>"
if not conn.eof then
response.write "<td width='33%'style='border-left: 0px solid rgb(0,0,0); border-right: 1px solid rgb(0,0,0); border-top: 0px solid rgb(0,0,0); border-bottom: 1px solid rgb(0,0,0)'>"
response.write conn.fields("navn") & "<br>"
response.write conn.fields("adresse") & "<br>"
response.write conn.fields("postnummer") & " " & conn.fields("bynavn") & "<br>"
response.write "<a href='mailto:" & conn.fields("email") & "'>" & conn.fields("email") & "</a><br>"
response.write "Antal rigtige: " & conn.fields("antalRigtige") & "<br>"
response.write "<a href='"&adminFilNavn&"?mode=vind&submode=slet&id=" & conn.fields("svarID") & "'>Slet</a><br>"
response.write "</td>"
conn.movenext
else
response.write "<td width='33%'style='border-left: 0px solid rgb(0,0,0); border-right: 1px solid rgb(0,0,0); border-top: 0px solid rgb(0,0,0); border-bottom: 1px solid rgb(0,0,0)'>&nbsp;</td>"
end if

if not conn.eof then
response.write "<td width='33%'style='border-left: 0px solid rgb(0,0,0); border-right: 1px solid rgb(0,0,0); border-top: 0px solid rgb(0,0,0); border-bottom: 1px solid rgb(0,0,0)'>"
response.write conn.fields("navn") & "<br>"
response.write conn.fields("adresse") & "<br>"
response.write conn.fields("postnummer") & " " & conn.fields("bynavn") & "<br>"
response.write "<a href='mailto:" & conn.fields("email") & "'>" & conn.fields("email") & "</a><br>"
response.write "Antal rigtige: " & conn.fields("antalRigtige") & "<br>"
response.write "<a href='"&adminFilNavn&"?mode=vind&submode=slet&id=" & conn.fields("svarID") & "'>Slet</a><br>"
response.write "</td>"
conn.movenext
else
response.write "<td style='border-left: 0px solid rgb(0,0,0); border-right: 1px solid rgb(0,0,0); border-top: 0px solid rgb(0,0,0); border-bottom: 1px solid rgb(0,0,0)'>&nbsp;</td>"
end if

if not conn.eof then
response.write "<td width='33%'style='border-left: 0px solid rgb(0,0,0); border-right: 0px solid rgb(0,0,0); border-top: 0px solid rgb(0,0,0); border-bottom: 1px solid rgb(0,0,0)'>"
response.write conn.fields("navn") & "<br>"
response.write conn.fields("adresse") & "<br>"
response.write conn.fields("postnummer") & " " & conn.fields("bynavn") & "<br>"
response.write "<a href='mailto:" & conn.fields("email") & "'>" & conn.fields("email") & "</a><br>"
response.write "Antal rigtige: " & conn.fields("antalRigtige") & "<br>"
response.write "<a href='"&adminFilNavn&"?mode=vind&submode=slet&id=" & conn.fields("svarID") & "'>Slet</a><br>"
response.write "</td>"
conn.movenext
else
response.write "<td width='33%'style='border-left: 0px solid rgb(0,0,0); border-right: 0px solid rgb(0,0,0); border-top: 0px solid rgb(0,0,0); border-bottom: 1px solid rgb(0,0,0)'>&nbsp;</td>"
end if


response.write "</tr>"

wend
response.write "</table>"
Response.write "<a href='" & adminFilNavn & "?mode=vind&submode=alle'>Vis alle</a>"
case else
response.redirect (adminfilnavn & "?mode=vind")
end select