29 svar · 519 visningar · startad av kaktusen · sida 2 av 2
Hej, Jag har en gästbok/nyhetsforum. Och då jag skriver ett inlägg så vill jag att man ska höra ett ljud el. ett pling. Hur gör jag det? Såhär ser koden för själva gästboksidan ut: \<!-- #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=
Läs frågan i sin helhet →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>
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
<% 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%>
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>
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
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?!
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
I 95,5% av alla skulle jag tippa på. :)
Tack så mycket!