---
title: "Fattar KAKA"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/7168-fattar-kaka"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "Bj"
published: "2000-11-19T10:01:00.000Z"
updated: "2000-11-19T13:09:00.000Z"
replies: 3
views: 212
page: 1
pages: 1
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/7168-fattar-kaka"
---

# Fattar KAKA

## #1 — Bj, 2000-11-19T10:01Z

Jag försöker göra en cookie där besökarna inte kan skicka mer än ett svar per dag. Men som det ser ut nu så går det inte att skicka något svar alls utan man hamnar direkt på "twotimes.asp". (Jag har rensat cookiecashen)
Är det någon som kan hjälpa mig med detta problem.

\<%
response.cookies("jul") = "heVoted"
Response.Cookies("jul").Expires = Date + 1
if Request.cookies("jul") = "heVoted" then
Response.Redirect "twotimes.asp"
else

Dim myMail
Set myMail = CreateObject("CDONTS.NewMail")
myMail.From = request.form("email")
myMail.To = "mail@adress.com"
myMail.Subject = "Tävlingssvar!"
myMail.Body = request.form("svar") + chr(10) + request.form("dittnamn")
myMail.Send
Set myMail = Nothing
end if
%\>

\<%
response.cookies("jul") = "heVoted"
Response.Cookies("jul").Expires = Date + 1
if Request.cookies("jul") = "heVoted" then
Response.Redirect "twotimes.asp"
else

Dim myMail
Set myMail = CreateObject("CDONTS.NewMail")
myMail.From = request.form("email")
myMail.To = "mail@adress.com"
myMail.Subject = "Tävlingssvar!"
myMail.Body = request.form("svar") + chr(10) + request.form("dittnamn")
myMail.Send
Set myMail = Nothing
end if
%\>

\<html\>
\<head\>
\<title\>\</title\>
\</head\>
\<body\>
\<font face="verdana"\>\<center\>\<p\>\<b\>Tack för Ditt Svar!\</center\>\</font\>\</b\>\</p\> 
\</body\>
\</html\>

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

## #2 — @nders, 2000-11-19T10:25Z

inte så konstigt när du först sätter kakan till röstad, och sedan kollar om den är satt till röstad.

eller :q

```
response.cookies("jul") = "heVoted"
Response.Cookies("jul").Expires = Date + 1
if Request.cookies("jul") = "heVoted" then
Response.Redirect "twotimes.asp"
```

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

## #3 — Bj, 2000-11-19T11:51Z

Men hur skall det vara?

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

## #4 — Bj, 2000-11-19T13:09Z

Kan det vara så här det skall vara? Det verkade funka men jag är tacksam om ngn ville kolla så det är rätt så besökare verkligen kan svara nästa dag.

\<%
if Request.cookies("jul") = "" then
Dim myMail
Set myMail = CreateObject("CDONTS.NewMail")
myMail.From = request.form("email")
myMail.To = "mail@adress.com"
myMail.Subject = "Tävlingssvar!"
myMail.Body = request.form("svar") + chr(10) + request.form("dittnamn")
myMail.Send
Set myMail = Nothing
Else
Response.Redirect "twotimes.asp"
end if
response.cookies("jul") = "heVoted"
Response.Cookies("jul").Expires = Date + 1
%\>

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/7168-fattar-kaka