Salva a tutti, ho um grave problema che non riesco a risolvere:
Ho questo form:
codice:
<form name="Myform"action="admin_save_voti.asp" method="post" onSubmit="return Convalida();">
<h2 align="center">Seleziona dall'elenco gli 11
giocatori che hanno preso il voto</h2><div>
<div class='leftcol'> <font size="2" face="Tahoma">
<font color="#003366">Giocatori Titolari</font>
<%
While ((Repeat1__numRows <> 0) AND (NOT formazioni.EOF))
%>
<%
dim conta
conta=conta+1
%>
<%
var=(formazioni.Fields.Item("giocatori").Value)
set conn = server.createObject("ADODB.Connection")
conn.Open MM_fantacalcio_STRING
sql = "select * from lista_iniziale where codice='"&var&"'"
set rs = conn.execute(sql)
stringa = rs("nome")
giocatore = TagliaStringa(stringa,15)
%>
<%
sql1 = "select * from dati where giornata="&campionato&" and codice="&var&" and minsup25=1"
set rs1 = conn.execute(sql1)
if rs1.eof=true then
voto="Non ha Giocato!"
punto= 0
codice=var
else
punto=rs1("votofc")
voto="voto: "&rs1("votofc")
codice=rs1("codice")
end if
%>
<label>
<input name="punteggio" type="checkbox" id='<%="game"&conta%>' value="<%=Replace(punto,",",".")%>" onClick="ctr(this),UpdateCost();">
<input name="<%="calciatore"&conta%>" type="hidden" value="<%=codice%>"><%if(formazioni.Fields.Item("ruolo").Value)="0" then%>
[img]images/portiere.png[/img]
<%else if(formazioni.Fields.Item("ruolo").Value)="1" then%>
[img]images/difensore.png[/img]
<%else if(formazioni.Fields.Item("ruolo").Value)="2" then%>
[img]images/centrocampista.png[/img]
<%else if(formazioni.Fields.Item("ruolo").Value)="3" then%>
[img]images/attaccante.png[/img]
<%
end if
end if
end if
end if%>
<%=giocatore%><font color="#003366" size="1" face="Tahoma">
(<%=voto%>)</font> </label>
<%
Repeat1__index=Repeat1__index+1
Repeat1__numRows=Repeat1__numRows-1
formazioni.MoveNext()
Wend
%>
</font></div>
<div class='rightcol'> <font size="2" face="Tahoma">
<font size="2" face="Tahoma"> <font color="#003366">Giocatori
in Panchina</font>
<%
While ((Repeat2__numRows <> 0) AND (NOT panchina.EOF))
%>
<%
conta=conta+1
%>
<%
var=(panchina.Fields.Item("giocatori").Value)
set conn = server.createObject("ADODB.Connection")
conn.Open MM_fantacalcio_STRING
sql = "select * from lista_iniziale where codice='"&var&"'"
set rs = conn.execute(sql)
stringa = rs("nome")
giocatore = TagliaStringa(stringa,15)
sql1 = "select * from dati where giornata="&campionato&" and codice="&var&" and minsup25=1"
set rs1 = conn.execute(sql1)
if rs1.eof=true then
voto="Non ha Giocato!"
punto= 0
codice=var
else
punto=rs1("votofc")
voto="voto: "&rs1("votofc")
codice=rs1("codice")
end if
%>
<label>
<input name="punteggio" type="checkbox" id="<%="game"&conta%>" value="<%=Replace(punto,",",".")%>" onClick="ctr(this),UpdateCost();">
<input name="<%="calciatore"&conta%>" type="hidden" value="<%=codice%>"><%if(panchina.Fields.Item("ruolo").Value)="0" then%>
[img]images/portiere.png[/img]
<%else if(panchina.Fields.Item("ruolo").Value)="1" then%>
[img]images/difensore.png[/img]
<%else if(panchina.Fields.Item("ruolo").Value)="2" then%>
[img]images/centrocampista.png[/img]
<%else if(panchina.Fields.Item("ruolo").Value)="3" then%>
[img]images/attaccante.png[/img]
<%
end if
end if
end if
end if%>
<%=giocatore%><font color="#003366" size="1" face="Tahoma">
(<%=voto%>)</font></label>
<%
Repeat2__index=Repeat2__index+1
Repeat2__numRows=Repeat2__numRows-1
panchina.MoveNext()
Wend
%>
</font></div>
<div>
<label>Punteggio Totale:
<input name="totalecost" id="totalcost" type="text" size="2" disabled>
</label>
</div>
<font size="2" face="Tahoma">
<h2>Prima di salvare devi accettare di aver controllato
tutti i dati</h2>
<div>
<label>
<input type="radio" name='accetto' value="<%=punto%>">
<font size="2" face="Tahoma">Accetto</font></label>
<input name="giornata" type="hidden" id="giornata" value="<%=(presidente.Fields.Item("GIORNATA").Value)%>">
<input name="user" type="hidden" id="user" value="<%=(presidente.Fields.Item("PRESIDENTE").Value)%>">
<input name="formazione" type="hidden" id="formazione" value="<%=(presidente.Fields.Item("id_formazione").Value)%>">
<input name="mensile" type="hidden" id="mensile" value="<%=(presidente.Fields.Item("mese").Value)%>">
</div>
<div class="buttons">
<button type="submit" class="regular" name="abilita">
<div align="center"><font size="1">[img]images/save.png[/img]
Salva questo risultato</font> </div>
</button>
</div>
</font>
</form>
Tale form mi genera 22 checkbox di nome
unteggio e per ogni checkbox c'è un campo nascosto di nome giocatore con una variabile contatore, nel mio caso:
punteggio - giocatore1
punteggio - giocatore2
..............................
punteggio - giocatore22
Questi dati vengono inviati ad una pagina che dovrebbe aggiornare i dati nel database, io ho fatto così come segue, ma il risultato è disastroso:
codice:
<%
campionato= Request.Form("giornata")
user= Request.Form("user")
formazione=request.Form("formazione")
totale=request.Form("totalcost")
mensile=Request.Form("mensile")
dim squadra
set squadra = Request.Form("punteggio")
dim giocatore(21)
giocatore(0)=request.Form("calciatore1")
giocatore(1)=request.Form("calciatore2")
giocatore(2)=request.Form("calciatore3")
giocatore(3)=request.Form("calciatore4")
giocatore(4)=request.Form("calciatore5")
giocatore(5)=request.Form("calciatore6")
giocatore(6)=request.Form("calciatore7")
giocatore(7)=request.Form("calciatore8")
giocatore(8)=request.Form("calciatore9")
giocatore(9)=request.Form("calciatore10")
giocatore(10)=request.Form("calciatore11")
giocatore(11)=request.Form("calciatore12")
giocatore(12)=request.Form("calciatore13")
giocatore(13)=request.Form("calciatore14")
giocatore(14)=request.Form("calciatore15")
giocatore(15)=request.Form("calciatore16")
giocatore(16)=request.Form("calciatore17")
giocatore(17)=request.Form("calciatore18")
giocatore(18)=request.Form("calciatore19")
giocatore(19)=request.Form("calciatore20")
giocatore(20)=request.Form("calciatore21")
giocatore(21)=request.Form("calciatore22")
for i=1 to giocatore.count
punteggio= squadra(i)
numero= giocatore(i)
set calciatori = Server.CreateObject("ADODB.Command")
calciatori.ActiveConnection = MM_fantacalcio_STRING
calciatori.CommandText = "UPDATE formazioni_publicate SET voto='"&punteggio&"' WHERE id_formazione='"&formazione&"' and giocatori='"&numero&"'"
calciatori.CommandType = 1
calciatori.CommandTimeout = 0
calciatori.Prepared = true
calciatori.Execute()
next'i
%>
Risposta del browser:
Necessario Oggetto
Qualcuno può aiutarmi? Grazia anticipatamente
Rispondi quotando