---
title: "Strul..."
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/11981-strul"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "SilvioF"
published: "2001-10-06T22:50:00.000Z"
updated: "2001-10-07T12:50:00.000Z"
replies: 2
views: 187
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/11981-strul"
---

# Strul...

## #1 — SilvioF, 2001-10-06T22:50Z

Har ett litet problem. Håller för tillfället på att bygga upp ett meddelande-system som tillåter olika användare att skicka meddelanden till varandra.

Nu är det så att jag vill att om jag t.ex. får ett meddelande från Johan så skall det hamna i "mappen" Johan. Jag har fått till det så att när man skickar meddelandet så sparas det i rätt "mapp", men när man sen ska läsa meddelendet så kommer det inte upp i rätt mapp 50% av tiden.

```
if Request.QueryString("mapp") = "" then
strMappnamn = "Inbox"
else
strMappnamn = Request.QueryString("mapp")
end if

if Request.QueryString("mapp") = "" then
strSQL = "SELECT * FROM messages WHERE tillID = " & Session("id") & " ORDER BY datum DESC"
else
strSQL = "SELECT * FROM messages WHERE tillID = " & Session("id") & " AND mapp = '" & strMappnamn & "' ORDER BY datum DESC"
end if

Set RecSet = Server.CreateObject("ADODB.Recordset")
RecSet.Open strSQL, Connect, 3, 3

Set rstMappar = Server.CreateObject("ADODB.Recordset")
strSQL = "SELECT DISTINCT (mapp) FROM messages ORDER BY mapp ASC"
rstMappar.Open strSQL, Connect, 3, 3

<form name="mappar">
Välj mapp 
<select name="mapp" size="1" onchange="location.href='read_mess.asp?mapp=' + document.mappar.mapp.value;">
<option value="">Välj mapp</option>
<option value="">----------</option>
<%
do until rstMappar.EOF
if not rstMappar(0) = "" then
Response.Write("<option value=""" & rstMappar(0) & """")
if rstMappar(0) = strMappnamn then Response.Write(" selected")
Response.Write(">" & rstMappar(0) & "</option>" & vbCrLf)
end if
rstMappar.MoveNext
loop
rstMappar.Close
set rstMappar = nothing
%>
</select>
</form>
<table width="100%" border="0" cellspacing="0" cellpadding="2" class="text">
<table width="100%" border="0" cellspacing="0" cellpadding="2" class="text">
<%
Do Until RecSet.EOF
Response.Write("<tr>")
Response.Write("<td width=""30"">")
If RecSet("read") = 0 Then
Response.Write("<b>NYTT</b>")
Else
Response.Write "LÄST"
END IF
Response.Write("</td>")
Response.Write("<td width=""100""><b>" & RecSet("namn") & "</b></td>")
Response.Write("<td><a href=""do_read.asp?readid=" & RecSet("id") & """>" & RecSet("rubrik") 6 "</a></td>")
Response.Write("<td width=""100""><b>" & RecSet("datum") & "</b></td>")
Response("<td width=""80""><a href=""do_delete.asp?delID=" & RecSet("id") & """>radera</a></td>")
Response.Write("</tr>")
RecSet.MoveNext
Loop
RecSet.Close
Connect.Close
Set RecSet = nothing
Set Connect = nothing
%>
</table>
```

\[R\]LADE TILL KOD SOM SÄTTER VARIABELN strMappnamn I BÖRJAN AV KODEN\[/R\]

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

## #2 — Vide, 2001-10-07T09:30Z

Vart sätts variabeln strMappnamn?
För den sätts ju inte i koden.

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

## #3 — SilvioF, 2001-10-07T12:50Z

Jo, nu efter min lilla redigering så finns den med. Glömde den visst inatt. ;-)

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/11981-strul