---
title: "Simple Chat"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/13096-simple-chat/page3"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "jboy_87"
published: "2001-11-28T16:38:00.000Z"
updated: "2001-12-09T14:17:00.000Z"
replies: 48
views: 654
page: 3
pages: 3
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/13096-simple-chat"
---

# Simple Chat

_Sida 3 av 3._

## #41 — jboy_87, 2001-11-29T18:18Z

nope samma skit

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

## #42 — jboy_87, 2001-11-29T18:22Z

provat så här också:

länk till chattet:

```
chat/default.asp?id=<%=Session("id")%>
```

```
chat/main.asp?id=<%=Session("id")%>
```

chattet:
\--------------------------------------

default.asp

```
<html>
<head>
<title>PLANKA.COM&#0124;MUNITY - CHAT 1.0</title>
</head>
	

<frameset rows="88%,*" framespacing="1" border="0" frameborder="0">
    <frameset cols="*,92%,4%">
      <frame name="Top" src="vanster.asp" scrolling="no" target="_self" noresize>
      <frameset rows="*,88%">
        <frame name="sd" scrolling="no" src="top.asp" noresize target="_self">
        <frame name="chat" src="main.asp" scrolling="auto" target="_self">
      </frameset>
      <frame name="Top3" src="online.asp" scrolling="no" noresize target="_self">
    </frameset>
  <frame name="Bottom" src="send.asp" scrolling="no" marginwidth="4" marginheight="4" noresize target="chat">
  <noframes>
  <body>
  <p>Denne side bruger frames, og det understøtter din browser ikke.</p>
  </body>
  </noframes>
</frameset>

</body>
</html>
```

main.asp

```
<!-- #include file="../adovbs.inc" -->
<%

Set Connect = Server.CreateObject("ADODB.Connection") 
Connect.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("../Database/members.mdb")&";pwd=losen"

Set RecSet = Server.CreateObject("ADODB.Recordset")

Addera = "Select * From members Where id = " &Session("id")
RecSet.Open Addera, Connect, adOpenStatic, adLockOptimistic

%>

<html>

<head>

<meta name="GENERATOR" content="Microsoft FrontPage 5.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<meta http-equiv="Content-Type" content="text/html; charset=windows-1252">
<meta http-equiv="REFRESH" content="3; URL=main.asp">
<title>Ny sida 1</title>
<base target="_self">
</head>

<body bgcolor="#FFF8E8">
<% strUser = "<b>" & session("username") & "</b>: "
strMessage = Server.HTMLEncode(TRIM(Request.Form("message")))
' // Her rydes Chat loggen, hvis den overstiger 10000 karakter
If Len(Application("ChatLog")) > 10000 Then
Application.Lock
Application("ChatLog") = ""
Application.UnLock
End If
If Request.Form("Action") = "Skicka" Then
If Len(strMessage) > 0 Then
strChatContent = strUser & strMessage & "<br>" & Application("ChatLog")
Application.Lock
Application("ChatLog") = strChatContent
Application.UnLock
End If
End If
Response.Write Application("ChatLog")%>
<%=session("username")%>
</body>

</html>
```

de övriga e tomma!!

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

## #43 — jboy_87, 2001-11-29T18:23Z

jag får följande felmess:

> Microsoft OLE DB Provider for ODBC Drivers (0x80040E14)
> \[Microsoft\]\[Drivrutin för ODBC Microsoft Access\] Syntaxfel (operator saknas) i frågeuttrycket 'id ='.
> /chat/main.asp, line 10

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

## #44 — @nders, 2001-11-29T19:33Z

... och det beror på att session("id") är tom.

Jag kan dock inte förstå varför. Kan du använda session("username") på alla sidor utom chatten? Det är inte så att chatten ligger på en annan server?

Var någonstans kan du annars använda den sessionsvariabeln?

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

## #45 — jboy_87, 2001-11-29T19:35Z

den ligger på min server!!!

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

## #46 — jboy_87, 2001-11-29T19:42Z

jag kan använda session på alla sidorna utan chattet det kan kanske bero på att jag har chattet i en annan mapp

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

## #47 — @nders, 2001-11-29T19:44Z

Varför inte prova att flytta in det i samma mapp som resten? Så länge det inte är en egen applikation på din server så ska den ju tillhöra samma så att säga.

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

## #48 — jboy_87, 2001-11-29T21:27Z

ja nu funkar det :-) men hur gör man om man vill att den ska funka i en mapp istället????

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

## #49 — jboy_87, 2001-12-09T14:17Z

hur får jag så att det står session("username") har joinat chattet?

så här ser koden ut:

```
<% 

strUser = "<b>" & session("username") &"</b>: "
strMessage = Server.HTMLEncode(TRIM(Request.Form("message")))
' // Her rydes Chat loggen, hvis den overstiger 10000 karakter
If Len(Application("ChatLog")) > 10000 Then
Application.Lock
Application("ChatLog") = ""
Application.UnLock
End If
If Request.Form("Action")  = "Skicka" Then
If Len(strMessage) > 0 Then

strChatContent = strUser & strMessage & "<br>" & Application("ChatLog")
Application.Lock
Application("ChatLog") = strChatContent
Application.UnLock
End If
End If
Response.Write Application("ChatLog")%>
```

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/13096-simple-chat/page3  
Föregående sida: https://www.webforum.nu/amne/asp/13096-simple-chat/page2.md