mer än en uppdaterad post?

6 svar · 200 visningar · startad av magnusfeldth 13 maj 2003

magnusfeldthMedlem sedan jan. 20034 480 inlägg

Frågan13 maj 2003 15:12#1

SQL = "UPDATE sockrates SET rekomvotes = rekomvotes + 1 WHERE id = " & Request.Querystring("id")
Conn.Execute SQL

Hur lägger jag till så att jag även uppdaterar ett fält som heter "rekom", det fältet skall uppdateras med ett värde (alltså plusas på det tidigare) som kommer från ett form som heter just "rekom"???

SebbeMedlem sedan jan. 20032 285 inlägg

13 maj 2003 15:43#2

Menar du såhär? :)

SQL = "UPDATE sockrates SET rekomvotes = rekomvotes + 1, rekom = rekom + " & Request.Form("rekom") & " WHERE id = " & Request.Querystring("id")
Conn.Execute SQL

jimpaMedlem sedan jan. 2001361 inlägg

13 maj 2003 15:46#3

Så här kanske?

SQL = "UPDATE sockrates SET rekomvotes = rekomvotes + 1, rekom = rekom +" & Request.Form("rekom") & " WHERE id = " & Request.Querystring("id")

magnusfeldthMedlem sedan jan. 20034 480 inlägg

13 maj 2003 16:24#4

skrev:

<html>
<!-- #include file = "adovbs.inc" -->
<!-- Detta script är hämtat från [url]www.joakimweb.com[/url] -->
   <%
Set Conn = Server.CreateObject("ADODB.Connection") 
Conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" &Server.MapPath("addemalmbergadmin/tubsockan.mdb")&";"

SQL = "SELECT * FROM sockrates WHERE id = " & Request.Form("id") & " "
Set RecSet = Conn.Execute(SQL)

page = "info.asp?ID="& Request.Form("id")

RecSet.Close
Set RecSet = Nothing

SQL = "UPDATE sockrates SET rekomvotes = rekomvotes + 1, rekom = rekom + " & Request.Form("rekom") & " WHERE id = " & Request.Form("id")
Conn.Execute SQL

Conn.Close 
Set Conn=Nothing 

Response.Redirect page
%>
felmeddelande:
Microsoft OLE DB Provider for ODBC Drivers error '80004005' 

[Microsoft][ODBC Microsoft Access Driver] Operation must use an updateable query. 

/rekom.asp, line 17 
 sidan som man är på först ser ut så här:
[kod]
<form method="post" action="rekom.asp">
    <input type="hidden" name="id" value="<% =Request.QueryString("ID") %>" size="20">
  <p> 
    <label> 
    <input type="radio" name="rekom" value="1">
    Ett</label>
    <br>
    <label> 
    <input type="radio" name="rekom" value="2">
    Två</label>
    <br>
    <label> 
    <input type="radio" name="rekom" value="3">
    Tre</label>
    <br>
    <label> 
    <input type="radio" name="rekom" value="4">
    Fyra</label>
    <br>
    <label> 
    <input type="radio" name="rekom" value="5">
    Five</label>
    <br>
    <input type="submit" name="Submit" value="Submit">
  </p>
  </form>

Jesper TMedlem sedan nov. 20017 144 inlägg

13 maj 2003 16:37#5

Testa:

SQL = "UPDATE sockrates SET rekomvotes = rekomvotes + 1, rekom = rekom + '" & Request.Form("rekom") & "' WHERE id = " & Request.Form("id")

Jesper TMedlem sedan nov. 20017 144 inlägg

13 maj 2003 16:48#6

Tips: Lägg till, Conn.Execute(SQL),,128 på alla sql:er som inte skall returnera något. Ex. update, delete, insert

magnusfeldthMedlem sedan jan. 20034 480 inlägg

13 maj 2003 17:19#7

det verkar som felet ligger i att databasen lyckats bli skyddad på nåt sätt... dessutom har sidan DNS-problem enligt webhotellet... ay caramba...