---
title: "formulär validering?"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/10039-formulär-validering"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "icaaq"
published: "2001-06-13T21:40:00.000Z"
updated: "2001-06-13T22:36:00.000Z"
replies: 5
views: 271
page: 1
pages: 1
language: "sv-SE"
site: "webForum — webforum.nu"
rights: "Upphovsrätten till varje inlägg tillhör dess författare."
attribution: "Citera som: webForum, https://www.webforum.nu/amne/asp/10039-formulär-validering"
---

# formulär validering?

## #1 — icaaq, 2001-06-13T21:40Z

jag har följande..

```
'*********### Tar in alla värden i variabler 
Sub Collectform
	strFraga = Trim(Request.Form("fraga"))
	If Request.Form("intSvar2") = "" Then
		intAlt = Cint(Request.Form("intSvar1"))
	Else 
		intAlt = Cint(Request.Form("intSvar2"))
	End If
	Egna_svar = Trim(Request.Form("Egna_svar"))
	Kommentar = Trim(Request.Form("Kommentar"))
End Sub

'*********### Kollar om det är några fel i formuläret

function strError(intAlt, strFraga)
	StrError = 0

		'***###Kollar om det har skrivits nån fråga ###***
		If strFraga = "" Then
			strError = 3
			Exit Function
		End If		
				
		'***### Kollar om antalet svarsalt. är minst 2 och max 20 ###***
		If intAlt < 2 Then
			strError = 1
			Exit Function
		ElseIf intAlt > 20 Then
			strError = 2
			Exit Function
		End If
End Function			

'*********### Kollar vilket fel det är i formuläret

Function Felmess(intError)

	Select Case intError
		Case 1
		Felmess = "Du måste ha minst 2 svars alternativ"
		Exit Function
		Case 2
		Felmess = "Du får ha högst 20 svars alternativ"
		Exit Function
		Case 3
		Felmess = "Du har ju inte skrivit nån fråga"
		Exit Function
	End Select
	
End Function
```

men hur jag än försöker får jag felmedelande 3 "Du har ju inte skrivit nån fråga"

nån som ser nått självklart fel eller hur jag kan lösa det??

Permalänk: https://www.webforum.nu/p/10039

## #2 — icaaq, 2001-06-13T21:52Z

på nått konstigt vis får jag inte in dena rad:

```
strFraga = Trim(Request.Form("fraga"))
```

 :q varför??

/r
jag kan asso skriva ut Trim(Request.Form("fraga")) med response.Write men jag får inte in den i den variablen....

Permalänk: https://www.webforum.nu/p/271690

## #3 — Vide, 2001-06-13T22:15Z

Är det inte så att du måste skicka med värdet i subben, är lite osäker om Request.Form-kollektionen finns... \*flarnar\*...

Permalänk: https://www.webforum.nu/p/271691

## #4 — icaaq, 2001-06-13T22:19Z

Jag har använt mig av PatrikB´s variant....
 <http://cgi.webforum.nu/wf/Forum11/HTML/003302.html> 

det har ju funkat på andra sidor som jag gjort med samma princip.... :)

Permalänk: https://www.webforum.nu/p/271692

## #5 — Vide, 2001-06-13T22:33Z

Även om det nu fixade sig, så måste jag berömma dig på ditt sätt att struturera din kod... den ser lätt ut att förstå sig på... :)

Permalänk: https://www.webforum.nu/p/271693

## #6 — icaaq, 2001-06-13T22:36Z

Man har ju lärt sig lite av att hänga här.... :e som sagt jag tog bort subben och då fixade det sig....men **PatrikB** varför funkade det inte denna ggn :q

Permalänk: https://www.webforum.nu/p/271694

---

Tråden på webben: https://www.webforum.nu/amne/asp/10039-formulär-validering