Array e Database

[blackbang]

Ho già scritto di questo argomento ma l'avevo presa nel modo sbagliato....

Spiegazione:
A fronte di una checkbox creata dinamicamente riesco a scrivere nella pagina successiva a video il risultato della selezione:
La prima pagina seleziona da una tabella delle squadre....

<%
sql = "Select * from Classifiche where Categoria=('"& Squadra &"') and Tipo=('"& Tipo &"') and Fase=('"& Fase &"')"
set rsa = server.createobject("ADODB.Recordset")
rsa.Open sql, cna   'sql for alpha
%>



List of all parents in database, those that are enabled are checked.
</p>
<form name=frmTest action="Target.asp" method=get>
<%
while not rsa.EOF
  %>
<input type=CHECKBOX name=t1 value="<%=rsa("Squadra")%>"><%=rsa("Squadra")%>

<%    rsa.MoveNext
wend
rsa.Close
set rsa.ActiveConnection = nothing
set rsa = nothing
%>
<input type=HIDDEN name=txtCount value="">


<input type=SUBMIT value="Select"></p>
</form>

La pagina di arrivo me le mostra a video facendo un split....

<%Dim mode,mode_a,i
mode=Request("t1")

mode_a=split(mode,",") 
For i=LBound(mode_a) to UBound(mode_a)
Response.Write mode_a(i) + "
"
Next 
%>

e fin qui tutto ok....dopodichè mi sono andato a vedere un pò di gestioni di array mi sono incartato.
In un altra tabella ho gli incontri che queste squadre devono fare e vorrei scrivere a video solo l'incontro delle squadre selezionate nel checkbox...qualcuno mi può aiutare?

grazie

[Santino83_02]

non capisco, se le sai stampare a video scorrendoti l'array che genera lo split, dov'è il problema?

[blackbang]

grazie per la risposta! in effetti mi si stà accalorando il cervello nel senso che:

Sò stamparle a video d'accordo ma in realtà i dati ricevuti dai checkbox vorrei inserirli in una query che analizza un db dove ci sono gli incontri di un campionato, in particolare:

Seleziono: Squadra1 e Squadra2

con questi due dati vorrei visualizzare l'incontro che riguarda queste due squadre filtrandolo da un database dove ci sono tutti gli incontri.

ovvero: (andata) Squadra1 contro Squadra2 e (ritorno) Squadra2 contro Squadra1

Probabilmente faccio confusione e magari la soluzione è lì a due passi e non la vedo....ma stò cercando di capire...

Aggiungo il ragionamento mentale che faccio:

seleziono due squadre dalla lista dei checkbox
le due o più squadre selezionate si incontrano in un campionato (andata e ritorno)

Qui viene il casotto...

in un altro database ho TUTTI gli incontri del campionato che quindi comprendono anche tutte le altre squadre (e non solo quelle selezionate nel checkbox) gli incontri hanno diversi dati (data, ora, luogo) ma soprattutto i campi SquadraA e SquadraB che formano in un girone tutti gli incontri possibili...
Vorrei creare un ciclo per cui le due o più squadre selezionate vengano ricercate nel database (campi SquadraA e SquadraB) e se il dato si avvera vengano stampate a video insieme a tutti gli altri dati...
Se fosse una semplice query sarebbe:
Select SquadraA, SquadraB from DATABASE where SquadraA='Squadra1' and SquadraB='Squadra2' order by.....

ma ovviamente non si può fare perchè io ho la necessità di ciclare le squadre in modo dinamico ovvero trovare gli incontri sia di andata che di ritorno...

puff...spero che mi date una manuccia...grazie

[Roby_72]

Se selezioni solo due squadre è abbastanza semplice.
Usi quelle due per formare la query

... WHERE sq_casa = '"& sq1 &"' AND sq_fuori = '"& sq2 &"'
... WHERE sq_casa = '"& sq2 &"' AND sq_fuori = '"& sq1 &"'

Se le squadre che selezioni sono di più allora è più complesso.

Roby

[blackbang]

ecco...appunto, leggi sopra....eheheh

potrebbe essere una cosa del genere? (chiedo perchè mi pare di "percepire" solo "percepire" che ci potrebbe essere una analogia)

selectSQL = "SELECT * FROM PeopleDatabase WHERE namesField IN("

' add each name to the IN clause
For i = 0 To UBound(thisArray) - 1
selectSQL = selectSQL & "'" & thisArray(i) & "', "
Next
' grab last element in the array
selectSQL = selectSQL & "'" & thisArray(UBound(thisArray)) & "')"

'Response.Write(selectSQL)

Set RecSet = conn.Execute (selectSQL)

If NOT RecSet.EOF THEN
DO UNTIL RecSet.EOF

response.write RecSet("email") & "
" ''' **** Shouldn't this write for each item in the array? *****
RecSet.MoveNext

Loop
End If

ovviamente è un pezzettino preso in giro....

[blackbang]

ciao a tutti...stò continuando a provare e riprovare e sono arrivato a questo:

Sql = "SELECT [Risultato A], [Risultato B], [Squadra A], [Squadra B], Data FROM GeneraleOpen where [Squadra A] IN("
For i=0 to UBound(mode_a) -1
sql= sql & "'" & LTrim(mode_a(i)) & "',"
Next
sql= sql & "'" & LTrim(mode_a(Ubound(mode_a))) &"')"
sql= sql & " and [Squadra B] IN("
For j=0 to UBound(mode_a) -1
sql= sql & "'" & LTrim(mode_a(j)) & "',"
Next
sql= sql & "'" & LTrim(mode_a(Ubound(mode_a))) &"')"
set rsa = server.createobject("ADODB.Recordset")
rsa.Open sql, cna   'sql for alpha
arrVisualizza = rsa.GetRows
rsa.Close
Set rsa = Nothing

Totale_Record = UBound(arrVisualizza, 2)
For I = 0 To Totale_Record

RisA = arrVisualizza(0,I)
RisB = arrVisualizza(1,I)
SquadraA = arrVisualizza(2,I)
SquadraB = arrVisualizza(3,I)
Response.Write "" & SquadraA  & " - " & SquadraB  & " : " & RisA  & "-" & RisB  & "
"

Next

che in pratica a fronte di una selezione da checkbox mi seleziona gli incontri e i punteggi relativi alla selezione effettuata....
Ora però mi sono incagliato ancora, cioè il mio problema è stilare la classifica prendendo in esame solo gli incontri selezionati:

La struttura praticamente sarebbe per esempio:

SquadraA - SquadraB: 10-20
SquadraB - SquadraA: 30-5

come faccio a sommare il totale punti della squadraB ????

Ringraziandovi per l'aiuto attendo trepidante....

[blackbang]

chi sà parli!....eheheh no dai mi servirebbe uno spunto...(non uno sputo, please) grazie

[blackbang]

ehm...qualche buon'anima?

[Santino83_02]

premetto che odio i msg privati


cmq non ho capito nè cosa vuoi fare nè dove sia il problema.. allora:

tu hai una lista di squadre in una pagina, e ne cecchi, che so, 4?

quindi avrai una varibiale in post del tipo:

squadre = "squadra1,squadra5,squadra14,squadra17"

e mo che ci vuoi fare co ste squadre? vuoi vedere tutte le partite che giocheranno?

esempio: mettiamo che per ogni squadra ceccata vuoi vedere che partite giocherà nel campionato:

arrSquadre = split(squadre,",")

for each squadra in arrSquadre


sql = "select * from GeneraleOpen where SquadraA='" & squadra & "' or SquadraB='" & squadra & "'"

set rs = CONNESSIONE.execute(sql)
response.write("<h3>partite di " & squadra & "</h3>")
while not rs.eof
response.write "partita giocata/dagiocare"
rs.movenext
wend

set rs= nothing
wend

di piu non ho capito

[Roby_72]

Si vede che non sei uno sportivo santino...
Deve calcolare la classifica avulsa, quindi non gli servono tutte le partite ma solo quelle tra di loro

Roby