Databas: MySQL
Plattform: Windows Server 2003

<code>
<%
IF Request("session") = "update" then
Set RecSet = Server.CreateObject("ADODB.Recordset")
Uppdatera = "SELECT * FROM styrelsen Where id=1"
RecSet.Open Uppdatera, Conn, 3, 3

' ############## Ordförande
RecSet("namn_ordforende") = Request.Form("namn_ordforende")
RecSet("mail_ordforende") = Request.Form("mail_ordforende")
RecSet("gata_ordforende") = Request.Form("gata_ordforende")
RecSet("post_adress_ordforende") = Request.Form("post_adress_ordforende")
RecSet("tel_boende_ordforende") = Request.Form("tel_boende_ordforende")
RecSet("tel_arbete_ordforende") = Request.Form("tel_arbete_ordforende")

' ############## Vice Ordförande
RecSet("namn_vordforende") = Request.Form("namn_vordforende")
RecSet("mail_vordforende") = Request.Form("mail_vordforende")
RecSet("gata_vordforende") = Request.Form("gata_vordforende")
RecSet("post_adress_vordforende") = Request.Form("post_adress_vordforende")
RecSet("tel_boende_vordforende") = Request.Form("tel_boende_vordforende")
RecSet("tel_arbete_vordforende") = Request.Form("tel_arbete_vordforende")

' ############## Sekreterare
RecSet("namn_sekreterare") = Request.Form("namn_sekreterare")
RecSet("mail_sekreterare") = Request.Form("mail_sekreterare")
RecSet("gata_sekreterare") = Request.Form("gata_sekreterare")
RecSet("post_adress_sekreterare") = Request.Form("post_adress_sekreterare")
RecSet("tel_boende_sekreterare") = Request.Form("tel_boende_sekreterare")
RecSet("tel_arbete_sekreterare") = Request.Form("tel_arbete_sekreterare")

' ############## Kassör
RecSet("namn_kassor") = Request.Form("namn_kassor")
RecSet("mail_kassor") = Request.Form("mail_kassor")
RecSet("gata_kassor") = Request.Form("gata_kassor")
RecSet("post_adress_kassor") = Request.Form("post_adress_kassor")
RecSet("tel_boende_kassor") = Request.Form("tel_boende_kassor")
RecSet("tel_arbete_kassor") = Request.Form("tel_arbete_kassor")

' ############## Utbildningsansvarig
RecSet("namn_utbildning") = Request.Form("namn_utbildning")
RecSet("mail_utbildning") = Request.Form("mail_utbildning")
RecSet("gata_utbildning") = Request.Form("gata_utbildning")
RecSet("post_adress_utbildning") = Request.Form("post_adress_utbildning")
RecSet("tel_boende_utbildning") = Request.Form("tel_boende_utbildning")
RecSet("tel_arbete_utbildning") = Request.Form("tel_arbete_utbildning")

' ############## Ordf. Simkommite
RecSet("namn_simkommite") = Request.Form("namn_simkommite")
RecSet("mail_simkommite") = Request.Form("mail_simkommite")
RecSet("gata_simkommite") = Request.Form("gata_simkommite")
RecSet("post_adress_simkommite") = Request.Form("post_adress_simkommite")
RecSet("tel_boende_simkommite") = Request.Form("tel_boende_simkommite")
RecSet("tel_arbete_simkommite") = Request.Form("tel_arbete_simkommite")
RecSet("namn_simkommite2") = Request.Form("namn_simkommite2")
RecSet("mail_simkommite2") = Request.Form("mail_simkommite2")
RecSet("gata_simkommite2") = Request.Form("gata_simkommite2")
RecSet("post_adress_simkommite2") = Request.Form("post_adress_simkommite2")
RecSet("tel_boende_simkommite2") = Request.Form("tel_boende_simkommite2")
RecSet("tel_arbete_simkommite2") = Request.Form("tel_arbete_simkommite2")

RecSet.Update
RecSet.Close
Set RecSet = Nothing
Response.Redirect "styrelsen.asp"
END IF
%></code>

Du kan ju lägga till en koll att posten verkligen finns:
<code>

RecSet.Open Uppdatera, Conn, 3, 3
IF RecSet.EOF Then
RecSet.AddNew
RecSet("Id")=1
End If
</code>

Andreas efter det du skrivit så fick jag detta felmeddelande:


ADODB.Recordset fel '800a0cc1'

Item cannot be found in the collection corresponding to the requested name or ordinal.

/mysql/admin/update.asp, rad 21

Jag tror att det är något felaktigt fältnamn i databasen.
(Du försöker referera till ett fält som inte finns (felstavat) )
Gå igenom alla fältnamn, och kontollera i databas och i formulär