- Home
- Categorie
- Coding e Sistemistica
- Altri linguaggi per il web
- response.write
-
response.write
Buona serata a tutti,
sono quì per un problema come da titolo, che non riesco a risolvere.
Ho il seguente codice che non mi funziona, vi va di dargli un'occhiata per correggerlo?<%
Dim test
test = Request.QueryString("campo1")
If test <> "" Then
Response.Write (Request.QueryString("campo1"))
ELSE
response.Write (Request.QueryString("campo2"))
ELSE
Response.Write "nessun risultato"
End If
%>Grazie per l'attenzione
-
Credo di non essere stato chiaro.
Vorrei ottenere:
scrivi il campo2
se non è presente scrivi campo1
altrimenti scrivi nessun risultato
-
Ciao,
secondo me stai commettendo un grave errore di base a livello di programmazione.Se test è diverso da "" stampa campo1 altrimenti stampa campo2. Non puoi specificare un'altra condizione di uguaglianza, almeno non nella struttura IF..THEN.
In soldoni è come se scrivessi: if a <> "" then stampa "PIPPO" else stampa PLUTO else stampa PAPERINO.Quindi PLUTO viene stampato se a <> "" e PAPERINO quando dovrebbe essere stampato??
-
Ciao e grazie per la risposta.
So che il codice postato non è corretto in realtà in origine era il seguente:<%
Dim test
test = Request.QueryString("campo1")
If test <> "" Then
Response.Write (Request.QueryString("campo1"))
ELSE
Response.Write "nessun risultato"
End If
%>adesso però ho la necessità di aggiungere un'altra condizione appunto:
Response.Write (Request.QueryString("campo2"))per cui dovrei avere il seguente risultato:
scrivi ---- pippo ---- campo1
se presente scrivi ---- pluto ---- campo2
se non si verificano le prime due condizioni scrivi ---- nessun risultatospero di essere stato chiaro.
Ciao
-
Continuo a non capire cosa intenda per
scrivi ---- pippo ---- campo1
se presente scrivi ---- pluto ---- campo2
se non si verificano le prime due condizioni scrivi ---- nessun risultatoed in particolare la 2a riga.
Puoi provare a tradurre tutto ciò in pseudocodice, un po' come ho fatto io nell'esempio precedente??
-
Penso voglia fare così
Dim campo1, campo2
campo1 = Request.QueryString("campo1")
campo2 = Request.QueryString("campo2")
If campo1 <> "" Then
Response.Write (campo1)
ELSEIf campo2 <> "" Then
response.Write (campo2)
ELSE
Response.Write "nessun risultato"
End If
-
Ti serve il costrutto Select Case...ad esempio
SELECT CASE intMese CASE 1 strMese = "Gennaio" CASE 2 strMese = "Febbraio" CASE 3 strMese = "Marzo" CASE 4 strMese = "Aprile" CASE 5 strMese = "Maggio" CASE ELSE strMese = "Ottobre" END SELECT