Select Case

[Skyscraper84]

Ciao ragazzi, si può fare una cosa del genere?

					Select Case lCase(oUpload.Files("InputName"))
						do while not rs_Documenti.eof
							Case "documento" & Cstr(rs_Documenti("Id"))
							
							oUpload.SaveAs Cstr(rs_Documenti("Id")) & "." & oUpload.files("ext")
							rs_Documenti.movenext
						loop


					End Select

Mi restituisce questo errore..
Microsoft VBScript compilation error '800a0400'

Expected statement

/SalvaNuovaPratica.asp, line 123

Case "documento" & Cstr(rs_Documenti("Id"))
^


Grazie

[optime]

altamente sconsigliato! sky, che devi fa'?

[Skyscraper84]

Sempre nei guai mi vado a cacciare

Faccio un upload multiplo con Baol ed il numero ed il nome delle input sono variabili e dipendenti da rispettivi record presenti nel database.
La input la denomino con documento + l'id del campo richiesto e quindi per recuperarne il valore cercavo il

Case "documento" & ID

Che ne pensi?

[optime]

fa' un esempio pratico che no compriendo

[Skyscraper84]

ok,
per fare una pratica di deposito bilancio servono 5 documenti, quindi la mia brava pagina asp prepara un form con 5 input denominate con "documento" & un ID preso dal database.
per fare una pratica di iscrizione invece servono 3 documenti e uso lo stesso sistema per produrre la pagina di immissione dati e così via.
Nella pagina di recupero dati so di che tipo di pratica si tratta e quindi quali documenti interessati e li ricerco con case.

HO stato chiaro?

[optime]

no, grazie. il mio neurone non capisce sta da solo e ha bisogno di tanta comprensione

[Skyscraper84]

ahah allora ti mando il mio così si fan compagnia

Ipotizza di dover fare un form che sponsorizza le attrezzature sportive dei giocatori del tuo club preferito

per il centravanti troverai un form con la maglia, i calzoncini e le scarpe...
per il centrocampista idem
per il portiere troverai quanto detto prima + i guantoni, quindi cambia la form di immissione dati.

e' un'applicazione totatlmente differente dalla mia ma il problema è comune

[Skyscraper84]

Ho messo da parte quella via e sto provando con un blocco IF

vi riporto il codice...

 <form action="../SalvaNuovaPratica.asp" method="post" enctype="multipart/form-data" name="form">
	<fieldset>
		<legend>Documenti da allegare</legend>
			
	<table>
		<tr>
			<td>Documento 1</td>
			<td><input type="file" name="Documento6"></td>
		</tr>
		<tr>
			<td>Documento 2</td>
			<td><input type="file" name="Documento7"></td>
		</tr>
	</table>
			
	</fieldset>
<input type="Submit" value="Conferma">
</form>
<%
			
				do While Not oUpload.Eof  
   
					do while not rs_Documenti.eof
						if lCase(oUpload.Files("InputName")) = "documento" & Cstr(rs_Documenti("Id")) then
							oUpload.SaveAs Cstr(rs_Documenti("Id")) & "." & oUpload.files("ext")
						end if
						rs_Documenti.movenext
					loop
						oUpload.MoveNext
				loop
%>

Si verifica che la loop "do While Not oUpload.Eof" si ferma al primo documento

Sapreste dirmi dove sbaglio?
Il primo file lo trova e lo salva correttamente

Ciao
Grazie

[Skyscraper84]

Trovato l'errore!!!! mi mancava un semplice .movefirst prima del secondo loop

Grazie ugualmente!