<code>
If Request.Querystring("Userid") = "" Then

response.Write "något blev fel Code 3 försök logga in igen!<br>"
Response.write "Eller kontakta Plugget administratören på Code3.plugget@javahuset.nu<br>"
Response.write "Så kontaktas du inomkort."

Else

Set Con = Server.CreateObject("Adodb.Connection")
Con.open "Driver={Microsoft Access Driver (*.mdb)};Dbq=" & Server.MapPath("../Dbq/community.mdb") & ";"
Set Rst = con.execute("Select * From pressentation Where Userid ='" & Request.Querystring("Userid") & "'")

If not Rst.eof THen

Response.write "Så här kommer din pressentation att se ut.<br>"
Response.write "&nbsp;" & Request.Form("PM") & "&nbsp;"
%>
<form Method="Post" Action="press_save.asp?Userid= <% = Request.Querystring("Userid") %>">
<input type="Hidden" Value="<% = Request.Form("Pm") %>" Name="Pm">
<input type="Submit" Value="Spara pressentation">
</form>
<%
Else

Response.write "Undantag har sket var vänlig och logga in igen!"
Response.write "Kvarstår problemet fortfarande kontakta plugget på mail adresse!"
Response.write "kallkod.plugget@javahuset.nu"
Response.write "Där du uppger vad problemet är och när felet uppstår och om du har försökt logga in på nytt men"
Response.write "det kvarstår ändå och var det uppstår i det här fallet vid uppdatering av pressentation."
Response.write "<big><strong><b>OBS!!!</b></strong> Felet ligger inte hos dig utan felet ligger på stället"
Response.write "Där hemsidan ligger på. Men det kan också vara hos dig men det är 1 på 10'000 att felet ligger hos dig oftsat!"
End if
End if
%>
</code>
Här vissar den all infomration hur det ser ut efter uppdateringen.
<code>
<%
If Request.Querystring("Userid") ="" Then
Response.redirect "http://a.domaindlx.com/plugget/index.htm"
Else
Set Con = Server.CreateObject ("Adodb.Connection")
Con.open "Driver={Microsoft Access Driver (*.mdb)};Dbq=" & Server.MapPath("../Dbq/community.mdb") & ";"
Con.execute("Update Pressentation Set Press ='" & Request.Form("Pm") & "' Where userid ='" & Request.Querystring("Userid") & "'")
Response.write "din pressentation har nu uppdaterats!"
End if
%>
</code>
Så uppdateras inte informationen.
Någon förstår vadför den inte vill uppdateras men jag får alltid texten din pressentation har nu uppdaterats.
Men den gör ändå inte det. Men det är inget null värde.
för skriver jag
<code>
Response.write Request.form("Pm")
</code>
Så får jag det utskrivet.
vad är då fel?
Uppdatering:
<code>
sql="Update Pressentation Set Press ='" & Request.Form("Pm") & "' Where userid ='" & Request.Querystring("Userid") & "'"
Response.write SQL
</code>
Då har även texten som jag har skrivit i pressentationen med. även id nummret.
Men ändå uppdateas det inte.
Vad är fel?

<code>
Välkommen in till min skolbänk
Håller ljust nu på utveckla pressentatioen. Men tyvärr finns det en bugg som jag ljust nu jobbar med att lösa. följt av id nummet.....
</code>
Men sen vid uppdatering så är det inte uppdaterat som det ska.
varför är det så?
Hatar när det ska strulla.

Prova att skriva ut SQL-satsen och bryt exekveringen direkt efter utskrift.

En möjlig lösning kan vara att testa att slänga in Request.Form("Pm") + Request.Querystring("Userid") i en variabel innan du skapar SQL-satsen... typ:
<code>
Dim tmpPres, tmpUID
tmpPres = Request.Form("Pm")
tmpUID = Request.Querystring("Userid")
'...
'...
Con.execute("Update Pressentation Set Press ='" & tmpPres & "' Where userid ='" & tmpUID & "'")
</code>

Id nummret skapas automatiskt vid inloggningen.
Men ska prova se om det funkar.
Så det kan vara att det inte lägger till Id nummret som gör att det inte uppdateras alltså.
Tackar.

Löst det.
Det som stör det hela är ordet Where.
När jag ta bort where
så skriver den in id nummet istället för kontrollera det.