---
title: "loop utan do"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/40600-loop-utan-do"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "ampy"
published: "2002-03-31T20:35:35.000Z"
updated: "2002-03-31T21:24:36.000Z"
replies: 6
views: 256
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/40600-loop-utan-do"
---

# loop utan do

## #1 — ampy, 2002-03-31T20:35Z

```
		If Request.Form("medlem") = "" Then

		

			Do Until RecSet.EOF
	
			If RecSet("medlem") = Request.Form("medlem2") Then 

			%>

	
			<script language="javascript">

			alert('Du har redan denna medlem i din maillista.');

			location.href='maillista.asp';
			</script>

			<%
			RecSet.Movenext
			Loop

			Else
			
			

 

		RecSet.Addnew

		RecSet("medlem") = Request("medlem2")
		RecSet("agare") = session("username")
		RecSet("agare_id") = session("id")

			
			End If

			

		Else
	

			Do Until RecSet.EOF
	
			If RecSet("medlem") = Request.Form("medlem2") Then

			%>

			<script language="javascript">

			alert('Du har redan denna medlem i din maillista.');

			location.href='maillista.asp';
			</script>
			
			<%
			RecSet.Movenext
			Loop

			Else

		RecSet.Addnew

		RecSet("medlem") = Request("medlem")
		RecSet("agare") = session("username")
		RecSet("agare_id") = session("id")
	

			End If 

		End If
```

vart kan jag lägga (finns 2 st):

RecSet.Movenext
Loop

kommer inte på ngt bra ställe för jag får loop utan do hela tiden

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

## #2 — solbulle, 2002-03-31T20:51Z

Tycker det ser lite tokigt ut, först kollar du om 
If Request.Form("medlem") = ""  och i så fall går du vidare? \<men det kanske kan stämma?
Samt att du kollar:
If RecSet("medlem") = Request.Form("medlem2") 
I båda satserna, stämmer det?

Så här kan jag tänka mig att det ska se ut, men du kan effektivisera koden en hel del  skulle jag tro:

```
If Request.Form("medlem") = "" Then

			Do Until RecSet.EOF
	
			If RecSet("medlem") = Request.Form("medlem2") Then 

			%>

			<script language="javascript">
			alert('Du har redan denna medlem i din maillista.');
			location.href='maillista.asp';
			</script>

			<%

			Else

		RecSet.Addnew
		RecSet("medlem") = Request("medlem2")
		RecSet("agare") = session("username")
		RecSet("agare_id") = session("id")

			End If

			RecSet.Movenext
			Loop

		Else
	
			Do Until RecSet.EOF
	
			If RecSet("medlem") = Request.Form("medlem2") Then

			%>

			<script language="javascript">
			alert('Du har redan denna medlem i din maillista.');
			location.href='maillista.asp';
			</script>
			
			<%

			Else

		RecSet.Addnew
		RecSet("medlem") = Request("medlem")
		RecSet("agare") = session("username")
		RecSet("agare_id") = session("id")
	
			End If 

			RecSet.Movenext
			Loop
		End If
```

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

## #3 — ampy, 2002-03-31T21:00Z

Får lopp utan do av din kod solbulle.

Men här kommer en beskrivning av koden:

Första så kollar jag om Request.Form("medlem") är tomt för att jag har även Request.Form("medlem2") för att besökaren kan välja i vilket fält han vill fylla i (Request.Form("medlem") är en rullist)

Efter att jag har kollat om Request.Form("medlem")  är tomt så kollar jag ju om inte Request.Form("medlem")  redan finns i databasen genom att loopa fram alla poster. Om det finns så skriver jag ju ut javascriptkoden. Om Request.Form("medlem") inte finns i databasen så lägger jag till Request.Form("medlem2") m.m. 

Och efter det har du (solbulle) lagt 

Loop
RecSet.Movenext

fast problemet är vart man ska lägga det.

Efter det gör jag samma upprepning men om inte Request.Form("medlem") finns i databasen så lägger jag till Request.Form("medlem") istället för första delen så la jag till Request.Form("medlem2")

Hoppas ni förstår koden bättre nu.

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

## #4 — solbulle, 2002-03-31T21:04Z

Ändrat koden, sista loopen, du kan ju pröva den.

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

## #5 — ampy, 2002-03-31T21:10Z

Tack så mycket solbulle, kolla gärna igenom mina andra inlägg också, har inte fått hjälp på länge där   :birp

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

## #6 — solbulle, 2002-03-31T21:15Z

En något kortare variant:

```
If Request.Form("medlem") <> "" OR Request.Form("medlem2") <> "" then

If Request.Form("medlem") <> "" Then
medlem = Request.Form("medlem")
ElseIf Request.Form("medlem2") <> "" then
medlem = Request.Form("medlem2")

		End If

			Do Until RecSet.EOF
	
			If RecSet("medlem") = medlem Then 

			%>

			<script language="javascript">
			alert('Du har redan denna medlem i din maillista.');
			location.href='maillista.asp';
			</script>

			<%

			Else

		RecSet.Addnew
		RecSet("medlem") = medlem 
		RecSet("agare") = session("username")
		RecSet("agare_id") = session("id")

			End If

			RecSet.Movenext
			Loop

		End If
```

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

## #7 — ampy, 2002-03-31T21:24Z

Tack för den mer bantade koden men jag upptäckte ett fel. Om det inte finns några poster alls i databasen så läggs det inte till någonting men om det finns minst en post så funkar allt perfekt.

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/40600-loop-utan-do