---
title: "webbchat"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/135918-webbchat"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "ptr_lks"
published: "2005-10-18T07:30:03.000Z"
updated: "2005-11-11T11:15:13.000Z"
replies: 83
views: 1699
page: 1
pages: 5
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/135918-webbchat"
---

# webbchat

_Sida 1 av 5._

## #1 — ptr_lks, 2005-10-18T07:30Z

Hej,
jag jobbar med en hemsida för min sons [basketlag](http://www45.brinkster.com/spif93/)

1. är det svårt att "koda" en enkel webchat? Försökt utan framgång googla efter tutorials i ämnet
2. grabbarna är i 12 åå, så de flesta har msn - kan jag på något sätt använda mig av msn?
3. eller är mirc bättre allternativ?

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

## #2 — Jesper T, 2005-10-18T11:49Z

Är det svårt att bygga en bil?

En lådbil behöver inte vara så svår att bygga, men det kan vara ruskigt marigt. För att inte tala om att bygga en RR-replika med orginaldelar. ;)
Alltså, det beror på hur många som skall använda den, hur många chattrum vilken funktionalitet osv. De som vet brukar avråda ifrån att göra chattar med ASP-teknik.
Det är bättre att göra en i tex. java (inte javascript).
Det bästa tycker jag är att du skaffar en gratischatt som du kan hitta på t.ex. <https://www.hotscripts.com> klicka dig vidare till önskad sida.

Denna t.ex. <http://www.hotscripts.com/Java/Applications/Chat_Systems/index.html>

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

## #3 — ptr_lks, 2005-10-18T12:11Z

> **Jesper T skrev:**
>
> ....Alltså, det beror på hur många som skall använda den, hur många chattrum vilken funktionalitet osv.

Alltså jag tänker mig en mycket basic chat, med ett chattrum och kansek 6 - 10 samtidig användare som max :OO 

> **Jesper T skrev:**
>
> De som vet brukar avråda ifrån att göra chattar med ASP-teknik.

varför avråds man från detta?

> **Jesper T skrev:**
>
> Det är bättre att göra en i tex. java (inte javascript).
> Det bästa tycker jag är att du skaffar en gratischatt som du kan hitta på t.ex. <https://www.hotscripts.com> klicka dig vidare till önskad sida.

Ett stort problem är att jag inte kan java alls. verkar vara en hög ambitionsnivå att lära sig java för att kunna göra en chat  :stud

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

## #4 — J.N., 2005-10-20T09:40Z

HEJ!
Eftersom din [korspostade tråd](http://www.webforum.nu/showthread.php?p=1102350#post1102350) stängdes under tiden jag skrev, svarar jag på det här. (LITE förvånad blev jag!)

1\. För att underlätta kodningen, när du loggar ut, kommer du till logout.asp, som kontrollerar om session är tom (=nej) och därefter kör Abandon och redirect.

2\. Nej, här finns inget som har med databas att göra.

3\. Troligtvis, har ingen erfarenhet av Brinkster; koden refererar inte till global.asa i alla fall.

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

## #5 — lilja, 2005-10-20T11:41Z

> **ptr_lks skrev:**
>
> varför avråds man från detta?

Kanske för att ASP inte är direkt optimerad för ändamålet...

Om du skall göra en chatt kan du t.ex. använda dig av en databas och en sida som ligger och uppdaterar sig kanske var 10:e skund. Formuläret du använder för att skriva in data i bör ligga i en annan frame om inte basketspelarna är snabba på tangentbordet efterssom det inskrivna försvinner när du uppdaterar sidan...

I sidan som uppdaterar hämtar du kanske de 20 senaste posterna från databasen som las till de senaste 30 minuterna... Kanske??

Redigerad: Lägg t.ex. sidan som uppdateras i en iframe och tvinga besökarna att logga in med ett valfritt användarnamn som sparas i en Session-variabel så har du din chatt... En basic men fungerande...

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

## #6 — emil_ad, 2005-10-20T12:06Z

> **lilja skrev:**
>
> Kanske för att ASP inte är direkt optimerad för ändamålet...
> 
> Om du skall göra en chatt kan du t.ex. använda dig av en databas och en sida som ligger och uppdaterar sig kanske var 10:e skund. Formuläret du använder för att skriva in data i bör ligga i en annan frame om inte basketspelarna är snabba på tangentbordet efterssom det inskrivna försvinner när du uppdaterar sidan...
> 
> I sidan som uppdaterar hämtar du kanske de 20 senaste posterna från databasen som las till de senaste 30 minuterna... Kanske??
> 
> Redigerad: Lägg t.ex. sidan som uppdateras i en iframe och tvinga besökarna att logga in med ett valfritt användarnamn som sparas i en Session-variabel så har du din chatt... En basic men fungerande...

Eller varför inte en textfil med FSO, det funkar kalas i ASP, använd Remote Scripting så slipper man uppdateringsklick o sånt och flusha/töm textfilen efter XX antal inlägg.

Är det inte allt för många som ska chatta så tycker jag det är ett smart sätt.
Men det kanske var o spänna bågen :q

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

## #7 — ptr_lks, 2005-10-20T12:07Z

> **emil_ad skrev:**
>
> Eller varför inte en textfil med FSO, det funkar kalas i ASP, använd Remote Scripting så slipper man uppdateringsklick o sånt och flusha/töm textfilen efter XX antal inlägg.
> 
> Är det inte allt för många som ska chatta så tycker jag det är ett smart sätt.
> Men det kanske var o spänna bågen :q

två fundarationer:
kan man använda din metod på Brinkster?
var kan jag läsa om din metod?

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

## #8 — emil_ad, 2005-10-20T12:14Z

> **ptr_lks skrev:**
>
> två fundarationer:
> kan man använda din metod på Brinkster?
> var kan jag läsa om din metod?

Hmmm

Om brinkster stöder FSO eller om det föreligger några problem med just Remote Scripting där får jag nog lämna obesvarad. För att det ska fungera måste du ha en katalog med både läs- och skrivrättigheter. Detta för jag aldrig använder brinkster.

Gällande metoden med Remote Scriptning så har jag byggt ett par sådana funktioner, dock ej för publikt ändamål. 

Om Remote Scripting finns det mer info via MSDN
<http://msdn.microsoft.com/library/default.asp?url=/library/en-us/rmscpt/html/rmscpt.asp>

Skulle gärna hjälpa dig ytterligare, men kommer du igång så posta lite kod så kanske alla här kan bistå dig.

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

## #9 — lilja, 2005-10-20T12:49Z

ja textfiler är ju onekligen enklare, att jag inte tänkte på det  :OO 

Remote Scripting har jag inte ens hört talas om, allt lär man sig nåt nytt   :bire 

Hmm, FSO skall fungera även på gfratiskontot hos brinkster... Får det dock inte till att fungera... Min sökväg när jag kör Server.MapPath() verkar bli lite väl skumm...

```
<%
Set fs=Server.CreateObject("Scripting.FileSystemObject")

If fs.FileExists(Server.MapPath("fil.txt")) = True Then
      Response.Write("File c:\winnt\cursors\3dgarro.cur exists.")
Else
      Response.Write("File c:\winnt\cursors\3dgarro.cur does not exist.")
End If

set fs=nothing
%>
```

Returnerar:
\\\\genfs4\\www50\\dk04lich\\fil.txtFile c:\\winnt\\cursors\\3dgarro.cur does not exist.

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

## #10 — lilja, 2005-10-20T13:01Z

Äh, skriptet började plötsligt fungera. Testa på och fråga om det blir problem! :)

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

## #11 — Travoni, 2005-10-20T15:05Z

Det finns en liten sådan chat i scriptarkivet.
<http://www.webforum.nu/showthread.php?t=88696>

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

## #12 — lilja, 2005-10-20T19:44Z

Aha, förstår inte riktigt hur det fungerar men det verkar coolt... Dock så bygger den chatten också på att div-en uppdateras i ett visst intervall...

Rätta mig om jag har fel med t.ex. Java-chattar kan väl känna av när någon skickar något och uppdatera därefter??

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

## #13 — ptr_lks, 2005-10-22T16:02Z

vad tycker ni om koden?

```
<%
Set minCon = Server.CreateObject( "Adodb.Connection" )
	minCon.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("\4testasp\db\chat.mdb")	
 
  strUser = replace(Request("chattnamn"), "'", "''")
  strPasw = replace(Request("txtPassword"), "'", "''")
  
    strSQL = "SELECT * FROM chattare WHERE Chattnamn = '"_
      & strUser & "' AND Chattpassw ='" & strPasw & "';"
    Set User = minCon.Execute(strSQL)
    
    if not rs.EOF then
      strSQL = "UPDATE chattare SET OnLine = 1 WHERE chattnamn ='" & strUser & "';"
      strSQL = "INSERT INTO skickade (from, skrivet, tidpkt) VALUES ("_
        & "'System', '<i>" & strUser & "</i> Steg in i chatten', '" & Now & "');"
      Session("Inloggad") = User("anvID")
      
      Response.Redirect "chat.asp"
    else
      Response.Redirect("error.html")
   
    
    Set User = Nothing
	minCon.Close
	Set minCon = Nothing
  end if
%>
<html>

<head>
<title>Inlogning till chatten </title>
</head>

<body bgcolor="#FFFFFF">
<center>
  <P>&nbsp;</P>
<form method="post" action="default.asp">
  <table border="0" width="200" cellspacing="1" cellpadding="4">
    <tr>
      <td width="20%" align="right" bgcolor="#F2B425"><b>Chattnamn:</b></td>
      <td width="80%" bgcolor="#F7D53E"><input type="text" name="chattnamn" value="<%=strUser%>" size="20"></td>
    </tr>
    <tr>
      <td width="20%" align="right" bgcolor="#F2B425"><b>L&ouml;senord:</b></td>
      <td width="80%" bgcolor="#F7D53E"><input type="password" name="txtPassword" size="20"></td>
    </tr>
    <tr>
      <td width="100%" colspan="2" align="center" bgcolor="#F2B425"><input type="submit" value="Klivpå" name="btnLogin"></td>
    </tr>
  </table>
</form>
```

1. kolla om chattaren är registrerad
2. uppdatera att chattaren är online
3. uppdatera mde tidpunkten då chattaren kom online

 

1. kommer detta funka?
2. skall det vara 

   ```
   UPDATE chattare SET OnLine = 1
   ```

    eller 

   ```
   UPDATE chattare SET OnLine = Ja
   ```

    eller

   ```
   UPDATE chattare SET OnLine = True
   ```

 
Gid fortsättning på helgen önskar
/ptr

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

## #14 — ptr_lks, 2005-10-23T09:53Z

eller borde det vara:

```
]<%
Set minCon = Server.CreateObject( "Adodb.Connection" )
	minCon.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("\4testasp\db\chat.mdb")	
 
  strUser = replace(Request("chattnamn"), "'", "''")
  strPasw = replace(Request("txtPassword"), "'", "''")
  
    strSQL = "SELECT * FROM chattare WHERE Chattnamn = '"_
      & strUser & "' AND Chattpassw ='" & strPasw & "';"
    Set User = minCon.Execute(strSQL)
    
    if not rs.EOF then
      strSQL = "UPDATE chattare SET OnLine = 1 WHERE chattnamn ='" & strUser & "';"
[B]Set User = minCon.Execute(strSQL)[/B]
      strSQL = "INSERT INTO skickade (from, skrivet, tidpkt) VALUES ("_
        & "'System', '<i>" & strUser & "</i> Steg in i chatten', '" & Now & "');"
      Session("Inloggad") = User("anvID")
 [B]Set User = minCon.Execute(strSQL)[/B]    
      Response.Redirect "chat.asp"
    else
      Response.Redirect("error.html")
   
    
    Set User = Nothing
	minCon.Close
	Set minCon = Nothing
  end if
%>
<html>

<head>
<title>Inlogning till chatten </title>
</head>

<body bgcolor="#FFFFFF">
<center>
  <P>&nbsp;</P>
<form method="post" action="default.asp">
  <table border="0" width="200" cellspacing="1" cellpadding="4">
    <tr>
      <td width="20%" align="right" bgcolor="#F2B425"><b>Chattnamn:</b></td>
      <td width="80%" bgcolor="#F7D53E"><input type="text" name="chattnamn" value="<%=strUser%>" size="20"></td>
    </tr>
    <tr>
      <td width="20%" align="right" bgcolor="#F2B425"><b>L&ouml;senord:</b></td>
      <td width="80%" bgcolor="#F7D53E"><input type="password" name="txtPassword" size="20"></td>
    </tr>
    <tr>
      <td width="100%" colspan="2" align="center" bgcolor="#F2B425"><input type="submit" value="Klivpå" name="btnLogin"></td>
    </tr>
  </table>
</form>
```

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

## #15 — @nders, 2005-10-23T10:01Z

Du måste exekvera båda SQL-frågorna, men det finns ingen anledning att skapa recordsetobjekt, eftersom du inte hämtar någon data.

```
minCon.Execute (strSQL)
```

räcker bra, eller ännu hellre:

```
minCon.Execute strSQL,,128
```

(lite snällare eftersom det varken skapas eller returneras något recordset.)

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

## #16 — Nickemannen, 2005-10-23T10:38Z

Ta en färdig istället:
<http://asp.aspobjects.com/ASP_Scripts/Chat/>

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

## #17 — ptr_lks, 2005-10-23T13:21Z

vad tycker ni om detta kod då?

```
<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<%
if Request.Form("chattin") = "Börja chatta" Then

Set chatt = Server.CreateObject( "Adodb.Connection" )
chatt.Provider = "Microsoft.Jet.OLEDB.4.0"
MdbFilePath = Server.MapPath("\4testasp\db\chat.mdb")
chatt.ConnectionString = "Data Source='" & MdbFilePath & "'"
chatt.open
strUser = replace(Request("chattnamn"), "'", "''")
strPasw = replace(Request("txtPassword"), "'", "''")

 strSQL = "SELECT * FROM chattare WHERE Chattnamn = '"_
  & strUser & "' AND Chattpassw ='" & strPasw & "';"
  Set rs = minCon.Execute(strSQL)
  

  if not rs.EOF then
    strSQL = "UPDATE chattare SET OnLine = 1 WHERE chattnamn ='" & strUser & "';"
    strSQL = "INSERT INTO skickade (from, skrivet, tidpkt) VALUES ("_
    & "'System', '<i>" & strUser & "</i> Steg in i chatten', '" & Now & "');"
    Session("Inloggad") = User("anvID")

    rs.Close
    minCon.Close
    Set rs = Nothing
    Set minCon = Nothing
  
    Response.Redirect "chatt.asp"
  else
    rs.Close
    minCon.Close
    Set rs = Nothing
    Set minCon = Nothing

    Response.Redirect("error.htm")
  end if
  end if
%>
```

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

## #18 — @nders, 2005-10-23T17:09Z

> **@nders skrev:**
>
> Du måste exekvera båda SQL-frågorna

Nu skapar du ju bara ett par (eller rättare sagt en, som du skriver över) variabler som råkar innehålla en SQL-fråga.

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

## #19 — ptr_lks, 2005-10-23T17:12Z

> **@nders skrev:**
>
> > **@nders skrev:**
> >
> > Du måste exekvera båda SQL-frågorna
>
> .

Fattar inte riktigt hur jag skall exekvera 3 frågor  :(

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

## #20 — @nders, 2005-10-23T17:14Z

Det är bara att göra som när du exekverar en fråga, fast tre gånger... :0

```
strSQL = "UPDATE bueh"
ditt_connectionobjekt.execute strSQL,,128
strSQL = "INSERT bueh"
ditt_connectionobjekt.execute strSQL,,128
strSQL = "DELETE bueh"
ditt_connectionobjekt.execute strSQL,,128
```

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/135918-webbchat  
Nästa sida: https://www.webforum.nu/amne/asp/135918-webbchat/page2.md
