updatera databas

försöker att updatera en medlems databas, men jag får följande fel:

Microsoft OLE DB Provider for ODBC Drivers fel '80040e2f'

[Microsoft][Drivrutin för ODBC Microsoft Access] De ändringar du begärde i tabellen utfördes inte eftersom de skulle ha skapat dubbletter i index, primärnyckel eller relation. Ändra data i det eller de fält som innehåller identiska data, ta bort indexet eller definiera om indexet så att det tillåter dubbletter. Försök därefter igen.

/data/medlem_startsida/save.asp, rad 21

jag vill ju inte ha dubletter, jag vill bara updatera databasen, någon som har något förslag?

<%	Set Connect = Server.CreateObject("ADODB.Connection")
	Connect.Open "driver={Microsoft Access Driver (*.mdb)};DBQ="& Server.MapPath("/databas/medlems_register.mdb")
	
	Set RecSet = Server.CreateObject("ADODB.Recordset")
	Uppdatera = "SELECT medlems_register.* FROM medlems_register WHERE (NOT (ID IS NULL)) ORDER BY ID"
	
	RecSet.Open Uppdatera, Connect, adOpenStatic, adLockOptimistic 

	RecSet("user_name") = Request.Form("user_name")
	RecSet("password") = Request.Form("password")
	RecSet("email") = Request.Form("email")
	RecSet("stad") = Request.Form("stad")
	RecSet("yrke") = Request.Form("yrke")
	RecSet("intresse") = Request.Form("intresse")
	RecSet("icq") = Request.Form("icq")
	RecSet("hemsida") = Request.Form("hemsida")

	RecSet.Update
	RecSet.Close
	Connect.Close %>

rad 21 = recset.update

------------------
Micke & Annas Sajt
micke@micke-anna.nu

Dubletter borde du nog tillåta i en del fält. Det kan ju finnas flera personer från samma stad tex. Ändra Indexed-parametern i din databas.

Är du säker på att övrig kod är riktig? Den ser lite "annorlunda" ut.

::dap

jo, men fält som jag inte vill ha dubletter på är user_name, de andra fältet är dubletter tillåtna.

koden i formuläret innan är bara själva formuläret för att hämta användar_infon i från medlems_register.mdb det är när jag skall uppdatera som det inte fungerar... hur hade du gjort det då?

------------------
Micke & Annas Sajt
micke@micke-anna.nu

Så här brukar jag uppdatera en DB. Öppna databasen, sedan:

SQL = "UPDATE tblUser SET Namn = " & "'" & Request.Form("txtNamn") & "'" & ", Stad = " & "'" & Request.Form("txtStad") & "'" & " ... OSV ... WHERE ID = " & Request.Form("txtID") & ""
Conn.Execute (SQL)

KOden förutsätter att du döpt din Connection till "Conn"

::dap