SandmanMedlem sedan juli 2000112 inlägg 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 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]
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 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 fick till det till slut med hjälp av massa hiddenfält...
------------------
/Sandman
emissionMedlem sedan dec. 19996 721 inlägg 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