webForumDet fria alternativet

Inputfält

5 svar · 209 visningar · startad av Sandman

SandmanMedlem sedan juli 2000112 inlägg
#1

Har 30 st inputfält, alla unika. nu vill jag kolla fälten om de innehåller något värde, för gör något fält det ska värdet skickas med i ett mail annars ska inget hända.

finns det något lättare sätt att lösa det på än att skriva 30 st if - else satser?

------------------
/Sandman

BrimbaMedlem sedan dec. 19995 875 inlägg
#2

Humm...

Nått sånthär?

If Request.Form("formnamn") <> "" Then
	Request.Form("formnamn").Count
	For I=1 to Request.Form("formnamn").Count
	oVarS=Request.Form("formnamn")(I)

		Response.write oVarS
...Fast här lägger du in jmail eller CDOnts, eller vad du nu använder...

	Next
End If

Kan det fungera tro?

Lycka till!

------------------
Mvh
Patrik aka Brimba
Brimbas lille ställe

[Redigerat av Brimba den 12 okt 2000]

Andreas LMedlem sedan sep. 2000215 inlägg
#3

Hm...

Saken är väl den att du behöver kontrollera varje textruta i formuläret?

Om du vet att det är exakt 30 rutor i formuläret så kan du ju döpa rutorna till
c1,c2...c29,c30

När du sedan skall kontrollera om de innehåller något så kan du läsa av rutorna såhär;
<%
For i = 1 to 30
variabel = request.Form("c"&i)
If variabel <> "" then
'utför det som du vill skall hända med värdet
'ex. lägga till det i ett mail etc.
end if
Next
%>
Så har jag löst det när det gäller Mailinglistor där man skall kunna kryssa i vilka man vill maila till.

Du kan ju använda Request.Form("formnamn").Count oxå, men tänk då på att ex. en Submitknapp oxå utgör ett objekt i formuläret.

------------------
"Life's a bitch who sucks... then you marry one who doesn't"

SandmanMedlem sedan juli 2000112 inlägg
#4

tackar, loopen fungerar bra men nu kommer nästa problem:

kan man ge varje inputfält en egen text(som användaren inte ser) men som skrivs ut i mailet tillsammans med värdet som användaren matade in så att inte samma text skrivs ut 30 ggr när loopar igenom fälten?

------------------
/Sandman

SandmanMedlem sedan juli 2000112 inlägg
#5

fick till det till slut med hjälp av massa hiddenfält...

------------------
/Sandman

emissionMedlem sedan dec. 19996 721 inlägg
#6

Annars så....

For Each mItem in Request.Form
 For i = 1 to Request.Form(mItem).Count
   Response.Write "<b>" & mItem & ":</b> ¨" & Request.Form(mItem)(i) & "<br>"
 Next
Next

------------------
-------------------
What a waste it is to lose one's mind. Or not to have a mind is being very wasteful. How true that is.
Dan Quayle

134 ms totalt · 3 externa anrop · v20260731065814-full.30151723
0 ms — hämta forumlista (cache)
0 ms — hämta statistik (cache)
131 ms — hämta tråd, inlägg och bilagor (db)