Ciao, scusate ma è da una mattinata che nn riesco a risolvere , ho provato a cercare sul forum ma nn ho trovato soluzione
IL mio problema è il seguente. Devo compilare attraverso un form un database, il problema è che alcuni campi sono numerici infatti la tabella è giocatore_statistiche (Giocatore [Numerico], Partita [Numerico], Punti [Numerico] ....) tutti numerici.
i form (1 per giocatore) hanno questo codice
codice:
<table width="100%" border="0" cellspacing="0" cellpadding="0"><tr>
<td></td><td align="center">PT</td><td align="center">MG</td>
<td align="center">AS</td><td align="center">RD</td><td align="center">RO</td>
<td align="center">PP</td><td align="center">PR</td><td align="center">FF</td>
<td align="center">FS</td><td align="center">2T</td><td align="center">2R</td>
<td align="center">3T</td><td align="center">3R</td><td align="center">LT</td>
<td align="center">LR</td><td align="center">ST</td></tr>
		<%

dim strCode2
strCode2="innovatel"
dim intVolta2
intVolta2="0"

Set Conn=Server.CreateObject("ADODB.Connection")
strConn="driver={Microsoft Access Driver (*.mdb)}; "
strConn=strConn & " DBQ=" & Server.MapPath("/mdb-database/partite.mdb")
strConn=strConn & ";pwd=" & strCode1
Conn.Open strConn
sql = "SELECT giocatore_base.ID, giocatore_base.Cognome, giocatore_base.Nome FROM giocatore_squadra, partita, giocatore_base WHERE giocatore_base.ID=giocatore_squadra.Giocatore And giocatore_squadra.Categoria=partita.categoria AND partita.ID=" &  strNPartita & " order by giocatore_base.Cognome"
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open sql, conn ,3,3
do while not(rs.eof)
%>	
<form name="form" method="post" action="valida.asp?Giocatore=<%=rs(0)%>?Partita=<%=strNPartita%>"> 
<tr><td><p style="margin-left: 15px; margin-right:10px"><%=rs(1)%><%=rs(2)%></td>
	<td align="center"><input type="text" name="Punti" size='2'></td>
	<td align="center"><input type="text" name="MG" size='2'></td>
	<td align="center"><input type="text" name="AT" size='2'></td>
	<td align="center"><input type="text" name="RD" size='2'></td>
	<td align="center"><input type="text" name="RO" size='2'></td>
	<td align="center"><input type="text" name="PP" size='2'></td>
	<td align="center"><input type="text" name="PR" size='2'></td>
	<td align="center"><input type="text" name="FF" size='2'></td>
	<td align="center"><input type="text" name="FS" size='2'></td>
	<td align="center"><input type="text" name="T2" size='2'></td>
	<td align="center"><input type="text" name="R2" size='2'></td>
	<td align="center"><input type="text" name="T3" size='2'></td>
	<td align="center"><input type="text" name="R3" size='2'></td>
	<td align="center"><input type="text" name="LT" size='2'></td>
	<td align="center"><input type="text" name="LR" size='2'></td>
	<td align="center"><input type="text" name="ST" size='2'></td>
	<td align="center"><font face="Verdana">
	<input type="submit" name="invia" value="Aggiorna" style="font-family: Verdana"></font></td>
	
	</tr>
<%
rs.movenext
loop
rs.Close
set rs = Nothing
conn.Close
set conn = Nothing
%></td>
</table>
Mentre la pagina che dovrebbe inviare i dati ha questo codice

codice:
<%
Dim ID
ID = Session("ID")
' Definizione della variabile
dim Giocatore
Giocatore = request("Giocatore")

dim Partita
Partita = request("strNPartita")

dim Punti
Punti = request.form("Punti")

dim MG
MG = request.form("MG")

dim AT
AT = request.form("AT")

dim RO
RO = request.form("RO")

dim RD
RD = request.form("RD")

dim PP
PP = request.form("PP")

dim PR
PR = request.form("PR")

dim FF
FF = request.form("FF")

dim FS
FS = request.form("FS")

dim T2
T2 = request.form("T2")

dim R2
R2 = request.form("R2")

dim T3
T3 = request.form("T3")

dim R3
R3 = request.form("R3")

dim LT
LT = request.form("LT")

dim LR
LR = request.form("LR")

dim ST
ST = request.form("ST")
%>
<html>

<body>
<%
dim strCode
strCode="innovatel"

' Mappaggio del database
Set Conn=Server.CreateObject("ADODB.Connection")
strConn="driver={Microsoft Access Driver (*.mdb)}; "
strConn=strConn & " DBQ=" & Server.MapPath("/mdb-database/partite.mdb")
strConn=strConn & ";pwd=" & strCode
Conn.Open strConn

' Stringa di interrogazione sulla tabella libri
sql = "SELECT * FROM giocatore_statistiche"

Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open sql, conn ,3,3

' Preparazione e scrittura nuovo record
rs.addnew
rs(0) = Giocatore
rs(1) = Partita
rs(2)= Punti
rs(3) = MG
rs(4) = AT
rs(5) = RD
rs(6) = RO
rs(7) = PP
rs(8) = PR
rs(9) = FF
rs(10) = FS
rs(11) = T2
rs(12) = R2
rs(13) = T3
rs(14) = R3
rs(15) = LT
rs(16) = LR
rs(17) = ST

rs.update

' Chiusura del database
rs.Close
set rs = Nothing
conn.Close
set conn = Nothing
Response.Redirect "tabellino.asp"
%>
</body>

</html>
L'errore è il seguente Provider error '80020005' Type mismatch.

Ho già provato il CINT ma senza risultati

Grazie a chi vorra rispondere