Re: Nedtellingsscript [
Besvar ]
Av: Øyvind A. IsaksenIkke testet, men gir deg kanskje en ide om hvordan det kan gjøres:
<%
dim Kobling, Utvalg, mittObjekt, tid
Kobling = "Provider=SQLOLEDB; Data Source=NavnPåServer; Database=NavnPåDatabase; UID=BrukernavnPåDatabase; PWD=PassordPåDatabase;"
Utvalg= "Select * from tabellnavn where [kriterie]"
set mittObjekt = server.CreateObject("ADODB.Recordset")
mittObjekt.Open Utvalg,Kobling
do while Not mittObjekt.EOF
tid = mittObjekt.Fields("NavnPåKolonne"))
mittObjekt.MoveNext
Loop
mittObjekt.Close
set mittObjekt=nothing
%>
<html>
<head>
<title>Javascript nedtellingsklokke / countdown clock</title>
</head>
<body>
<!--6/4-09 kl.10:00-->
<script type="text/javascript">
TargetDate = '<%= tid%>';
ForeColor = "white";
CountActive = true;
CountStepper = -1;
LeadingZero = true;
DisplayFormat = "%%D%% %%H%% %%M%% %%S%%";
FinishMessage = "Nedtellingen er ferdig!";
</script>
<script type="text/javascript" src="countdownclock.js"></script>
</body>
</html>