Ciao a tutti: ho il seguente problema di connessione con il db:
(0x80040E09)
Impossibile aggiornare. Database o oggetto di sola lettura.
http://www.chalet.tannenduft.com/Adm...i/pagina1.asp, line 45.
In locale mi funziona però, ora che ho messo le cartelle sul web, quando provo a salvare un nuovo record, mi da il precedente errore. Che permessi devo dargli in più oltre che per il locale?.
Se invece faccio puntare la pagina ai record di uscita del db mi da i dati corretti e impaginati giusti.
Ecco la pagina asp come l'ho scritta:
<html>
<head>
<title>Mostra Dati Presenti</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>
<body bgcolor="#bbbbff" text="#000000">
<center>
<font size="5" color="#FF0000">Report Dati Affittuari degli Appartamenti
dello Chalet<font size="4"> :</font></font><font color="#FF0000"> </font>
</p>
<table border="1" width="400" bordercolor="#999999">
<tr bgcolor="#FF9966">
<td width="8%" bgcolor="#FF9966">
<center>
<font color="#000000">Cognome</font>
</center>
</td>
<td width="5%">
<center>
<font color="#000000">Nome</font>
</center>
</td>
<td width="4%">
<center>
<font color="#000000">Citta</font>
</center>
</td>
<td width="3%">
<center>
<font color="#000000">Via</font>
</center>
</td>
<td width="4%">
<center>
<font color="#000000">CAP</font>
</center>
</td>
<td width="4%">
<center>
<font color="#000000">Tel. Casa</font>
</center>
</td>
<td width="4%">
<center>
<font color="#000000">Tel. Cell.</font>
</center>
</td>
<td width="4%">
<center>
<font color="#000000">email</font>
</center>
</td>
<td width="8%" bgcolor="#FF9966">
<center>
<font color="#000000">Chalet di Pernottamento</font>
</center>
</td>
<td width="5%">
<center>
<font color="#000000">Giorno In</font>
</center>
</td>
<td width="4%">
<center>
<font color="#000000">Mese In</font>
</center>
</td>
<td width="3%">
<center>
<font color="#000000">Anno In</font>
</center>
</td>
<td width="4%">
<center>
<font color="#000000">Giorno Out</font>
</center>
</td>
<td width="4%">
<center>
<font color="#000000">Mese Out</font>
</center>
</td>
<td width="4%">
<center>
<font color="#000000">Anno Out</font>
</center>
</td>
<td width="4%">
<center>
<font color="#000000">Controllo</font>
</center>
</td>
<%
dim strCode
strCode="innovatel"
dim intVolta
intVolta="0"
Set Conn=Server.CreateObject("ADODB.Connection")
strConn="driver={Microsoft Access Driver (*.mdb)}; "
strConn=strConn & " DBQ=" & Server.MapPath("../../Database/db.mdb")
strConn=strConn & ";pwd=" & strCode
Conn.Open strConn
sql = "SELECT * FROM gest_chalet"
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open sql, conn ,3,3
do while not(rs.eof)
if intVolta="1" then
intVolta="0"
intTesto="#00FF99"
intSfondo="#FFFF00"
else
intVolta="1"
intTesto="#FFFF99"
intSfondo="#33CCFF"
end if
%>
<tr bgcolor="#FFFF99">
<td width="8%">
<div align="center"><%=rs(1)%></div>
</td>
<td width="5%">
<div align="center"><%=rs(2)%></div>
</td>
<td width="4%">
<div align="center"><%=rs(3)%></div>
</td>
<td width="3%">
<div align="center"><%=rs(4)%></div>
</td>
<td width="4%">
<div align="center"><%=rs(5)%></div>
</td>
<td width="4%">
<div align="center"><%=rs(6)%></div>
</td>
<td width="4%">
<div align="center"><%=rs(7)%></div>
</td>
<td width="4%">
<div align="center"><%=rs(8)%></div>
</td>
<td width="8%">
<div align="center"><%=rs(9)%></div>
</td>
<td width="5%">
<div align="center"><%=rs(10)%></div>
</td>
<td width="4%">
<div align="center"><%=rs(12)%></div>
</td>
<td width="3%">
<div align="center"><%=rs(14)%></div>
</td>
<td width="4%">
<div align="center"><%=rs(11)%></div>
</td>
<td width="4%">
<div align="center"><%=rs(13)%></div>
</td>
<td width="4%">
<div align="center"><%=rs(15)%></div>
</td>
<td width="4%">
<div align="center"><%=rs(16)%></div>
</td>
<%
rs.movenext
loop
rs.Close
set rs = Nothing
conn.Close
set conn = Nothing
%>
</table>
</center>
</body>
</html>
Vi ringrazio per la collaborazione. saluti
Rispondi quotando
