Problemi su un call di una sub...............

[Roby_72]

Ma questa

call elencoGiocatori(obconn,elencoGiocatoriOu
tput)


la scrivi tutta su una riga???? :master:

Roby

[diegoctn]

Fatto. La prima parte fatta!! Ragazzi se passate da Milano avete una bella birra pagata. Grazie mille.

[diegoctn]

Ragazzi mi viene da sclerare......l'ultimo scoglio....

sub aggiornaReti(objConn,media, conta)
	strSQL = "UPDATE segreterie SET media = "& myReti &" WHERE conta=" & myID
	objConn.Execute(strSQL)
end sub

Errore di sintassi nell'istruzione UPDATE.

Se la stampo a video:

UPDATE segreterie SET media = 0 WHERE conta=1

è perfetta.

[longline]

UPDATE segreterie SET (media = 0) WHERE conta=1

Sei sicuro dei nomi e dei tipi dei campi "media" e "conta"?

[Roby_72]

Tra l'altro alla sub non passi la variabile myreti ma conta

Roby

[diegoctn]

Ragazzi più che una birra, una cena:
Pagina Funzionante default.asp

<form method="post" action="edit.asp">
				<table...
......			</tr>
					<%for vx = 0 to UBound(elencoGiocatoriOutput)
						Response.Write ("<input type=""hidden"" name=""giocatore_id"& CStr(vx) &""" value="""& elencoGiocatoriOutput(vx,0) &""" />")%>
						<tr> 
							<td style="width:120px;height:25px;vertical:align:top;font-family:verdana;font-size:12 px;"><%=elencoGiocatoriOutput(vx,1)%></td>
							<td style="width:120px;height:25px;vertical:align:top;font-family:verdana;font-size:12 px;"><%=elencoGiocatoriOutput(vx,2)%></td>
							<td style="height:25px;vertical:align:top;font-family:verdana;font-size:12 px;">
								<input type="text" name="giocatore_reti<%=CStr(vx)%>" value="<%=elencoGiocatoriOutput(vx,3)%>" size="3" style="text-align:right;font-family:verdana;font-size:12 px;" />
							</td>
						</tr>
					<%next
					Response.Write ("<input type=""hidden"" name=""tot_giocatori"" value="""& vx-1 &""" />")%>
					<tr>
						<td colspan="2"><input type="submit" name="submit" value="Modifica" /></td>
					</tr>
				</table>
				</form>
			<%else%>
				Non ci sono giocatori
			<%end if%>
		</td>

Pagina Funzionante edit.asp

<%
call dbConnect(conn,dbConnString)
tot_giocatori = Request.Form("tot_giocatori")
For i = 0 to tot_giocatori
	myVar = "giocatore_id"& CStr(i)
	myID = Request.Form(myVar)
	myVar2 = "giocatore_reti"& CStr(i)
	myReti = Request.Form(myVar2)
	call aggiornaReti(conn,giocatore_id,giocatore_reti)
Next

call dbDisconnect(conn)
%>

Pagina Funzionante common.asp

'Modifica reti giocatore
'INPUT: connessione, informazioni dei giocatori provenienti dal modulo di modifica
'OUTPUT: //
sub aggiornaReti(objConn,giocatore_id,giocatore_reti)
	strSQL = "UPDATE tGiocatori SET giocatore_reti = "& myReti &" WHERE giocatore_id=" & myID
	objConn.Execute(strSQL)
end sub

Pagina modificata defaultmia.asp

<form method="post" action="editromeo.asp">
				<table border="1" cellspacing="3" cellpadding="0">
					<tr>
						<td style="height:25px;font-family:verdana;font-size:12 px;">Cognome</td>
						
						<td style="height:25px;font-family:verdana;font-size:12 px;">Reti</td>
					</tr>
					<%for vx = 0 to UBound(elencoGiocatoriOutput)
						Response.Write ("<input type=""hidden"" name=""contator"& CStr(vx) &""" value="""& elencoGiocatoriOutput(vx,0) &""" />")%>
						<tr> 
							<td style="width:120px;height:25px;vertical:align:top;font-family:verdana;font-size:12 px;"><%=elencoGiocatoriOutput(vx,1)%></td>
							
							<td style="height:25px;vertical:align:top;font-family:verdana;font-size:12 px;">
								<input type="text" name="giocatore_reti<%=CStr(vx)%>" value="<%=elencoGiocatoriOutput(vx,3)%>" size="3" style="text-align:right;font-family:verdana;font-size:12 px;" />
							</td>
						</tr>
					<%next
					Response.Write ("<input type=""hidden"" name=""tot_giocatori"" value="""& vx-1 &""" />")%>
					<tr>
						<td colspan="2"><input type="submit" name="submit" value="Modifica" /></td>
					</tr>
				</table>
				</form>
			<%else%>
				Non ci sono giocatori
			<%end if%>
		</td>

Pagina non funzionante editmia.asp

<%
call dbConnect(conn,dbConnString)
tot_giocatori = Request.Form("tot_giocatori")
For i = 0 to tot_giocatori
	myVar = "contator"& CStr(i)
	myID = Request.Form(myVar)
	myVar2 = "giocatore_reti"& CStr(i)
	myReti = Request.Form(myVar2)
	call aggiornaReti(conn,conta,media)
Next

call dbDisconnect(conn)
%>
<p style="font-family:verdana;font-size:12 px;">Modifiche effettuate: home</p>

Pagina modificata commonmia.asp

'Modifica reti giocatore
'INPUT: connessione, informazioni dei giocatori provenienti dal modulo di modifica
'OUTPUT: //
sub aggiornaReti(objConn,contator,giocatore_reti)
	strSQL = "UPDATE segreterie SET media = "& myReti &" WHERE conta=" & myID
	objConn.Execute(strSQL)
end sub

[Roby_72]

Ma i nomi delle variabili che usi come parametri della sub li metti a caso? :master:

Roby

[diegoctn]

Sono i nomi della form, contator e giocatore_reti

il Post Data:
contator0=1&giocatore_reti0=1000&contator1=2&gioca tore_reti1=100&contator2=3&giocatore_reti2=0%2C75& contator3=4&giocatore_reti3=10&contator4=5&giocato re_reti4=0%2C5&contator5=6&giocatore_reti5=9%2C25& . . .
Li vede regolarmente
la sql è corretta
non so che errore faccio, proprio non lo so.....

[Roby_72]

Ma l'errore quale sarebbe?
In che riga?

Roby

[diegoctn]

Tipo di errore:
Microsoft JET Database Engine (0x80040E14)
Errore di sintassi nell'istruzione UPDATE.
/galli/commonromeo.asp, line 33


sub aggiornaReti(objConn,contator,giocatore_reti)
strSQL = "UPDATE segreterie SET media = "& myReti &" WHERE conta=" & myID
objConn.Execute(strSQL)