---
title: "Omröstningscript?"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/11559-omröstningscript/page2"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "ReloadMaster"
published: "2001-08-24T18:01:00.000Z"
updated: "2001-09-11T09:10:00.000Z"
replies: 40
views: 405
page: 2
pages: 3
language: "sv-SE"
site: "webForum — webforum.nu"
rights: "Upphovsrätten till varje inlägg tillhör dess författare."
attribution: "Citera som: webForum, https://www.webforum.nu/amne/asp/11559-omröstningscript"
---

# Omröstningscript?

_Sida 2 av 3._

## #21 — Pace, 2001-08-27T19:51Z

:) Kul att det äntligen funkade! :)

Permalänk: https://www.webforum.nu/p/286220

## #22 — ReloadMaster, 2001-08-27T20:15Z

Bara eftersom du klarade det så tänker jag ställa två frågor till...
Hur ska jag bygga på för att den ska lägga in antalet röste också som heter roster1 - roster10
 Och hur gör jag för att räkna ihop dom?

Permalänk: https://www.webforum.nu/p/286221

## #23 — Pace, 2001-08-27T21:07Z

Okej, vi börjar med att registrera rösten:

1\. Du tar helt enkelt reda på vilket av alternativet användaren valde.
2\. Du uppdaterar fältet med en:

```
UPDATE rosta SET rostrX = rosterX + 1 WHERE pollId = [i]den poll du vill uppdatera[/i]
```

där X är numret på det fält du vill uppdatera.

Permalänk: https://www.webforum.nu/p/286222

## #24 — ReloadMaster, 2001-09-08T04:48Z

Varför kan ej denna funka den vill avsluta programsatsen efter "rosta"
\<html\>
\<head\>
\<title\>Omröstning - \_ \_ \_ \_ \_ \_.nu\</title\>
\</head\>
\<body\>
\<%
Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source ="& Server.MapPath("votedb.mdb")
%\>

\<%
If Request.Querystring("rosta") = "1" Then

SQL = UPDATE rosta SET roster1 = roster1 + 1 WHERE ID=1
Connect.Execute(SQL)

End If
%\>

\<%
Connect.Close 
Set Connect = Nothing 
%\>  
\</body\>
\</html\>

Permalänk: https://www.webforum.nu/p/286223

## #25 — @nders, 2001-09-08T07:19Z

Du har glömt citationstecken runt din SQL-fråga:

```
SQL = "UPDATE rosta SET roster1 = roster1 + 1 WHERE ID=1"
```

mvh,

Permalänk: https://www.webforum.nu/p/286224

## #26 — ReloadMaster, 2001-09-08T12:18Z

Tackar,

en liten ny enklare fråga(kanske):

Jag vill att där det står ID

så kan det senaste ID vara...

Permalänk: https://www.webforum.nu/p/286225

## #27 — ReloadMaster, 2001-09-08T16:25Z

Någon....

Permalänk: https://www.webforum.nu/p/286226

## #28 — @nders, 2001-09-08T16:37Z

Vad menar du med senaste id?

Vill du att id i din update-fråga skall vara det högsta i tabellen?

Permalänk: https://www.webforum.nu/p/286227

## #29 — ReloadMaster, 2001-09-08T19:48Z

Ja asså att det uppdaterar senaste ID...

Permalänk: https://www.webforum.nu/p/286228

## #30 — jorgen, 2001-09-08T20:36Z

Hej!

Förstår jag dig rätt får du göra detta med **@@identity** om det är en accessdatabas.

Jörgen :)

Permalänk: https://www.webforum.nu/p/286229

## #31 — ReloadMaster, 2001-09-09T09:22Z

?:

Permalänk: https://www.webforum.nu/p/286230

## #32 — Pace, 2001-09-09T11:05Z

Förklara tydligare hur du menar ReloadMaster!
(@@identity plockar ut ID:t på den senaste inlagda posten)

Permalänk: https://www.webforum.nu/p/286231

## #33 — ReloadMaster, 2001-09-09T12:07Z

Och här kommer ett försök till en förklaring:
Eftersom Omrsötningen får ett speciellt ID så vill jag att där det står Id på UPDATE strängen att uppdatera det senaste ID:et

Permalänk: https://www.webforum.nu/p/286232

## #34 — ReloadMaster, 2001-09-09T12:08Z

Och här kommer ett försök till en förklaring:
Eftersom Omrsötningen får ett speciellt ID så vill jag att där det står Id på UPDATE strängen att uppdatera det senaste ID:et

Permalänk: https://www.webforum.nu/p/286233

## #35 — Pace, 2001-09-09T12:10Z

Den enklaste vore att skicka med ID:t när du röstar. Dvs på den sida där pollen visas, tar du även med ID:t och skickar det i formuläret och tar emot det på registreringssidan och lägger på det på SQL strängen:

```
ID = Request.QueryString("id")
SQL = "UPDATE ... WHERE id = " & ID
```

Permalänk: https://www.webforum.nu/p/286234

## #36 — ReloadMaster, 2001-09-09T19:27Z

En ny frågor
Som jag undrar över

Och sedan denna:

```
<%
For loopCount = 1 To 10
If IsEmpty(recset("roster" & loopCount)) OR IsNull(recset("roster" & loopCount)) OR recset("roster" & loopCount) = "" Then Exit For
Response.Write "Svar" &loopcount& ": " & recset("roster" & loopCount) & "<br>" 
Next  
%>
```

Så att det ser ut typ så här:

Svar1: 1
Svar2: 0
Svar3: 2

(om bara tre alternativ finns)

Och sedan stopp

Eller att den skriver ut alla tabeller med högre värde än 0 

Typ:
Svar1: 1
Svar3: 2

Permalänk: https://www.webforum.nu/p/286235

## #37 — LarsG, 2001-09-09T19:55Z

Om du vill hoppa över de poster där värdet = 0

```
<%
For loopCount = 1 To 10
If IsEmpty(recset("roster" & loopCount)) OR IsNull(recset("roster" & loopCount)) OR recset("roster" & loopCount) = "" Then Exit For
if Clng(recset("roster" & loopCount)) > 0 then
Response.Write "Svar" &loopcount& ": " & recset("roster" & loopCount) & "<br>" 
end if
Next 
%>
```

Svårt att förstå vad du menar dock.

Permalänk: https://www.webforum.nu/p/286236

## #38 — ReloadMaster, 2001-09-09T20:17Z

Vad jag menar är att finns det bara 2 svarsalternativ
så behöver den bara skriva ut hur många röster dom har...

Permalänk: https://www.webforum.nu/p/286237

## #39 — ReloadMaster, 2001-09-10T16:44Z

Och kanske om någon kan hjälpa mikg med att räkna ut procenten om fälten heter roster1, roster2 o.s.v...

Permalänk: https://www.webforum.nu/p/286238

## #40 — ReloadMaster, 2001-09-10T19:25Z

Varför kan inte denna funka?

\<%If "&svar4&" = "" Then

'Gör inget

Else
r4 = RecSet("roster4")
%\>
Svar4: \<% =r4%\>\<br\>
\<%End If%\>

Permalänk: https://www.webforum.nu/p/286239

---

Tråden på webben: https://www.webforum.nu/amne/asp/11559-omröstningscript/page2  
Föregående sida: https://www.webforum.nu/amne/asp/11559-omröstningscript.md  
Nästa sida: https://www.webforum.nu/amne/asp/11559-omröstningscript/page3.md