Fejltype:
ADODB.Field (0x80020009)
Enten er BOF eller EOF sand, eller den aktuelle post er blevet slettet. Den anmodede handling kræver en aktuel post.
/test/fiskebasen/banner.asp
Fejler med ovenstående.
Men egentlig er session("UserID") jo tomt i det øjeblik hvor den leder efter brugernavnet ik ? sql-kaldet bør jo kun udføres efter man er logget ind og session("UserID") er udfyldt ik ? Hvordan gør man det ?
Hele koden kan ses her :
<!-- #include file="db.inc" -->
<%
sql = "SELECT count(id_no) as antal FROM brugerdata"
set rscount = dbc.Execute(sql)
antal = rscount("antal")
set rscount = nothing
sql = "SELECT admin FROM brugerdata where brugernavn= '" & session("UserID") & "'"
set rs = dbc.Execute(sql)
%>
<html>
<head>
<meta http-equiv="Content-Language" content="da">
<meta name="GENERATOR" content="Microsoft FrontPage 6.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<meta http-equiv="Content-Type" content="text/html; charset=windows-1252">
<title>Forside</title>
<link rel="stylesheet" type="text/css" href="bannerstyle.css">
<meta http-equiv="Cache-Control" content="no-store">
<meta http-equiv="Pragma" content="no-cache">
</head>
<body bgcolor="#E8E8E8">
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" width="100%">
<tr>
<td class="menutekst">
<hr>Brugerinfo:<hr>
<%
'If IsEmpty(Session("userID")) Then
' Response.Write("Du er ikke logget ind")
' Response.Write("<br><a target='indhold' href='bruger/asp/logadmin.asp'>Login</a>")
' else
' Response.Write("Du er logget ind som: ")
' Response.Write(Session("userID"))
' Response.Write("<hr>Dine muligheder:<hr>")
' Response.Write("<a target='indhold' href='nyheder/html/indtast_nyhed.asp'>Opret nyhed</a>")
' Response.Write("<br><a target='indhold' href='fangstrapporter/html/indtastrap.asp'>Opret fangstrapport</a>")
' Response.Write("<br><a target='indhold' href='artikler/html/indtast_artikel.asp'>Opret artikel</a>")
' Response.Write("<br><a target='indhold' href='fiskeberetninger/html/indtast_beretning.asp'>Opret fiskeberetning</a>")
' Response.Write("<br><a target='indhold' href='bruger/asp/logoff.asp'>Logoff</a>")
'End If
%>
<%
If IsEmpty(Session("userID")) Then
Response.Write("Du er ikke logget ind")
Response.Write("<br><a target='indhold' href='bruger/asp/logadmin.asp'>Login</a>")
else
Response.Write("Du er logget ind som: ")
Response.Write(Session("userID"))
Response.Write("<hr>Dine muligheder:<hr>")
Response.Write("<a target='indhold' href='nyheder/html/indtast_nyhed.asp'>Opret nyhed</a>")
Response.Write("<br><a target='indhold' href='fangstrapporter/html/indtastrap.asp'>Opret fangstrapport</a>")
Response.Write("<br><a target='indhold' href='artikler/html/indtast_artikel.asp'>Opret artikel</a>")
Response.Write("<br><a target='indhold' href='fiskeberetninger/html/indtast_beretning.asp'>Opret fiskeberetning</a>")
Response.Write("<br><a target='indhold' href='bruger/asp/logoff.asp'>Logoff</a>")
if rs("admin") = true then
Response.Write("<hr>Admin muligheder:<hr>")
Response.Write("<a target='indhold' href='bruger/asp/logoff.asp'>Slet fiskeberetning</a>")
Response.Write("<br><a target='indhold' href='bruger/asp/logoff.asp'>Slet bruger</a>")
Response.Write("<br><a target='indhold' href='bruger/asp/logoff.asp'>Slet artikel</a>")
Response.Write("<br><a target='indhold' href='bruger/asp/logoff.asp'>Slet fangstrapport</a>")
end if
end if
%>
<hr>Status:<hr>
<%=rs("admin")%>
Oprettet brugere:<%=antal%><br>
Online brugere:<% = Application("ActiveUsers") %>
</td>
</tr>
<tr>
<td class="brodtekst">
<hr size="1">
<object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000"
codebase="
http://active.macromedia.com/flash4/cabs/swflash.cab#version=4,0,0,0"
id="Movie1" width="130" height="60">
<param name="movie" value="Movie1.swf">
<param name="quality" value="high">
<param name="bgcolor" value="#C4DBF4">
<embed name="Movie1" src="Movie1.swf" quality="high" bgcolor="#C4DBF4"
width="130" height="60"
type="application/x-shockwave-flash"
pluginspage="
http://www.macromedia.com/shockwave/download/index.cgi?P1_Prod_Version=ShockwaveFlash"> </embed>
</object>
</td>
</tr>
<tr>
<td class="brodtekst">
<hr size="1">
<object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000"
codebase="
http://active.macromedia.com/flash4/cabs/swflash.cab#version=4,0,0,0"
id="Movie1" width="130" height="60">
<param name="movie" value="Movie1.swf">
<param name="quality" value="high">
<param name="bgcolor" value="#C4DBF4">
<embed name="Movie1" src="Movie1.swf" quality="high" bgcolor="#C4DBF4"
width="130" height="60"
type="application/x-shockwave-flash"
pluginspage="
http://www.macromedia.com/shockwave/download/index.cgi?P1_Prod_Version=ShockwaveFlash"> </embed>
</object>
</td>
</tr>
<tr>
<td class="brodtekst">
<hr size="1">
<object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000"
codebase="
http://active.macromedia.com/flash4/cabs/swflash.cab#version=4,0,0,0"
id="Movie1" width="130" height="60">
<param name="movie" value="Movie1.swf">
<param name="quality" value="high">
<param name="bgcolor" value="#C4DBF4">
<embed name="Movie1" src="Movie1.swf" quality="high" bgcolor="#C4DBF4"
width="130" height="60"
type="application/x-shockwave-flash"
pluginspage="
http://www.macromedia.com/shockwave/download/index.cgi?P1_Prod_Version=ShockwaveFlash"> </embed>
</object>
</td>
</tr>
<tr>
<td class="brodtekst">
<hr size="1">
<object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000"
codebase="
http://active.macromedia.com/flash4/cabs/swflash.cab#version=4,0,0,0"
id="Movie1" width="130" height="60">
<param name="movie" value="Movie1.swf">
<param name="quality" value="high">
<param name="bgcolor" value="#C4DBF4">
<embed name="Movie1" src="Movie1.swf" quality="high" bgcolor="#C4DBF4"
width="130" height="60"
type="application/x-shockwave-flash"
pluginspage="
http://www.macromedia.com/shockwave/download/index.cgi?P1_Prod_Version=ShockwaveFlash"> </embed>
</object>
</td>
</tr>
<tr>
<td class="brodtekst">
<hr size="1">
<object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000"
codebase="
http://active.macromedia.com/flash4/cabs/swflash.cab#version=4,0,0,0"
id="Movie1" width="130" height="60">
<param name="movie" value="Movie1.swf">
<param name="quality" value="high">
<param name="bgcolor" value="#C4DBF4">
<embed name="Movie1" src="Movie1.swf" quality="high" bgcolor="#C4DBF4"
width="130" height="60"
type="application/x-shockwave-flash"
pluginspage="
http://www.macromedia.com/shockwave/download/index.cgi?P1_Prod_Version=ShockwaveFlash"> </embed>
</object>
</td>
</tr>
<tr>
<td class="brodtekst">
<hr size="1">
<script language="JavaScript">
//configure refresh interval (in seconds)
var countDownInterval=180;
//configure width of displayed text, in px (applicable only in NS4)
var c_reloadwidth=200
</script>
<ilayer id="c_reload" width=&{c_reloadwidth}; ><layer id="c_reload2" width=&{c_reloadwidth}; left=0 top=0></layer></ilayer>
<script>
var countDownTime=countDownInterval+1;
function countDown(){
countDownTime--;
if (countDownTime <=0){
countDownTime=countDownInterval;
clearTimeout(counter)
window.location.reload()
return
}
if (document.all) //if IE 4+
document.all.countDownText.innerText = countDownTime+" ";
else if (document.getElementById) //else if NS6+
document.getElementById("countDownText").innerHTML=countDownTime+" "
else if (document.layers){
document.c_reload.document.c_reload2.document.write('Next <a href="java script:window.location.reload()">refresh</a> in <id="countDownText">'+countDownTime+' seconds')
document.c_reload.document.c_reload2.document.close()
}
counter=setTimeout("countDown()", 1000);
}
function startit(){
if (document.all||document.getElementById)
document.write('<align="right"><font color="#5B5B5B">Online users opdateres om <b id="countDownText">'+countDownTime+' </b> sek. </font>')
countDown()
}
if (document.all||document.getElementById)
startit()
else
window.onload=startit
</script><hr size="1">
</td>
</tr>
<tr>
<td class="menutekst" align=center>
Bannerplads? Mail her:<br>
<a href="mailto:banner@fiskebasen.dk">banner@fiskebasen.dk</a>
</td>
</tr>
</table>
</body>
</html>
