20 messaggi dal 24 luglio 2001
Ciao a tutti

Non so più che pesci pigliare.
La cartella ha i permessi, perchè li eredita dal web principale e perchè li ho controllati con Frontpage tasto destro su cartella ecc.
Il database ha 3 , 3 dopo il conn per l'update
Aiuto

Messaggio d'errore:


Microsoft OLE DB Provider for ODBC Drivers error '80004005'

[Microsoft][ODBC Microsoft Access Driver] Cannot update. Database or object is read-only.

/salvaweb/02_chat/admin/addchatroomreq.asp, line 64



E lo script addchatroomreq.asp è questo:

<%Option Explicit%>
<!--#include file="MaintConfig.inc"-->
<%
Dim connStr
Dim Conn
Dim sql
Dim RS
Dim fOld
Dim fNew
Dim fPath
Dim Chat_Rooms()
Dim i
Dim x
Dim ChatCnt

If IsArray(Application("Chat_Rooms")) Then
ReDimChat_Rooms(Ubound(Application("Chat_Rooms"))+1,3)

for i = 0 to Ubound(Application("Chat_Rooms"))
ChatCnt = 0
Chat_Rooms(i,0) = Application("Chat_Rooms")(i,0)
Chat_Rooms(i,1) = Application("Chat_Rooms")(i,1)
Chat_Rooms(i,2) = Application("Chat_Rooms")(i,2)

If Len(Application("User_Cnt")) > 0 And Application("User_Cnt") > 0 Then
for x = 0 to Ubound(application("Chat_List"))
If Trim(Application("Chat_List")(x,3)) = Trim(Application("Chat_Rooms")(i,0)) Then
If DateValue(Application("Chat_List")(x,4)) = Date() Then
ChatCnt = ChatCnt + 1
End If
End If
next
End If

Chat_Rooms(i,3) = ChatCnt
Next
Chat_Rooms(i,0) = Request.form("Room")
Chat_Rooms(i,1) = Request.form("MaxGuests")
Chat_Rooms(i,2) = Request.form("Catagory")
Chat_Rooms(i,3) = "0"
Application.Lock
Application("Chat_Rooms")=""
Application("Chat_Rooms")=Chat_Rooms
Application("Rooms_Cnt") = Application("Rooms_Cnt") + 1
Application.UnLock
End If

Set conn = Server.CreateObject("ADODB.Connection")
Set RS=Server.CreateObject("ADODB.Recordset")

connStr = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath(MyCon)
Conn.Open connStr

fPath=Left(Connstr,(InstrRev(connstr,"\")))

'response.write fPath
'response.end
RS.Open "Rooms", Conn, 3, 3

RS.AddNew
RS("Room")=Request.form("Room")
RS("Catagory") = Request.form("Catagory")
RS("MaxUser")=Request.form("MaxGuests")
RS.Update

RS.Close
Conn.Close
Set RS=Nothing
Set Conn=Nothing

response.redirect"addchatroom.asp"
%>
%>


Puo essere il db ciucco ?
E' possibile rendere un db di access in sola lettura non da asp ma dal db stesso ?

HELP





20 messaggi dal 24 luglio 2001
Ho risolto. I permessi chissa come mai erano scritti ma non funzionavano.
Cambiato cartella e risolto tutto.
Ciao a tutti

Torna al forum | Feed RSS

ASPItalia.com non è responsabile per il contenuto dei messaggi presenti su questo servizio, non avendo nessun controllo sui messaggi postati nei propri forum, che rappresentano l'espressione del pensiero degli autori.