[ASP] Errore: ADODB.Field error '800a0bcd'

Kosimo

Nuovo Utente
3 Set 2015
4
0
1
Salve a tutti... non so se a qualcuno è capitato lo stesso mio problema.
Coi miei amici, stiamo programmando un piccolo manageriale di calcio per divertirci tra noi.
L'homepage si carica correttamente ma, dopo un paio di minuti di non utilizzo della pagina (e anche sulle altre), si genera questo errore:

ADODB.Field error '800a0bcd'
Either BOF or EOF is True, or the current record has been deleted. Requested operation requires a current record.
/home.asp, line 19

Ho fatto varie prove per capire ed ovviare al problema ma non ci riesco! :(
Quale potrebbe essere secondo voi il problema e, di conseguenza, una soluzione?

Vi posto di seguito il codice (in grassetto la linea incriminata)...
_____
<%
Session.LCID=1040
varcdc=(Session("cdc"))
vardataserver=(Date)
'----- RECUPERO DATI GENERALI -----
Set dbconn = Server.CreateObject("ADODB.Connection")
mMapPath = Server.MapPath("./mdb-database/dati.mdb")
dbconn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & mMapPath & ";"
sql="select * from dati where id like '" & 1 &"'"
Set RS=dbconn.Execute(sql)
varimg=rs("home")
vargiornataincorso=rs("giornataincorso")
'----- RECUPERO DATI SQUADRA -----
Set dbconn = Server.CreateObject("ADODB.Connection")
mMapPath = Server.MapPath("./mdb-database/squadre.mdb")
dbconn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & mMapPath & ";"
sql="select * from squadre where cdc like '"& varcdc &"'"
Set RS=dbconn.Execute(sql)
varsqdr=(rs("squadra"))
varid=(rs("id"))
varcdcid=(varcdc & varid)
varcategoria=(rs("categoria"))
varcapitale=(rs("capitale"))
varMagliaStile=(rs("MagliaStile"))
varMagliaModello=(rs("MagliaModello"))
varmaglia=("maglie/stile" & varMagliaStile & "/" & varMagliamodello & ".gif")
%>
<html>
<head>
<title>Calcio Manager</title>
<link rel="stylesheet" type="text/css" href="aspstyle.css">
<meta name="viewport" content="width=device-width">
</head>
<body class="font_style" bgcolor="#000000" background="img/<%response.write(varimg)%>">
<div align="center">
<table border="0" width="500" height="300">
<tr>
<td align="center">
<table border="0" cellspacing="0" cellpadding="0">
<tr>
<td align="center">
<table width="200" border="0" cellspacing="0" cellpadding="0">
<tr>
<td align="center">
<img border="0" src="<%response.write(varmaglia)%>" width="70" height="70">
</td>
<td align="center">
<font class="bianco_grassetto_grande"><%response.write(varsqdr)%></font><br>
<font class="bianco_grassetto"><%response.write(varmanager)%></font><br>
<%Set dbconn = Server.CreateObject("ADODB.Connection")
mMapPath = Server.MapPath("./mdb-database/squadre.mdb")
dbconn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & mMapPath & ";"
sql="select * from stadio where squadra like '" & varsqdr &"'"
Set RS=dbconn.Execute(sql)
varStadio=(rs("stadio"))
varPosti=(rs("posti"))
varLivello=(rs("livello"))
varBiglietto=(rs("biglietto"))%>
<font class="bianco_semplice_piccolo"><%response.write(varStadio)%></font><br>
<font class="bianco_semplice_piccolo">(<%response.write(varPosti)%> posti)</font><br>
</td>
</tr>
<tr>
<td align="center" colspan="2" height="10">
</td>
<tr>
<tr>
<td align="center" bgcolor="#EEEEEE" background="menubar.gif" colspan="2">
<font class="nero_grassetto">Info</font>
</td>
</tr>
<tr>
<td bgcolor="#EEEEEE" align="center" colspan="2">
<img border="0" src="img/ico/soldi.png" width="15" height="15"><font class="nero_semplice"> <%response.write(varcapitale/100)%> M</font>
<%Set dbconn = Server.CreateObject("ADODB.Connection")
mMapPath = Server.MapPath("./mdb-database/staff.mdb")
dbconn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & mMapPath & ";"
sql="select * from giocatori where sqdr like '" & varsqdr &"' order by id"
Set RS=dbconn.Execute(sql)
dim varmediasquadra
varmediasquadra=0
dim varnumgioc
varnumgioc=0
dim varprezzogioc
varprezzogioc=0
do while not rs.eof
varmedia=rs("media")
varvalore=rs("valore")
varmediasquadra=varmediasquadra+varmedia
varnumgioc=varnumgioc+1
varprezzogioc=(varprezzogioc+varvalore)
rs.movenext
loop%>
<font class="nero_semplice"><br>Valore squadra: <%response.write(varprezzogioc/100)%> M</font><br>
<font class="nero_semplice">Media: </font>
<%
mediasquadra=(varmediasquadra/varnumgioc)/1000
n = 2 ' cifre da arrotondare
numero = mediasquadra ' numero da arrotondare
stelle=(mediasquadra/20)
sText = stelle
iMaxChar = 1
sResult = Left(sText, iMaxChar)
If Len(sText) > iMaxChar Then
End If
varStelleImmagine=("img/Bkg200x20.png")
Dim i
i = 1
For i = 1 To sResult%>
<img border="0" src="img/Stella.png" width="12" height="12">
<%Next%>
<font class="nero_semplice">(<%Response.write Round(numero, n)%>)<br><br></font>
</td>
</tr>
</table>
</td>
<td width="10">
</td>
</tr>
</table>
</td>
</tr>
</table>
</div>
</body>
</html>
<%RS.Close
dbconn.Close
Set RS = Nothing
set dbconn = Nothing%>
 
Discussioni simili
Autore Titolo Forum Risposte Data
B Errore ASP 0107 - La quantità di dati da elaborare è superiore al massimo consentito. Classic ASP 1
G Errore quando Sto ospitando i miei siti ASP.NET ASP.NET 1
M xmlhttp ed errore 'ASP 0185 : 80020003' Classic ASP 4
M errore 438 in apertura file XLS in pagina ASP Classic ASP 1
G Errore ASP Classic ASP 2
A errore asp Active Server Pages, ASP 0241 (0x80004005) Database 0
J Errore 'ASP 0113' Classic ASP 0
A Asp & Sql Server... Errore!! Classic ASP 1
M asp: errore nell'upload di file di grandi dimensioni Classic ASP 3
T errore asp (inserimento dati nel db) Classic ASP 1
G errore asp Classic ASP 3
metalgemini Errore ASP "Eccezione" Classic ASP 2
R Update Access Asp Errore Anche Su Demo Microsoft Classic ASP 2
L Modifica file upload in ASP Classic ASP 2
felino ASP.net MVC: Exception e chiamata AJAX ASP.NET 1
W Rinominare Documenti Con Form Asp Classic ASP 9
G Registrazione utente su pagina asp Classic ASP 13
R Sviluppatore ASP.NET Offerte e Richieste di Lavoro e/o Collaborazione 0
seranto [ASP] Controllare il testo inserito in Textarea Classic ASP 6
F classic asp popolare combo box javascript Presentati al Forum 1
P Passagio dati complessi tra una ASP.NET webapi e Angular ASP.NET 1
A [ASP.Net] Gestire il profilo ADMIN in un progetto ASP NET e pattern MVC ASP.NET 0
P [ASP.Net] Problema ERR_INCOMPLETE_CHUNKED_ENCODING 206 (Partial Content) con Font ASP.NET 4
A [ASP] Confronto tra dati Form e DB Classic ASP 2
A Mantenere la validazione reindirizzandoci su un secondo sito WEb. (ASP.NET) ASP.NET 0
StephenSoftware [ASP.Net] Pagina Master ed eventi... ASP.NET 0
K [ASP] Visualizzare nome del file selezionato Classic ASP 3
S [ASP] rubrica telefonica Classic ASP 2
M MySQL e classic ASP Classic ASP 5
D [ASP] Eliminare gli zeri che nn servono Classic ASP 1
G [ASP] Ciclare i valori di 2 array Classic ASP 2
S [RISOLTO] aggiorna tabella da select option asp classic Classic ASP 7
S elimina record sql asp classic Classic ASP 5
D [ASP] Autocomplete cerca su 2 campi del db Classic ASP 1
D [ASP] Leggere Campo decimal MYSQL Classic ASP 1
S [ASP] SALVARE VALORE SELECT OPTION SU CAMPO TABELLA ACCESS Classic ASP 9
NuviaSoftware [Retribuito] [Cerco] Programmatore ambienti ASP.NET,. Net Azure web apps, Javascript Offerte e Richieste di Lavoro e/o Collaborazione 0
D [ASP] scaricare articoli Classic ASP 8
D [ASP] Mysql insert e update Classic ASP 2
V [ASP.Net] avento keydown crh13 enter ASP.NET 0
A [ASP.Net] Dropdownlist ASP.NET 0
S [ASP.Net] [ASP] Upload Image ASP.NET 6
V Ricevere messaggi email certificata con CDO o altro oggetto in ASP Classic ASP 0
A [ASP] query wish list Classic ASP 3
riminese77 [ASP.Net] Popup Bootstrap in datagrid ASP.NET 0
D [ASP] si può fare? Classic ASP 29
D [ASP] ordinamento query Classic ASP 2
M [ASP] Upload file da form controllo Classic ASP 5
S SQL, ACCESS & ASP CLASSIC - QUERY Classic ASP 3
G [ASP] Incrementare un valore on the fly su selezione select Classic ASP 3

Discussioni simili