Primo campo select vuoto

**cybotron** · 19-12-2005, 15:38

Ciao a tutti, premetto che non conosco asp, ma ho un problema:

su una pagina web ho una form di ricerca con dei campi select, questi sono popolati leggendo dati da un db, e funziona tutto. Ora però quando visualizzo la pagina, le combo sono subito popolate, e quindi è subito visibile la prima scelta. Io vorrei invece che quando lancio la pagina, le combo abbiano il primo campo vuoto.
Posto il codice se qualcuno può aiutarmi!

Grazie mille.

<select id="select3" name="select3"><%rs.Open "SELECT DISTINCT Content_owner FROM DBTP ORDER BY Content_owner",Conn do while not rs.EOF%>
<OPTION value="<%=rs.Fields("Content_owner")%>" selected <% if rs.Fields("Content_owner")=request.QueryString("co ") then response.write("Selected")%> ><%=rs.Fields("Content_owner")%></OPTION>
<%rs.MoveNext loop rs.close%>
</SELECT>

**albis** · 19-12-2005, 16:03

<select id="select3" name="select3">
<OPTION value="" selected >Seleziona un valore</OPTION>

<%rs.Open "SELECT DISTINCT Content_owner FROM DBTP ORDER BY Content_owner",Conn do while not rs.EOF%>
<OPTION value="<%=rs.Fields("Content_owner")%>" <% if rs.Fields("Content_owner")=request.QueryString("co ") then response.write("Selected")%> ><%=rs.Fields("Content_owner")%></OPTION>
<%rs.MoveNext loop rs.close%>
</SELECT>

**Mems** · 19-12-2005, 16:05

codice:

<select id="select3" name="select3">
<option value="">SELEZIONA</option>
<%
rs.Open "SELECT DISTINCT Content_owner FROM DBTP ORDER BY Content_owner",Conn 
do while not rs.EOF
%> 
<OPTION value="<%=rs.Fields("Content_owner")%>"<% if rs.Fields("Content_owner")=request.QueryString("co") then %> selected="selected"<% end if %>><%=rs.Fields("Content_owner")%></OPTION> 
<%
rs.MoveNext 
loop 
rs.close
%> 
</SELECT>

**cybotron** · 19-12-2005, 16:21

era una cosa talmente stupida, grazie a tutti!

**cybotron** · 19-12-2005, 16:24

scusate di nuovo, non credo serva aprire un nuovo topic:
se il risultato di quella select è nulla, ovvero non ci sono record corrispondenti, vorrei far apparire un'alert che mi dica "Nessun record trovato", come posso fare?

**Mems** · 19-12-2005, 16:28

codice:

<select id="select3" name="select3">
<option value="">SELEZIONA</option>
<%
displayAlert = false
rs.Open "SELECT DISTINCT Content_owner FROM DBTP ORDER BY Content_owner",Conn 
if not rs.EOF then
do while not rs.EOF
%> 
<OPTION value="<%=rs.Fields("Content_owner")%>"<% if rs.Fields("Content_owner")=request.QueryString("co") then %> selected="selected"<% end if %>><%=rs.Fields("Content_owner")%></OPTION> 
<%
rs.MoveNext 
loop 
else
displayAlert = true
end if
rs.close
%> 
</SELECT>
<% if displayAlert then %>
<script>
alert('Non ci sono dati corrispondenti');
</script>
<% end if %>

**cybotron** · 19-12-2005, 16:35

ciao mems, grazie 1000 per il supporto, ho provato ma non và, non mi visualizza la pagina e mi dà quest'errore:

Error Type:
Microsoft VBScript runtime (0x800A01F4)
Variable is undefined: 'displayAlert'
/Pg_TouchPoints/ToyotaTouchPoints_Select.asp, line 209

**Mems** · 19-12-2005, 16:42

codice:

<select id="select3" name="select3">
<option value="">SELEZIONA</option>
<%
dim displayAlert
displayAlert = false
rs.Open "SELECT DISTINCT Content_owner FROM DBTP ORDER BY Content_owner", Conn 
if not rs.EOF then
do while not rs.EOF
%> 
<OPTION value="<%=rs.Fields("Content_owner")%>"<% if rs.Fields("Content_owner")=request.QueryString("co") then %> selected="selected"<% end if %>><%=rs.Fields("Content_owner")%></OPTION> 
<%
rs.MoveNext 
loop 
else
displayAlert = true
end if
rs.close
%> 
</SELECT>
<% if displayAlert then %>
<script>
alert('Non ci sono dati corrispondenti');
</script>
<% end if %>

**cybotron** · 19-12-2005, 16:57

...ora non dà errori ma neanche funziona, ma forse il problema è che ci sono altri fattori da considerare, posto il codice della pagina intera, praticamente ci sono diversi tipi di ricerca, alcuni incrociati. Non vorrei disturbare troppo, magari dateci solo un occhiata per consigliarmi. (Ho evitato le parti che credo non servano)

Grazie!

---------------------------- CODICE -------------------------

<div style="position:absolute; left:303px; top:131px; z-index:2; width: 552px; height: 268px;">
<table width="100%" border="0" cellpadding="0" cellspacing="0">
<tr>
<td width="32%" align="center"> <div align="left">
<h4 align="right">Parola Chiave </h4>
</div></td>
<td width="0%" colspan="-2" align="center"></td>
<td width="30%" align="center" valign="top"> <div align="left">
<input type="text" name="contact" id="contact" >
</div></td>
<td width="38%" align="center" valign="top"> <div align="left">[img]../NewToyotaImages/New%20Images/ImmaginiDefinitive/SearchAll.gif[/img]
</div></td>
</tr>
<tr>
<td align="center"><div align="left"></div>
<div align="left"></div>
<div align="left"></div></td>
<td align="center"></td>
<td align="center"></td>
<td align="center"></td>
</tr>
<tr>
<td align="center"><div align="right">
<h3>OPPURE</h3>
</div></td>
<td align="center"></td>
<td align="center"></td>
<td align="center"></td>
</tr>
<tr>
<td align="center" valign="top"> <div align="right">
<h4>Content Owner

<font color="#FFFFFF" size="1">Responsabile del contenuto</font></h4>
</div></td>
<td colspan="-2" align="center"></td>
<td align="center" valign="top"> <div align="left">
<select id="select4" name="select3">
<option> </option>
<%

rs.Open "SELECT DISTINCT Content_owner FROM DBTP ORDER BY Content_owner",Conn
do while not rs.EOF%>
<option value="<%=rs.Fields("Content_owner")%>"><%=rs.Fiel ds("Content_owner")%></option>
<%rs.MoveNext
loop

rs.close
%>
</select>
</div></td>
<td align="center"></td>
</tr>
<tr>
<td align="center"><div align="left"></div></td>
<td colspan="-2" align="center"></td>
<td align="center"></td>
<td align="center">
</td>
</tr>
<tr>
<td align="center"> <div align="right">
<h4>Action Owner

<font size="1">Responsabile del Contatto</font></h4>
</div></td>
<td colspan="-2" rowspan="2" align="center"></td>
<td align="center" valign="top"> <div align="left">
<select id="select2" name="select2">
<option> </option>
<%
rs.Open "SELECT DISTINCT Action_owner FROM DBTP ORDER BY Action_owner",Conn

do while not rs.EOF%>

<OPTION value="<%=rs.Fields("Action_owner")%>"><%=rs.Field s("Action_owner")%></OPTION>
<%rs.MoveNext
loop

rs.close

%></select>
</div></td>
<td align="center"></td>
</tr>
<tr>
<td align="center"></td>
<td align="center" valign="top"><div align="left">[img]../NewToyotaImages/New%20Images/ImmaginiDefinitive/avvia.gif[/img]</div></td>
<td align="center"></td>
</tr>
<tr>
<td align="center"><div align="right">
<h3>OPPURE</h3>
</div></td>
<td colspan="-2" rowspan="4" align="center"></td>
<td align="center"></td>
<td align="center"></td>
</tr>
<tr>
<td align="center"><div align="right">
<h4>Short code

<font size="1">Codice Breve</font></h4>
</div></td>
<td align="center" valign="top"> <div align="left">
<select id="select5" name="shortcode">
<option> </option>
<%
rs.Open Sql,Conn

do while not rs.EOF%>
<option value="<%=rs.Fields("SHORT_CODE")%>" <% if rs.Fields("SHORT_CODE")=request.QueryString("so") then response.write("Selected")%>><%=rs.Fields("SHORT_C ODE")%></option>
<%rs.MoveNext
loop

rs.close
%>
</select>

</div></td>
<td align="center"></td>
</tr>
<tr>
<td align="center"></td>
<td align="center"><div align="left">[img]../NewToyotaImages/New%20Images/ImmaginiDefinitive/avvia.gif[/img]</div></td>
<td align="center"></td>
</tr>
<tr>
<td align="center"></td>
<td align="center"><div align="left"></div></td>
<td align="center"></td>
</tr>
<tr>
<td colspan="4" align="center"><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="176"></td>
<td width="10"><INPUT type="hidden" id="Fase" name="Fase"></td>
<td width="371"><INPUT type="hidden" id="selection" name="selection" value="PROCESS"></td>
</tr>
</table></td>
</tr>
</table>
</div>

**cybotron** · 19-12-2005, 17:02

...ho visto solo ora la storia del CODE: rimando lo script...

codice:

<div style="position:absolute; left:303px; top:131px; z-index:2; width: 552px; height: 268px;"> 
          <table width="100%" border="0" cellpadding="0" cellspacing="0">
            <tr> 
              <td width="32%" align="center"> <div align="left"> 
                  <h4 align="right">Parola Chiave </h4>
                </div></td>
              <td width="0%" colspan="-2" align="center"></td>
              <td width="30%" align="center" valign="top"> <div align="left"> 
                        <input type="text" name="contact" id="contact" >
                             </div></td>
              <td width="38%" align="center" valign="top"> <div align="left">[img]../NewToyotaImages/New%20Images/ImmaginiDefinitive/SearchAll.gif[/img] 
                </div></td>
            </tr>
            <tr> 
              <td align="center"><div align="left"></div>
                <div align="left"></div>
                <div align="left"></div></td>
              <td align="center"></td>
              <td align="center"></td>
              <td align="center"></td>
            </tr>
            <tr> 
              <td align="center"><div align="right"> 
                  <h3>OPPURE</h3>
                </div></td>
              <td align="center"></td>
              <td align="center"></td>
              <td align="center"></td>
            </tr>
            <tr> 
              <td align="center" valign="top"> <div align="right"> 
                  <h4>Content Owner

                    <font color="#FFFFFF" size="1">Responsabile del contenuto</font></h4>
                </div></td>
              <td colspan="-2" align="center"></td>
              <td align="center" valign="top"> <div align="left"> 
                  		<select id="select4" name="select3">
 <option> </option>
   <%

	
	rs.Open "SELECT DISTINCT Content_owner FROM DBTP ORDER BY Content_owner",Conn 
					do while not rs.EOF%>
                    <option value="<%=rs.Fields("Content_owner")%>"><%=rs.Fields("Content_owner")%></option>
                    <%rs.MoveNext
				loop

				rs.close
				%>
                  </select>
                </div></td>
              <td align="center"></td>
            </tr>
            <tr> 
              <td align="center"><div align="left"></div></td>
              <td colspan="-2" align="center"></td>
              <td align="center"></td>
              <td align="center">
</td>
            </tr>
            <tr> 
              <td align="center"> <div align="right">
                  <h4>Action Owner

                    <font size="1">Responsabile del Contatto</font></h4>
                </div></td>
              <td colspan="-2" rowspan="2" align="center"></td>
              <td align="center" valign="top"> <div align="left"> 
                  <select id="select2" name="select2">
				  <option> </option>
                    <%
					rs.Open "SELECT DISTINCT Action_owner FROM DBTP  ORDER BY Action_owner",Conn

					do while not rs.EOF%>
					
                    <OPTION value="<%=rs.Fields("Action_owner")%>"><%=rs.Fields("Action_owner")%></OPTION>
                    <%rs.MoveNext
				loop
				
				rs.close

	%></select>
	                </div></td>
              <td align="center"></td>
            </tr>
            <tr>
              <td align="center"></td>
              <td align="center" valign="top"><div align="left">[img]../NewToyotaImages/New%20Images/ImmaginiDefinitive/avvia.gif[/img]</div></td>
              <td align="center"></td>
            </tr>
            <tr> 
              <td align="center"><div align="right"> 
                  <h3>OPPURE</h3>
                </div></td>
              <td colspan="-2" rowspan="4" align="center"></td>
              <td align="center"></td>
              <td align="center"></td>
            </tr>
            <tr> 
              <td align="center"><div align="right"> 
                  <h4>Short code

                    <font size="1">Codice Breve</font></h4>
                </div></td>
              <td align="center" valign="top"> <div align="left"> 
                  <select id="select5" name="shortcode">
                    <option> </option>
                    <%
				rs.Open Sql,Conn

					do while not rs.EOF%>
                    <option value="<%=rs.Fields("SHORT_CODE")%>" <% if rs.Fields("SHORT_CODE")=request.QueryString("so") then response.write("Selected")%>><%=rs.Fields("SHORT_CODE")%></option>
                    <%rs.MoveNext
				loop


				rs.close
				%>
                  </select>


                </div></td>
              <td align="center"></td>
            </tr>
            <tr> 
              <td align="center"></td>
              <td align="center"><div align="left">[img]../NewToyotaImages/New%20Images/ImmaginiDefinitive/avvia.gif[/img]</div></td>
              <td align="center"></td>
            </tr>
            <tr> 
              <td align="center"></td>
              <td align="center"><div align="left"></div></td>
              <td align="center"></td>
            </tr>
            <tr> 
              <td colspan="4" align="center"><table width="100%" border="0" cellspacing="0" cellpadding="0">
                  <tr> 
                    <td width="176"></td>
                    <td width="10"><INPUT type="hidden" id="Fase" name="Fase"></td>
                    <td width="371"><INPUT type="hidden" id="selection" name="selection" value="PROCESS"></td>
                  </tr>
                </table></td>
            </tr>
          </table>
        </div>

Discussione: Primo campo select vuoto

Strumenti discussione

Ricerca discussione

Visualizza

Primo campo select vuoto

Permessi di invio