Buongiorno,
chiedo il vostro aiuto per questo problema:
prendo dei dati da un form e tento di aggiungerli in un db access , in una cartella sotto mdb-database Aruba
L'inserimento ha sempre funzionato, da qualche giorno, il programma funziona qualche volta si , spesso no dando il maledetto errore 500 che non mi dice in quale riga del codice si è verificato. Non solo, su qualche computer funziona su altri no?. Sto perdendo iscritti, che si arrabbieranno anche per il disservizio.
Ringrazio anticipatamente chiunque risponderà a questo messaggio
vi allego il codice della pagina
<html><head>
</head>
<body>
<%Set Conn=Server.CreateObject("ADODB.Connection")
strConn="driver={Microsoft Access Driver (*.mdb)}; "
strConn=strConn & " DBQ=" & Server.MapPath("/mdb-database/utenti.mdb")
strConn=strConn & ";pwd="
Conn.Open strConn
sql = "SELECT * FROM datiutenti"
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open sql, conn ,3,3
do while not rs.eof
if request.form("nome")=rs(1) And request.form("cognome")=rs(2) then
response.redirect("registrazionenew.asp?errore=giaiscritto")
end if
if request.form("user")=rs(20) then
response.redirect("registrazionenew.asp?errore=user")
end if
rs.movenext
loop
rs.addnew
rs(1)=request.form("nome")
rs(2)=request.form("cognome")
rs(3)=request.form("residentein")
rs(4)=request.form("indirizzo")
rs(5)=request.form("numerocivico")
rs(6)=request.form("provincia")
rs(7)=request.form("citta")
rs(8)=request.form("cap")
rs(9)=request.form("email")
rs(10)=request.form("cellulare")
rs(11)=request.form("telefonofisso")
rs(12)=request.form("datadinascita")
rs(13)=request.form("natoin")
rs(14)=request.form("sesso")
rs(15)=request.form("titolodistudio")
rs(25)=request.form("professione")
rs(26)=request.form("presentazione")
rs(27)=request.form("hobbies")
rs(28)=request.form("ultime")
rs(20)=request.form("user")
rs(21)=request.form("password")
rs(22)=date()
rs(23)= false
rs(24)=date()
rs(29)= "emoticon.gif"
rs(30)= "A" ' completare la registrazione
rs.update
set rs = Nothing
conn.Close
set conn = Nothing
%>
<table width="64%" border="1" align="center" cellpadding="0" cellspacing="0" bordercolor="#111111" id="AutoNumber1" style="border-collapse: collapse">
<tr>
<td width="100%"> <div align="center"></div></td>
</tr>
<tr>
<td width="100%"><div align="center"><font face="Verdana"><span style="font-size: 8pt; font-weight: 700">Registrazione effettuata con successo </span></font></div></td>
</tr>
<tr>
<td width="100%"><div align="center">
<div align="center">
<% 'response.Redirect("intronew.asp")%>
<a href="intronew.asp?prog=main" class="style1">entra</a></div>
<font face="Verdana">
</font></div></td>
</tr>
</table>
<div align="center"></div>
<div align="center"></div>
</body></html>
