vad är felet?
fel på:
/Default.asp, line 405
<%
Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("scripts/linkadder/addlank.mdb")&";"
Set RecSet = Server.CreateObject("ADODB.Recordset")
Addera = "SELECT * FROM lankar ORDER BY datum DESC"
RecSet.Open Addera, Connect, adOpenStatic, adLockOptimistic
%>
<%
on error resume next
u_input=request.querystring("rosta") %>
<% set fso = createobject("scripting.filesystemobject")
%>
<%
g_selected="rosta.txt"
set act = fso.opentextfile(server.mappath(g_selected))
counter_a = clng(act.readline)
%>
<%
g_selected="rostb.txt"
set act = fso.opentextfile(server.mappath(g_selected))
counter_b = clng(act.readline)
%>
<% total=counter_a+counter_b %>
<SCRIPT language=JavaScript1.2>
<!--
if (window.Event)
document.captureEvents(Event.MOUSEUP);
function nocontextmenu()
{
event.cancelBubble = true
event.returnValue = false;
return false;
}
function norightclick(e)
{
if (window.Event)
{
if (e.which == 2 || e.which == 3)
return false;
}
else
if (event.button == 2 || event.button == 3)
{
event.cancelBubble = true
event.returnValue = false;
return false;
}
}
document.oncontextmenu = nocontextmenu;
document.onmousedown = norightclick;
//-->
</SCRIPT>
<SCRIPT language=JavaScript type=text/javascript>
<!--
function fixUglyIE()
{
for (a in document.links) document.links[a].onfocus = document.links[a].blur;
}
if (document.all)
{
document.onmousedown = fixUglyIE;
}
// -->
</SCRIPT>
<HTML>
<HEAD>
<TITLE>P L A N K A</TITLE>
<META http-equiv=Content-Type content="text/html; charset=windows-1252">
<STYLE type=text/css>A.nav {
COLOR: #000000; TEXT-DECORATION: none
}
A.nav:hover {
COLOR: #000000; TEXT-DECORATION: underline
}
A.nav:active {
COLOR: #000000; TEXT-DECORATION: underline
}
BODY {
FONT-SIZE: 8pt; FONT-STYLE: normal; FONT-FAMILY: Verdana, Arial, Helvetica, sans-serif
}
TD {
FONT-SIZE: 8pt; FONT-STYLE: normal; FONT-FAMILY: Verdana, Arial, Helvetica, sans-serif
}
</STYLE>
<SCRIPT language=JavaScript>
<!--
// jsukqkkat
var timerID = null;
var timerRunning = false;
b1on = new Image;
b1on.src = "Bilder/Startsidan_2.gif";
b1off = new Image;
b1off.src = "Bilder/Startsidan_1.gif";
b2on = new Image;
b2on.src = "Bilder/Nyheter_2.gif";
b2off = new Image;
b2off.src = "Bilder/Nyheter_1.gif";
b3on = new Image;
b3on.src = "Bilder/Gastboken_2.gif";
b3off = new Image;
b3off.src = "Bilder/Gastboken_1.gif";
b4on = new Image;
b4on.src = "Bilder/Ladda_ner_2.gif";
b4off = new Image;
b4off.src = "Bilder/Ladda_ner_1.gif";
b5on = new Image;
b5on.src = "Bilder/Fotoalbum_2.gif";
b5off = new Image;
b5off.src = "Bilder/Fotoalbum_1.gif";
b6on = new Image;
b6on.src = "Bilder/Dagbok_2.gif";
b6off = new Image;
b6off.src = "Bilder/Dagbok_1.gif";
b7on = new Image;
b7on.src = "Bilder/Chat_2.gif";
b7off = new Image;
b7off.src = "Bilder/Chat_1.gif";
b8on = new Image;
b8on.src = "Bilder/Forum_2.gif";
b8off = new Image;
b8off.src = "Bilder/Forum_1.gif";
b9on = new Image;
b9on.src = "Bilder/Info_2.gif";
b9off = new Image;
b9off.src = "Bilder/Info_1.gif";
b10on = new Image;
b10on.src = "Bilder/Kontakt_2.gif";
b10off = new Image;
b10off.src = "Bilder/Kontakt_1.gif";
function img_act(imgName){
imgOn = eval(imgName + "on.src");
document [imgName].src = imgOn;}
function img_inact(imgName){
imgOff = eval(imgName + "off.src");
document [imgName].src = imgOff;}
// -->
</SCRIPT>
<META content="Microsoft FrontPage 4.0" name=GENERATOR></HEAD>
<BODY vLink=#000000 aLink=#808080 link=#000000 bgColor=#c0c0c0 onselectstart="return false" >
<BR>
<DIV align=center>
<TABLE cellSpacing=0 cellPadding=0 width=589 border=0 height="53">
<TBODY>
<TR>
<TD align=left height="41" width="173"><img border="0" src="Bilder/Logo.gif"></TD>
<TD align=left height="41" width="395">
<p align="right"> <br>
<font size="1" face="Verdana"><br>
<font color="#666666">
V.1.0</font></font></TD>
<TD align=left height="41" width="17">
</TD></TR>
<TR>
<TD align=left height="12" colspan="3" width="587">
<p align="left"><img border="0" src="Bilder/Logo2.gif"></p>
</TD></TR></TBODY></TABLE>
<TABLE cellSpacing=0 cellPadding=0 border=0>
<TBODY>
<TR>
<TD vAlign=top>
<table border="0" width="100%" height="66" cellspacing="0" cellpadding="0">
<tr>
<td width="100%" height="60">
<font face="Verdana" size="1">
<TABLE cellSpacing=0 cellPadding=0 width=120 bgColor=#d2d2d2 border=0>
<TR>
<TD colSpan=2><IMG
src="Bilder/Logo3.gif"
border=0></TD></TR>
<TR>
<TD width=15><IMG height=15
src="Bilder/Startsidan_1.gif" border=0 name=b1></TD>
<TD width=105><FONT face=Verdana size=1><B> <A class=nav
onmouseover="img_act('b1');" onmouseout="img_inact('b1');"
href="default.asp">Startsidan</A></B></FONT></TD></TR>
<TR>
<TD colSpan=2><IMG
src="Bilder/Bryt_Kort.gif" border=0></TD></TR>
<TR>
<TD width=15><IMG height=15
src="Bilder/Nyheter_1.gif" border=0 name=b2></TD>
<TD width=105><FONT face=Verdana size=1><B> <a class="nav" onmouseover="img_act('b2');" onmouseout="img_inact('b2');" href="nyheter/">Nyheter</a></B></FONT></TD></TR>
<TR>
<TD colSpan=2><IMG
src="Bilder/Bryt_Lang.gif"
border=0></TD></TR>
<TR>
<TD width=15><IMG height=15
src="Bilder/Gastboken_1.gif" border=0
name=b3></TD>
<TD width=105><FONT face=Verdana size=1><B> <a class="nav" onmouseover="img_act('b3');" onmouseout="img_inact('b3');" href="gastboken/">Gästboken</a></B></FONT></TD></TR>
<TR>
<TD colSpan=2><IMG
src="Bilder/Bryt_Kort.gif" border=0></TD></TR>
<TR>
<TD width=15><IMG
src="Bilder/Ladda_ner_1.gif" border=0
name=b4></TD>
<TD width=105><FONT face=Verdana size=1><B> <a class="nav" onmouseover="img_act('b4');" onmouseout="img_inact('b4');" href="laddaner/">Ladda
ner</a></B></FONT></TD></TR>
<TR>
<TD colSpan=2><IMG
src="Bilder/Bryt_Kort.gif" border=0></TD></TR>
<TR>
<TD width=15><IMG height=15
src="Bilder/Fotoalbum_1.gif" border=0 name=b5></TD>
<TD width=105><FONT face=Verdana size=1><B> <a class="nav" onmouseover="img_act('b5');" onmouseout="img_inact('b5');" href="fotoalbum/">Fotoalbum</a></B></FONT></TD></TR>
<TR>
<TD colSpan=2><IMG
src="Bilder/Bryt_Lang.gif"
border=0></TD></TR>
<TR>
<TD width=15><IMG height=15
src="Bilder/Dagbok_1.gif" border=0 name=b6></TD>
<TD width=105><FONT face=Verdana size=1><B> <a class="nav" onmouseover="img_act('b6');" onmouseout="img_inact('b6');" href="dagbok/">Dagbok</a></B></FONT></TD></TR>
<TR>
<TD colSpan=2><IMG
src="Bilder/Bryt_Kort.gif" border=0></TD></TR>
<TR>
<TD width=15><IMG height=15
src="Bilder/Chat_1.gif" border=0 name=b7></TD>
<TD width=105><FONT face=Verdana size=1><B> <a class="nav" onmouseover="img_act('b7');" onmouseout="img_inact('b7');" href="chat/">Chatt</a></B></FONT></TD></TR>
<TR>
<TD colSpan=2><IMG
src="Bilder/Bryt_Kort.gif" border=0></TD></TR>
<tr>
<TD width=15><IMG height=15
src="Bilder/Forum_1.gif" border=0 name=b8></TD>
<TD width=105><FONT face=Verdana size=1><B> <a class="nav" onmouseover="img_act('b8');" onmouseout="img_inact('b8');" href="forum/">Webforum</a></B></FONT></TD>
</tr>
<tr>
<TD colSpan=2><IMG src="Bilder/Bryt_Lang.gif" border=0></TD>
</tr>
<tr>
<TD width=15><IMG height=15
src="Bilder/Info_1.gif" border=0 name=b9></TD>
<TD width=105><FONT face=Verdana size=1><B> <a class="nav" onmouseover="img_act('b9');" onmouseout="img_inact('b9');" href="info/">Info om mig</a></B></FONT></TD>
</tr>
<tr>
<TD colSpan=2><IMG
src="Bilder/Bryt_Kort.gif" border=0></TD>
</tr>
<TR>
<TD width=15><IMG height=15
src="Bilder/Kontakt_1.gif" border=0 name=b10></TD>
<TD width=105 height=15><FONT face=Verdana size=1><B> <a class="nav" onmouseover="img_act('b10');" onmouseout="img_inact('b10');" href="kontakt/">Kontakta
mig</a></B></FONT></TD></TR>
<TR>
<TD colSpan=2><IMG
src="Bilder/Bryt_Lang_Ner.gif"
border=0></TD></TR></TABLE>
<p align="right">
<b>
<br>
<!--#include file="counter.asp"--></b></font>
</td>
</tr>
</table>
</TD>
<TD vAlign=top width=469>
<TABLE height=280 cellSpacing=0 cellPadding=0 width=366 bgColor=#000000
border=0>
<TBODY>
<TR vAlign=top>
<TD width="462">
<TABLE height=280 cellSpacing=1 cellPadding=0 width="334"
border=0><TBODY>
<TR vAlign=top bgColor=#e2e2e2>
<TD width="458">
<TABLE cellSpacing=5 cellPadding=5 width="100%" border=0>
<TBODY>
<TR vAlign=top>
<TD>
<table border="0" width="100%" cellspacing="0" cellpadding="0">
<tr>
<td width="32%"><font face="Verdana"><b>Välkommen! </b><font size="1"><b><font color="#666666" size="1" face="Verdana"><br>
----------------</font></b></font></font></td>
<td width="68%">
<p align="right"><font face="Verdana"><b><font size="1"><a href="Javascript:alert('Admin under konstruktion....')"><img border="0" onFocus()="blur()" src="Bilder/Admin.gif" alt="Redigera startsidan" width="15" height="15"><br>
</a></font></b></font></td>
</tr>
</table>
<font face="Verdana">
Hjärtligt välkommen till
min ny startade webbsida.<br>
Jag hoppas ni gillar sidan skriv gärna i min gästbok.<br>
Sidan är under konstruktion.<br>
<br>
</font>
<table border="0" width="432" cellspacing="0" cellpadding="0" height="1">
<tr>
<td width="166" height="28">
<b><font face="Verdana">Veckans omröstning<br>
<font color="#666666" size="1" face="Verdana">--------------------------</font></font></b>
</td>
<td width="262" height="28"><b><font face="Verdana">Besökarnas länkar<br>
<font color="#666666" size="1" face="Verdana">------------------------</font></font></b></td>
</tr>
<tr>
<td width="166" height="1">
<b>
<font face="Verdana" size="1">Är du
kär i nån?</font>
\<table border="0" width="104%"\>
\<tr\>
\<td width="25%"\>
\<font face="Verdana"\>
\<b\>
\<font size="1"\>\<img border="0" src="Bilder/Pil.gif"\>
\</font\>\</b\>\<font size="1"\>\<a href="rostat.asp?rosta=a"\>Ja\</a\>\</font\>
\</font\>
\</td\>
\<td width="75%"\>
\<font face="Verdana"\>
\<b\>
\<font size="1"\>
\<img src="Bilder/poll_rod.jpg" height="5" width="\<%= (counter_a/total)\*100 %\>" border="1"\>
\</font\>
\</b\>\</font\>
\</b\>
\<font face="Verdana" size="1"\>
\<%= formatnumber((counter_a/total)\*100,0) %\>%\</font\>
\</td\>
\</tr\>
\<b\>
\<tr\>
\<td width="25%"\>
\<font face="Verdana"\>
\<b\>
\<font size="1"\>\<img border="0" src="Bilder/Pil.gif"\>\</font\>\</b\>\<font size="1"\>
\<a href="rostat.asp?rosta=b"\>Nej\</a\>\</font\>\</font\>\</td\>
\<td width="75%"\>
\<font face="Verdana" size="1"\>\<img src="Bilder/poll_bla.jpg" height="5" width="\<%= (counter_b/total)\*100 %\>" border="1"\>
\</font\>
\</b\>
\<font face="Verdana" size="1"\>\<%= formatnumber((counter_b/total)\*100,0) %\>
%\</font\>
\</td\>
\</tr\>
\<b\>
\<tr\>
\<td width="100%" colspan="2"\>
\<font face="Verdana"\>
\<b\>
\<font size="1"\>\<font color="#666666"\>--------------------------\</font\>\<br\>
\</font\>\</b\>\</font\>
\</b\>
\<font face="Verdana"\>\<font face="Verdana" size="1"\>Antal röster:
\<%= total %\>\<br\>
\<img border="0" src="Bilder/Pil.gif"\>
Tidigare fråga\</font\>\</font\>\</td\>
\</tr\>
\</table\>
\</td\>
\<td width="262" height="1"\>
<Table width=150 border=0 cellpadding="0">
\<tr\>
\<td width="150"\>\<b\>\<font face="Verdana" size="1"\>\<img border="0" src="Bilder/Pil.gif"\>
\</font\>
\</b\>\<font size="1" face="Verdana, Arial, Helvetica, sans-serif" color="#FFFFFF"\>
\<a href=" \<%=RecSet("http")%\> " target="\_blank"\>\<%=RecSet("lank")%\>\</a\>
\</font\>\</td\>
\</tr\>
<%
RecSet.MoveNext
Next
RecSet.Close
Connect.Close
%>
</table>
<table border="0" cellspacing="1">
<tr>
<td>
<p align="left">
<font size="1" face="Verdana, Arial, Helvetica, sans-serif" color="#000000">-------------------------<br>
</font><font face="Verdana" size="1"><img border="0" src="Bilder/Pil.gif"> </font><font size="1" face="Verdana, Arial, Helvetica, sans-serif" color="#000000"><a href="#" onClick="centerpopup('Scripts/Linkadder/addlank.asp',192,216); return false;">Lägg
till länk</a><br>
</font><font face="Verdana" size="1"><img border="0" src="Bilder/Pil.gif"> </font><font size="1" face="Verdana, Arial, Helvetica, sans-serif" color="#000000">Visa
alla länkar</font>
</p>
</td>
</tr>
</table>
<p><br>
</td>
</tr>
</table>
<p><br>
<br>
</TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE>
<DIV align=center><font color="#666666">© 2001 Josef Kalkan </font><IMG src="Bilder/Gra.gif" width="1" height="23">
</DIV></TD></TR></TBODY></TABLE></DIV>
</BODY></HTML>