---
title: "Ingen uppdatering??"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/52298-ingen-uppdatering"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "Jesper T"
published: "2002-09-05T14:13:07.000Z"
updated: "2002-09-05T20:15:39.000Z"
replies: 8
views: 221
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/52298-ingen-uppdatering"
---

# Ingen uppdatering??

## #1 — Jesper T, 2002-09-05T14:13Z

Jag försöker att uppdatera min databas men det går inte, inget händer och inget felmess. :l 

```
 <form name="form1" method="post" action="pagemake_adm.asp?">
  <select name="strPage" onChange="submit(this);">
    <option value="" selected>Välj en sida</option>
    <%
set ani = Server.CreateObject("ADODB.Recordset")
ani.Open "Pages", "DBQ=" & Server.Mappath("/db/pagemaker.mdb") & ";Driver={Microsoft Access Driver (*.mdb)};"
					  
Do While not ani.EOF
response.write"<option value='"&ani("ID")&"'>"& ani("NAME")&"</option>"
ani.MoveNext
	Loop
	ani.Close
	set ani = Nothing
	%>
  </select>
</form>
<%
UPD=request("UPD")
strPage=request("strPage")
TEXT=request.form("TEXT")
if strPage <> "" then
Dim Conn, rs, SQLSats
Set Conn = Server.CreateObject("ADODB.Connection") 
Set rs = Server.CreateObject("ADODB.Recordset") 
Conn.Open "DBQ=" & Server.MapPath("\******.mdb") & ";Driver={Microsoft Access Driver (*.mdb)};" 

SQLSats = "Select ID,NAME,TEXT,UPD from Pages Where ID="& strPage
SET rs = Conn.Execute(SQLSats)
 If UPD="yes" then
SQL = "Update Pages Set [text]='" & TEXT &"' Where ID="& strPage
conn.execute SQL,,128
end if%>

<form name="form1" method="post" action="pagemake_adm.asp?UPD=Yes&strPage=<%=rs("ID")%>">
  <p>Sida: <%=RS("NAME")%></p>
  <p> 
    <textarea name="TEXT" cols="70" rows="18"><%=rs("TEXT")%></textarea>
    <input type="hidden" name="UPD" value="<%=date()%>">
    <input type="submit" name="submit" value="Uppdatera">
  </p>
  <p>Uppdaterad senast: <%=RS("UPD")%></p>
</form>
<%

rs.Close
Set rs = Nothing
Conn.Close
Set Conn = Nothing

end if %>
```

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

## #2 — LarsG, 2002-09-05T14:52Z

Möjliga orsaker:

UPD är inte yes
Det finns ingen post som uppfyller villkoret

```
response.write "*Debug*Value of upd:" & upd & "<br>"
If UPD="yes" then
SQL = "Update Pages Set [text]='" & TEXT &"' Where ID="& strPage
conn.execute SQL,rows,128
response.write "*Debug*Rows updated: " & rows & "<br>"
end if
```

lite trace är nästan aldrig fel.

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

## #3 — trexter.com, 2002-09-05T15:42Z

vad är UPD?

 :)

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

## #4 — LarsG, 2002-09-05T15:46Z

UPD är en variabel i skriptet. Värdet på den avgör om man kommer in i den kod som gör update.

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

## #5 — Jesper T, 2002-09-05T18:25Z

> Det finns ingen post som uppfyller villkoret

Jag har kollat att post ID:et stämmer och jag har skrivit ut både UPD samt strPage och båda visar korrekt resultat ex. UPD=Yes, ID=24
Konstigt...

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

## #6 — LarsG, 2002-09-05T19:32Z

Yes är inte samma som yes.

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

## #7 — jimpa, 2002-09-05T19:37Z

Prova o skriv

```
If UPD="yes" then
SQL = "Update Pages Set [text]='" & TEXT &"' Where ID="& strPage
conn.execute SQL,rows,128
response.write "*Debug*Rows updated: " & rows & "<br>"
end [B]I[/B]f   '<--  end If med stort I
```

Kanske kan hjäpa  :l

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

## #8 — Ekström, 2002-09-05T19:40Z

If cstr(UPD)="yes" Then

Har haft liknande probs själv och cstr() har hjälpt.

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

## #9 — Jesper T, 2002-09-05T20:15Z

LarsG --\> Du har så rätt!!

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/52298-ingen-uppdatering