---
title: "Hjälp!!"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/5565-hjälp"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "tapani"
published: "2000-04-14T08:55:00.000Z"
updated: "2000-04-14T16:53:00.000Z"
replies: 6
views: 236
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/5565-hjälp"
---

# Hjälp!!

## #1 — tapani, 2000-04-14T08:55Z

Hur kan jag få koden under här att endast lista samma datum en gång??

Nu listar den typ 20001008 flera gånger pga
av att just det datumet finns med på flera
poster i databasen..

\<%	
	Set objConn = CreateObject("ADODB.Connection")
	objConn.Open("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=I:\\Inetpub\\cgi-bin\\ha\\contact.mdb")
	SQL = ""
	
	Set rsContacts = CreateObject("ADODB.Recordset")
	Set rsContacts.ActiveConnection = objConn
	rsContacts.Open "SELECT \* FROM ContactView2 order by Date"
%\>

\<form method="GET" action="sort.asp"\>
\<Select Name="datum" size="10"\>
\<%
Do While Not rsContacts.EOF
%\>

\<option value="\<%= rsContacts("Date") %\>"\>\<%= rsContacts("Date") %\>\</option\>
\<%
rsContacts.MoveNext
loop
%\>

\<%
	rsContacts.close
	set rsContacts = Nothing
	objConn.close
	set objConn = Nothing
%\>

\</Select\>
\<input type="submit" value="skicka"\>

Tack på förhand

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

## #2 — Vide, 2000-04-14T10:03Z

Hej!

... då finns det inbyggd funktion i språket SQL som heter "Join", som gör att de bara blockar ut en av varje i ett fält...

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

## #3 — tapani, 2000-04-14T10:31Z

Hur använder jag "Join" i exemplet ovan?

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

## #4 — PatrikB, 2000-04-14T12:01Z

hello,

Detta kanske du kan använda dig av:

```
<form method="GET" action="sort.asp">
<Select Name="datum" size="10">
<%
Do While Not rsContacts.EOF

If rsContacts("Date") <> chkDate Then
%>

<option value="<%= rsContacts("Date") %>"><%= rsContacts("Date") %></option>
<%
chkDate = rsContacts("Date")
End If
rsContacts.MoveNext
loop
%>
```

Kanske inte den bästa lösningen, men tror att den ska funka. (gjord direkt i "kontoret", ej testad)

mvh
//PatrikB

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

## #5 — tapani, 2000-04-14T12:06Z

Hänger med där men får det här felmeddelandet:

Microsoft VBScript compilation error '800a040e' 

'loop' without 'do' 

/ha/datumsort.asp, line 28 

loop
^

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

## #6 — tapani, 2000-04-14T12:08Z

Opsss...

Missade koden under \<Option\> ..

Nu funkar det..

Kanon..

Tack

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

## #7 — PatrikB, 2000-04-14T16:53Z

He, He .... lätt hänt att man missar ngt ... 

//PatrikB

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/5565-hjälp