---
title: "Pling vid nytt inlägg"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/60767-pling-vid-nytt-inlägg/page2"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "kaktusen"
published: "2002-11-30T20:35:48.000Z"
updated: "2002-12-01T18:36:57.000Z"
replies: 29
views: 541
page: 2
pages: 2
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/60767-pling-vid-nytt-inlägg"
---

# Pling vid nytt inlägg

_Sida 2 av 2._

## #21 — Jesper T, 2002-12-01T18:02Z

För att få det att funka i flera webläsare så kan du göra som jag:

```
  <SCRIPT LANGUAGE="JavaScript">
var MSIE=navigator.userAgent.indexOf("MSIE");
var NETS=navigator.userAgent.indexOf("Netscape");
var OPER=navigator.userAgent.indexOf("Opera");
if((MSIE>-1) || (OPER>-1)) {
document.write("<BGSOUND SRC=chimes.wav>");
} else {
document.write("<EMBED SRC=chimes.wav AUTOSTART=FALSE ");
document.write("HIDDEN=true VOLUME=127 LOOP=FALSE>");
}
</SCRIPT>
```

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

## #22 — kaktusen, 2002-12-01T18:03Z

Tack Jesper,

men vilken kod ska jag byta mot den texten?

Hela: 
\<% Else If DateDiff("S", RecSet("Datum"), Now()) \< 60 Then Response.Write "\<EMBED src='chimes.wav' autostart=true repeat=false height=0 width=0\>" & vbCrLf 
End If  

Mvh

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

## #23 — Jesper T, 2002-12-01T18:06Z

```
<% Else If DateDiff("S", RecSet("Datum"), Now()) < 60 Then %>
<SCRIPT LANGUAGE="JavaScript">
var MSIE=navigator.userAgent.indexOf("MSIE");
var NETS=navigator.userAgent.indexOf("Netscape");
var OPER=navigator.userAgent.indexOf("Opera");
if((MSIE>-1) || (OPER>-1)) {
document.write("<BGSOUND SRC=chimes.wav>");
} else {
document.write("<EMBED SRC=chimes.wav AUTOSTART=FALSE ");
document.write("HIDDEN=true VOLUME=127 LOOP=FALSE>");
}
</SCRIPT>
<%End If%>
```

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

## #24 — kaktusen, 2002-12-01T18:08Z

hmm nu fungerar det...men ljudet hörs varje gång sidan laddas om :(

Har följande kod & ser inget fel på den:

\<!-- #include file="settings.asp" --\> 

\<html\> 

\<head\> 
\</head\> 

\<body\> 
\<% Session.LCID = 1053 %\> 
\<% 
If Session("inloggad") \<\> "OK" Then 
Response.Redirect "login.html" 
End If 
%\> 

\<META HTTP-EQUIV="REFRESH" CONTENT="60;URL=nyheter.asp"\> 

\<% 
Set Connect = Server.CreateObject("ADODB.Connection") 
Connect.Open ="Provider = Microsoft.Jet.OLEDB.4.0; Data Source = " & db 

Oppna = "Select \* From Nyheter Order By ID Desc" 

Set RecSet = Connect.Execute(Oppna) 

If RecSet.EOF Then %\> 
\<table width="470" cellpadding="0" cellspacing="0" border="0"\> 
\<tr\> 
\<td width="470" align="center"\>\<strong\>Inga nyheter är inlagda!\</strong\>\</td\> 
\</tr\> 
\</table\> 
\<% Else If DateDiff("S", RecSet("Datum"), Now()) \< 60 Then Response.Write "\<EMBED src='chimes.wav' autostart=true repeat=false height=0 width=0\>" & vbCrLf End If %\> 

\<table width="470" cellpadding="0" cellspacing="0" border="0"\> 
\<tr\> 
\<td width="470" align="left"\>\<strong\>\</strong\>\</td\> 
\</tr\> 
\</table\> 
\<br\> 
\<% 
Z = 0 
Do Until Z = 30 or RecSet.EOF %\> 
\<table width="470" cellpadding="0" cellspacing="0" border="0"\> 
\<tr\> 
\<td width="470" align="left"\>\<b\>\<font size="2" color="#0000FF"\>\<%=RecSet("Rubrik")%\>\</b\> \| \<%=FormatDateTime(RecSet("Datum"),0)%\>\</td\>\</font\> 
\</tr\> 
\<tr\> 
\<td colspan="1"\>\<%=RecSet("Nyhet")%\>\</td\> 
\</tr\>\<hr\> 
\</table\> 
\<br\> 
\<% 
Z = Z--1 
RecSet.MoveNext 
Loop 
RecSet.Close 
Set RecSet = Nothing 
End If 
%\> 

\</body\>

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

## #25 — Jesper T, 2002-12-01T18:08Z

Eller detta kanske är snyggare:

```
 Else If DateDiff("S", RecSet("Datum"), Now()) < 60 Then
Response.write"<SCRIPT LANGUAGE=""JavaScript"">" & vbcrlf & _ 
"var MSIE=navigator.userAgent.indexOf(""MSIE"");" & vbcrlf & _ 
"var NETS=navigator.userAgent.indexOf(""Netscape"");" & vbcrlf & _ 
"var OPER=navigator.userAgent.indexOf(""Opera"");" & vbcrlf & _ 
"if((MSIE>-1) || (OPER>-1)) {" & vbcrlf & _ 
"document.write(""<BGSOUND SRC=chimes.wav>"");" & vbcrlf & _ 
"} else {" & vbcrlf & _ 
"document.write(""<EMBED SRC=chimes.wav AUTOSTART=FALSE "");" & vbcrlf & _ 
"document.write(""HIDDEN=true VOLUME=127 LOOP=FALSE>"");" & vbcrlf & _ 
"}" & vbcrlf & _ 
"</SCRIPT>"  
end if
```

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

## #26 — Jesper T, 2002-12-01T18:11Z

Var snäll och använd \[ kod \]-taggarna.
Du får väl sätta en kaka eller något som gör att verderbörande endast hör detta en gång. Annars så är det väl ganska bra att den meddelar detta ända tills man vittjat sin inbox?!

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

## #27 — kaktusen, 2002-12-01T18:12Z

Nu fungerar allt:) 

tusen tack till er alla

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

## #28 — kaktusen, 2002-12-01T18:13Z

en fråga:

I vilka webbläsare fungera detta inte i?

ska jag köra Jespers kod för att det ska fungera i alla?

Mvh

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

## #29 — Jesper T, 2002-12-01T18:14Z

I 95,5% av alla skulle jag tippa på. :)

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

## #30 — kaktusen, 2002-12-01T18:36Z

Tack så mycket!

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/60767-pling-vid-nytt-inlägg/page2  
Föregående sida: https://www.webforum.nu/amne/asp/60767-pling-vid-nytt-inlägg.md