errore update

[piccolobill]

ADODB.Recordset error '800a0cb3'

Current Recordset does not support updating. This may be a limitation of the provider, or of the selected locktype.

/sito2/link_go.asp, line 182


codice

rs("click") = rs("click") +1
rs.update
response.Redirect(rs("link"))

[99eros9]

assegna i permessi di scrittura nella tabella del database

[piccolobill]

ci sono. non è questo il problema

[Roby_72]

Posta la pagina.
Come apri il recordset?

Roby

[piccolobill]

<%
Response.Expires = 0
id=request("id")

Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)};" &_
"DBQ="& Server.MapPath("/mdb-database/auriga.mdb")
sql = "SELECT * FROM link where id="& id
Set Rs = Conn.Execute(sql)
%>
                          
                          Nome: 
                          <%=rs("nome")%>
                          </p>
                        

Stai per uscire dal sito Auriga. 

                          [b]                          
                          <%

rs("click") = rs("click") +1
rs.update
response.Redirect(rs("link"))
Rs.Close 
Set Rs = Nothing
Conn.Close
Set Conn = Nothing

%>

[Roby_72]

<%
Response.Expires = 0
id=request("id")

Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)};" &_
"DBQ="& Server.MapPath("/mdb-database/auriga.mdb")
sql = "SELECT link FROM link where id="& id
Set Rs = Conn.Execute(sql)
link = rs("link")
Rs.Close 
Set Rs = Nothing

sql = "UPDATE link set click = click + 1 where id="& id
Conn.Execute(sql)
Conn.Close
Set Conn = Nothing

response.Redirect(link)
%>

Roby

[piccolobill]

grazie mille. ma è con win2003 che non funge vero?
perchè su un altro server con win 2000 funzione bene

[Roby_72]

Esatto....

Roby