---
title: "håller på att göra dett forum men behöver lite hjälp"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/182531-håller-på-att-göra-dett-forum-men-behöver-lite-hjälp/page2"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "Mycodez"
published: "2010-02-22T21:46:36.000Z"
updated: "2010-03-10T18:48:00.000Z"
replies: 45
views: 1910
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/182531-håller-på-att-göra-dett-forum-men-behöver-lite-hjälp"
---

# håller på att göra dett forum men behöver lite hjälp

_Sida 2 av 3._

## #21 — Mycodez, 2010-03-05T18:34Z

om ni vill ha koden där man matar in svars meddelande så kan jag skicka med det om det skulle vara lite lättare att lösa själva problemet :)

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

## #22 — noshornin, 2010-03-05T18:40Z

Ett enkelt fel du skrev:

```
request.form("name")
```

Det ska nog stå:

```
request.form("Name")
```

alltså med stort "N"

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

## #23 — noshornin, 2010-03-05T18:43Z

"response.redirect request.servervariables("HTTP_REFERER")" skickar tillbaka användaren till föregående sida. du kan läsa mera om server variabler här: <http://www.w3schools.com/asp/coll_servervariables.asp>

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

## #24 — Mycodez, 2010-03-05T18:46Z

jag rättade till lite fel som jag såg faktiskt men jag fick ett annat felmeddelande   som lyder:
ADODB.Recordset error '800a0e7d'

The connection cannot be used to perform this operation. It is either closed or invalid in this context.

/svara.asp, line 22 

rad 22 är:
rs.open "svar"

och hela aspkoden är (när jag har ändrat lite men den gamla koden finns ju i svaret över):

```
<%

connectionString = "Driver={MySQL ODBC 3.51 Driver};Server=mysql26.kontrollpanelen.se;Option=3;Database=db;Uid=***;Pwd=****;" 

if NOT request.form("name") = "" AND NOT request.form("meddelande") = "" then

set connection = server.createobject("Adodb.connection")
set rs = server.createobject("adodb.recordset")
connection.open connectionString

rs.open "svar"

svarID = request.Querystring("fid")
namn = request.form("Name")
email =request.form("Email")
meddelande = request.form("meddelande")
rs.addnew
rs("svarid") = svarID
rs("namn") = namn
rs("email") = email
rs("meddelande") = meddelande
rs.update
rs.close
connection.close
response.redirect request.servervariables("HTTP_REFERER")

else
response.write "Du måste fylla i namn och meddelande för att det ska bli sparat."
end if
%>
```

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

## #25 — noshornin, 2010-03-05T18:59Z

Prova:

```
rs.open "SELECT * FROM svar", connection
```

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

## #26 — Mycodez, 2010-03-05T19:07Z

jag jag provade det så fick jag detta felmeddelande
 
ADODB.Recordset error '800a0cb3'

Current Recordset does not support updating. This may be a limitation of the provider, or of the selected locktype.

/svara.asp, line 28 

rad 28 är:

```
rs.addnew
```

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

## #27 — noshornin, 2010-03-05T19:38Z

Det ska ju vara:

```
rs.open "svar", connection
```

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

## #28 — Mycodez, 2010-03-05T21:48Z

suck noshornin jag gjorde som du skrev men det blev fortfarande fel.. :( nu fick jag detta fel meddelande
ADODB.Recordset error '800a0e79'

Operation is not allowed when the object is open.

/svara.asp, line 28 

raden 28 är. rs.open "svar", connection

hela koden är:

```
<%

connectionString = "Driver={MySQL ODBC 3.51 Driver};Server=mysql26.kontrollpanelen.se;Option=3;Database=db;Uid=******;Pwd=*****;" 

if NOT request.form("name") = "" AND NOT request.form("meddelande") = "" then

set connection = server.createobject("Adodb.connection")
set rs = server.createobject("adodb.recordset")
connection.open connectionString

rs.open "SELECT * FROM svar", connectionString

svarID = request.Querystring("fid")
namn = request.form("Name")
email =request.form("Email")
meddelande = request.form("meddelande")
rs.open "svar", connection
rs("svarid") = svarID
rs("namn") = namn
rs("email") = email
rs("meddelande") = meddelande
rs.update
rs.close
connection.close
response.redirect request.servervariables("HTTP_REFERER")

else
response.write "Du måste fylla i namn och meddelande för att det ska bli sparat."
end if
%>
```

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

## #29 — noshornin, 2010-03-05T22:39Z

okey!
Skriv så här istället:

```
sql = "INSERT INTO svar (svarid,namn,email,meddelande) VALUES ('"&svarID&"','"&namn&"', '"&email&"', '"&meddelande&"')"
connection.Execute(sql)
```

istället för:

```
rs.open "svar", connection
rs("svarid") = svarID
rs("namn") = namn
rs("email") = email
rs("meddelande") = meddelande
rs.update
rs.close
```

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

## #30 — Mycodez, 2010-03-06T09:06Z

okej tack! nu funkar det någolunda men när jag ska svara på en tråd mer än en gång så blir det ett fel meddelande till :( Men hoppas ni vill hjälpa mig jag e liten ny på detta 

felmeddelande:
Microsoft OLE DB Provider for ODBC Drivers error '80040e14'

\[MySQL\]\[ODBC 3.51 Driver\]\[mysqld-5.0.45\]Duplicate entry '1' for key 1

/svara.asp, line 29 

rad 29 =  

```
connection.Execute(sql)
```

här är hela koden

```
<%

connectionString = "Driver={MySQL ODBC 3.51 Driver};Server=mysql26.kontrollpanelen.se;Option=3;Database=*****;Uid=******;Pwd=*****;" 

if NOT request.form("name") = "" AND NOT request.form("meddelande") = "" then

set connection = server.createobject("Adodb.connection")
set rs = server.createobject("adodb.recordset")
connection.open connectionString

rs.open "SELECT * FROM svar", connectionString

svarID = request.Querystring("fid")
namn = request.form("Name")
email =request.form("Email")
meddelande = request.form("meddelande")
sql = "INSERT INTO svar (svarid,namn,email,meddelande) VALUES ('"&svarID&"','"&namn&"', '"&email&"', '"&meddelande&"')"
connection.Execute(sql)
connection.close
response.redirect request.servervariables("HTTP_REFERER")

else
response.write "Du måste fylla i namn och meddelande för att det ska bli sparat."
end if
%>
```

tack för ni vill hjälpa mig :)

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

## #31 — voigtann1, 2010-03-06T09:17Z

Varför skapar du ett Recordset som du aldrig använder?

```
<%

connectionString = "Driver={MySQL ODBC 3.51 Driver};Server=mysql26.kontrollpanelen.se;Option=3;Database=*****;Uid=******;Pwd=*****;" 

if NOT Len(Request.Form("name")) > 0 AND NOT Len(Request.Form("meddelande")) > 0 then
	set connection = server.createobject("Adodb.connection")
	connection.open connectionString

	svarID = request.Querystring("fid")
	namn = request.form("Name")
	email =request.form("Email")
	meddelande = request.form("meddelande")

	sql = "INSERT INTO svar (svarid,namn,email,meddelande) VALUES ('"&svarID&"','"&namn&"', '"&email&"', '"&meddelande&"')"
	connection.Execute(sql)

	connection.close

	response.redirect request.servervariables("HTTP_REFERER")
else
	response.write "Du måste fylla i namn och meddelande för att det ska bli sparat."
end if
%>
```

Räcker om du bara skall göra en INSERT

Det felmeddelande du får är att du försöker sätta ett fält som är unikt

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

## #32 — Mycodez, 2010-03-06T09:22Z

bara en fråga vad menar du  med len? som du skriver på en del ställen?

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

## #33 — Mycodez, 2010-03-06T09:25Z

voigtann1 jag ändrade till det du skrev men då kördes bara "else"-satsen och jag har fyllt i allt men vad kan då var fel?

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

## #34 — voigtann1, 2010-03-06T11:14Z

ta bort NOT på båda frågorna, LEN() är en VB funktion för att kolla längden på en sträng.

```
<%

connectionString = "Driver={MySQL ODBC 3.51 Driver};Server=mysql26.kontrollpanelen.se;Option=3;Database=*****;Uid=******;Pwd=*****;" 

if Len(Request.Form("name")) > 0 AND Len(Request.Form("meddelande")) > 0 then
	set connection = server.createobject("Adodb.connection")
	connection.open connectionString

	svarID = request.Querystring("fid")
	namn = request.form("Name")
	email =request.form("Email")
	meddelande = request.form("meddelande")

	sql = "INSERT INTO svar (svarid,namn,email,meddelande) VALUES ('"&svarID&"','"&namn&"', '"&email&"', '"&meddelande&"')"
	connection.Execute(sql)

	connection.close

	response.redirect request.servervariables("HTTP_REFERER")
else
	response.write "Du måste fylla i namn och meddelande för att det ska bli sparat."
end if
%>
```

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

## #35 — Mycodez, 2010-03-06T14:05Z

jag tog bort NOT från Len() statserna men då ficka jag detta felmeddelande 

Microsoft OLE DB Provider for ODBC Drivers error '80040e14'

\[MySQL\]\[ODBC 3.51 Driver\]\[mysqld-5.0.45\]Duplicate entry '1' for key 1

/svara.asp, line 26  

rad 26 är   	connection.Execute(sql)

och det är Yoigtann1s kod jag använder som är ovan

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

## #36 — voigtann1, 2010-03-06T14:45Z

Ett av fälten har du sagt att det inte få finnas dubbletter, kontrollera dina databas tabeller och se över din databas design att det stämmer med det du är ute efter.

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

## #37 — Mycodez, 2010-03-06T18:36Z

okej men jag vet inte hur det ska se ut riktigt. Du vet jag sitter och kör i en MySQL databas som jag fick från binero. som jag sen kan styra via PHPmyadmin. så hur kan det se ut?  jag vill lära mig men jag förstår mig inte på det alltså inte detta i allafall.

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

## #38 — noshornin, 2010-03-06T19:46Z

Jag vet inte exakt hur det ser ut i PHPmyadmin. Men om du kollar kolumnens inställningar så borde man typ kunna kryssa för en ruta som heter "unique" eller liknande. Om den är i kryssad, fast än du vill kunna göra dubbletter så är det bara att avkryssa den.

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

## #39 — Mycodez, 2010-03-06T22:53Z

jag gjorde så "SvarID" blev unik och satten primiär nycklen på "Meddelande" men då får jag 

Microsoft OLE DB Provider for ODBC Drivers error '80040e14'

\[MySQL\]\[ODBC 3.51 Driver\]\[mysqld-5.0.45\]Duplicate entry '1' for key 2

/svara.asp, line 26  

i stället 

alltså jag förstår mig inte på PHPmyadmin alltså..

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

## #40 — Mycodez, 2010-03-06T22:55Z

eller är det något jag ska ändra i koden ??? 

```
<%

connectionString = "Driver={MySQL ODBC 3.51 Driver};Server=mysql26.kontrollpanelen.se;Option=3;Database=web77725_mycodez;Uid=web77725_master;Pwd=flagga;" 

if Len(Request.Form("name")) > 0 AND Len(Request.Form("meddelande")) > 0 then
	set connection = server.createobject("Adodb.connection")
	connection.open connectionString

	svarID = request.Querystring("fid")
	namn = request.form("Name")
	email =request.form("Email")
	meddelande = request.form("meddelande")

	sql = "INSERT INTO svar2 (svarid,namn,email,meddelande) VALUES ('"&svarID&"','"&namn&"', '"&email&"', '"&meddelande&"')"
	connection.Execute(sql)

	connection.close

	response.redirect request.servervariables("HTTP_REFERER")
else
	response.write "Du måste fylla i namn och meddelande för att det ska bli sparat."
end if
%>
```

rad 26 är connection.Execute(sql)

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/182531-håller-på-att-göra-dett-forum-men-behöver-lite-hjälp/page2  
Föregående sida: https://www.webforum.nu/amne/asp/182531-håller-på-att-göra-dett-forum-men-behöver-lite-hjälp.md  
Nästa sida: https://www.webforum.nu/amne/asp/182531-håller-på-att-göra-dett-forum-men-behöver-lite-hjälp/page3.md