seleziona campi multipli da lista

[Starky]

Sto cercando di fare la stessa cosa descritta in questo 3D.

Il mio problema è che non capisco come adattarlo alla mia situazione.

Ho scritto esattamente questo codice nella mia pagina:

<%

com_id = Request.QueryString("com_id")
data_corrente = Inverti(data_corrente)

rs_livelli_sql = "SELECT * FROM LIVELLI" 
set rs_livelli = oConn.Execute(rs_livelli_sql)

rs_com_sql = "SELECT * FROM COMUNICAZIONI WHERE COM_ID=" & com_id
set rs_com = oConn.Execute(rs_com_sql)

tip_ut = rs_com("COM_TIPOLOGIA_UTENTE")

arrayiddoc=split(tip_ut,",",-1,1) 
%>


<%
do until rs_livello.eof 
%> 
<option value="<%=rs_livello("livello")%>"<%
For Each idvari in arrayiddoc 
if (CLng(idvari) = rs_livello("livello")) then
%> selected<% 
end if
Next
%>><%=rs_livello("descrizione")%></option>
<%rs_livello.movenext 
loop 
%>

QUello che non capisco è: cosa devo mettere al posto di idvari?

[Starky]

Sarò rinco .... ma funziona! Ovvero ... non capisco come ma funziona!
Non so ancora cosa sia idvari e dove venga definito e se qualcuno mi volesse dare una spiegazione gliene sarei grato

[Starky]

Ora ho un altro problema ...
Ovvero: Devo fare in modo di visualizzare tutti gli utenti che hanno la possibilità di leggere una determinata comunicazione:

Ho
1. tabella LIVELLI in cui sono scritti il livello (es 1,2,3 etc) e la descrizione (SuperAdmin, Admin etc)

2. la tabella COMUNICAZIONI in cui c'è il campo "livello" in cui scrivo i livelli degli utenti in questo formato 1,2,3 etc.

Per poter visualizzare tali livelli e la relativa descrizione ho pensato di utilizzare lo stesso metodo con l'array ... come sopra solo che non funge. Non mi da errore ... ma canna completamente a scrivere!

Ecco il codice:

<%
' Seleziono solo le comunicazioni non scadute
rs_com_sql = "SELECT * FROM COMUNICAZIONI WHERE COM_DATA_FINE<=#" & data_corrente &"#"
set rs_com = oConn.Execute(rs_com_sql)
tip_ut = rs_com("COM_TIPOLOGIA_UTENTE")
arrayiddoc=split(tip_ut,",",-1,1) 
%>


<%Do while not rs_com.EOF%>
<%
rs_livello_sql = "SELECT * FROM LIVELLI"
set rs_livello = oConn.Execute(rs_livello_sql)
%>
<tr>
<td class="grigino" align="center"><%=rs_com("COM_DATA_INIZIO")
%>
</td>
<td class="grigino" align="center">
<%=rs_com("COM_DATA_FINE")%>
</td>
<td class="contenuti"><%=rs_com("COM_TITOLO")%></td>
<td class="contenuti"><%do until rs_livello.eof %>
<%
For Each idvari in arrayiddoc 
if (CLng(idvari) = rs_livello("LIVELLO")) then
Response.Write(rs_livello("DESCRIZIONE"))
end if
Next
%>
<%rs_livello.movenext 
loop 								%>
</td>
<td align="center" class="contenuti">
<a href="delete_com.asp?com_id=<%=rs_com("COM_ID")%>">
[img]<%=path_admin%>/images/cancella.gif[/img]
</a>
</td>
</tr>
<%rs_com.MoveNext
loop%>

Cosa sbaglio?

[Starky]

UP

[eiyen]

ho letto tutto mooOOOOlto velocemente, quindi non ho controllato tutto... a occhio e croce devi spostare un pezzo di codice:

 
<%
' Seleziono solo le comunicazioni non scadute
rs_com_sql = "SELECT * FROM COMUNICAZIONI WHERE COM_DATA_FINE<=#" & data_corrente &"#"
set rs_com = oConn.Execute(rs_com_sql)
tip_ut = rs_com("COM_TIPOLOGIA_UTENTE")
arrayiddoc=split(tip_ut,",",-1,1)   
%>


<%Do while not rs_com.EOF%>
<%
rs_livello_sql = "SELECT * FROM LIVELLI"
set rs_livello = oConn.Execute(rs_livello_sql)
%>
<tr>
<td class="grigino" align="center"><%=rs_com("COM_DATA_INIZIO")
%>
</td>
<td class="grigino" align="center">
<%=rs_com("COM_DATA_FINE")%>
</td>
<td class="contenuti"><%=rs_com("COM_TITOLO")%></td>
<td class="contenuti"><%do until rs_livello.eof %>
<%
tip_ut = rs_com("COM_TIPOLOGIA_UTENTE")
arrayiddoc=split(tip_ut,",",-1,1)
For Each idvari in arrayiddoc 
if (CLng(idvari) = rs_livello("LIVELLO")) then
Response.Write(rs_livello("DESCRIZIONE"))
end if
Next
%>
<%rs_livello.movenext 
loop 								%>
</td>
<td align="center" class="contenuti">
<a href="delete_com.asp?com_id=<%=rs_com("COM_ID")%>">
[img]<%=path_admin%>/images/cancella.gif[/img]
</a>
</td>
</tr>
<%rs_com.MoveNext
loop%>

[Starky]

lo provo subito

Grazie nè

[Starky]

SEI UN GRANDEEEE!!!

[eiyen]