---
title: "Sortera efter vecka!"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/61446-sortera-efter-vecka"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "paddan"
published: "2002-12-07T10:54:14.000Z"
updated: "2002-12-07T11:07:51.000Z"
replies: 6
views: 413
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/61446-sortera-efter-vecka"
---

# Sortera efter vecka!

## #1 — paddan, 2002-12-07T10:54Z

Hej jag har information liggande i en databas som jag skulle vilja plocka ut!
Men jag vill att det ska plockas ut för varje vecka.. alltså är det vecka 42 så ska det plockas ut för vecka 42---

Här är kodensom jag har provat det med..

\<%
vecka = DatePart("ww", Date(), 2)\<BR\>
Set Con = Server.CreateObject("ADODB.Connection") 
Con.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("db/vmatch.mdb")%\>
\<%SQLsats = "SELECT \* FROM vmatch WHERE vecka = " & vecka
Set RecSet = Con.Execute(SQLsats)
Do Until RecSet.EOF
%\>
  \<tr\>
  \<td colspan="2"\>\<b\>\<font color="#000000"\>Herrar A\</font\>\</b\>\</td\>
  \</tr\>
  \<tr\>
  \<td\>\<b\>Vem: \</b\>\</td\>
  \<td width="90%"\>\<%=RecSet("hemma")%\> vs \<%=RecSet("borta")%\>\</td\>
  \</tr\>
  \<tr\>
  \<td\>\<b\>Var:\</b\>\</td\>
  \<td width="90%"\>\<%=RecSet("tid")%\>, \<%=RecSet("datum")%\>\</td\>
  \</tr\>
  \<tr\>
  \<td\>\<b\>När\</b\>\</td\>
  \<td width="90%"\>\<%=RecSet("plats")%\>\</td\>
  \</tr\>\<% RecSet.MoveNext
loop
RecSet.Close
Con.Close
%\>                   \</table\>

Det blir detta felmedlande:
Microsoft JET Database Engine error '80040e07' 
Data type mismatch in criteria expression. 

/kavlinge/index.asp, line 181 

Vad ska jag göra??

mvh martin
    1

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

## #2 — icaaq, 2002-12-07T10:59Z

Välkommen till wF!
Vad är vecka för datatyp i access?

mvh icaaq

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

## #3 — Ekström, 2002-12-07T11:01Z

vecka = DatePart("ww", Date(), 2)\<BR\> 

Hur har \<BR\> hamnat där? :)

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

## #4 — paddan, 2002-12-07T11:02Z

Det var först text men ny är dte ändrat till nummer...!
Men jag har kommit lite längre faktiskt!
Kolla på denna koden vad är felet??
\<%
vecka = DatePart("ww", Date(), 2)
Set Con = Server.CreateObject("ADODB.Connection") 
Con.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("db/vmatch.mdb")%\>
\<%SQLsats = "SELECT \* FROM vmatch WHERE vecka = " & vecka  AND lag= "herrara' ORDER by datum DESC "
Set RecSet = Con.Execute(SQLsats)
Do Until RecSet.EOF
%\>
  \<tr\>
  \<td colspan="2"\>\<b\>\<font color="#000000"\>Herrar A\</font\>\</b\>\</td\>
  \</tr\>
  \<tr\>
  \<td\>\<b\>Vem: \</b\>\</td\>
  \<td width="90%"\>\<%=RecSet("hemma")%\> vs \<%=RecSet("borta")%\>\</td\>
  \</tr\>
  \<tr\>
  \<td\>\<b\>Var:\</b\>\</td\>
  \<td width="90%"\>\<%=RecSet("tid")%\>, \<%=RecSet("datum")%\>\</td\>
  \</tr\>
  \<tr\>
  \<td\>\<b\>När\</b\>\</td\>
  \<td width="90%"\>\<%=RecSet("plats")%\>\</td\>
  \</tr\>\<% RecSet.MoveNext
loop
RecSet.Close
Con.Close
%\> 

Får detta felmedlande:
Microsoft VBScript runtime error '800a000d' 
Type mismatch: '\[string: "SELECT \* FROM vmatch"\]' 

/kavlinge/index.asp, line 180

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

## #5 — icaaq, 2002-12-07T11:02Z

```
[red]
"SELECT * FROM vmatch WHERE vecka = '" & vecka &"'"
[/red]
```

om det är text :)

mvh icaaq

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

## #6 — Ekström, 2002-12-07T11:04Z

Är det ett heltal så borde det vara

```
SQLsats = "SELECT * FROM vmatch WHERE vecka = "& vecka &" AND lag = 'herrara' ORDER by datum DESC"
```

Sen är nog inte datum nåt vidare bra namn på en kolumn.

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

## #7 — paddan, 2002-12-07T11:07Z

Tack för hjälpen det löste sig!

mvh martin!

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/61446-sortera-efter-vecka