Fejl i TAGWALL
Hvorfor får jeg følgenden fejl:Microsoft OLE DB Provider for ODBC Drivers error '80040e37'
[Microsoft][ODBC Microsoft Access Driver] The Microsoft Jet database engine cannot find the input table or query 'tagwall'. Make sure it exists and that its name is spelled correctly.
/tagwall/index.asp, line 218
...På denne side:
<%@ Language=VBScript %>
<%
Option Explicit
Dim ConnDB, RS, nick, email, besked
Set ConnDB = Server.CreateObject("ADODB.Connection")
ConnDB.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & server.MapPath("db\database.mdb")
'Fjerner evt mellemrum i start og slut af input
nick = Trim(Request.Form("nick"))
email = Trim(Request.Form("email"))
besked = Trim(Request.Form("besked"))
'-----------------------------------------------------------
IF (len(nick) <> 0) or len(email) <> 0 or len(besked) <> 0 Then
'Der er indsendt data
IF (len(nick) <> 0) ANd len(email) <> 0 AND len(besked) <> 0 Then
IF ConnDB.Execute ("SELECT * FROM tagwall WHERE nick='" & nick & "' AND email='" & email & "' AND besked='" & besked & "'").EOF Then
ConnDB.execute "INSERT INTO tagwall (nick,email,dato,besked) VALUES ('" & nick & "','" & email & "','" & Now() & "','" & besked & "')"
Response.Redirect "index.asp"
ELSE
StartOfPage
InputForm
%><SPAN CLASS="almText">Du har allerede oprettet denne besked</SPAN><P>
<%
tagwall
EndOfPage
End if
ELSE
'Alle felter er ikke udfyldt
StartOfPage
InputForm
%><SPAN CLASS="almText">Du mangler at udfylde nogle af felterne mester!!</SPAN><P>
<%
tagwall
EndOfPage
End if
Else
StartOfPage
InputForm
tagwall
EndOfPage
End if
'-----------------------------------------------------------
sub StartOfPage
%>
<html>
<head>
<SCRIPT LANGUAGE="JAVASCRIPT">
<!--
function open_window(url,sizeX,sizeY) {
mywin = window.open(url,'smileyWin','toolbar=0,location=0,directories=0,status=0,menubar=0,scrollbars=0,resizable=0,width=' + sizeX +',height='+ sizeY + '');
}
-->
</SCRIPT>
<STYLE>
.almText{
FONT-FAMILY: Verdana;
FONT-SIZE: 12;
}
A.link1{
FONT-FAMILY: Verdana;
FONT-SIZE: 10;
color: #ffffff;
TEXT-DECORATION: none;
}
.FlatButton{
font-family: Verdana;
font-size: 10;
background-color: #ffffff;
border: 1px solid;
border-color: #000000;
}
.FlatInput{
font-family: Verdana;
font-size: 10;
background-color: #FFFFFF;
border: #000000;
border-style: solid;
border-top-width: 1px;
border-right-width: 1px;
border-bottom-width: 1px;
border-left-width: 1px;
}
.WhiteButton{
font-family: Verdana;
font-size: 10;
background-color: #FFFFFF;
border: 0px solid;
border-color: #FFFFFF;
}
</STYLE>
<title>SOD - Shadow of Darkness</title>
</head>
<body bgcolor="#000000" text="#CCCCCC" marginheight="0" topmargin="0" marginwidth="0" leftmargin="0" link="#CCCCCC" vlink="#CCCCCC" alink="#CCCCCC" background="images/background.jpg" bgproperties="fixed">
<table width="770" border="0" cellspacing="0" cellpadding="0">
<tr valign="bottom"><td colspan="3">
<table width="770" border="0" background="/images/newtop.jpg" cellpadding="0" cellspacing="0">
<tr>
<td height="130" valign="bottom" background="/images/newtop.jpg">
<div align="center"></div></center></td></tr></table></td></tr><tr valign="top">
<td width="122" background="/images/vlinel.gif" height="396">
<table width="103" border="0" cellspacing="0" cellpadding="0">
<tr>
<td><a href="/default.htm"><img src="/images/sub1.gif" width="122" height="19" border="0"></a></td>
</tr>
<tr>
<td><a href="/medlemmer.htm"><img src="/images/sub2.gif" width="122" height="19" border="0"></a></td>
</tr>
<tr>
<td><a href="/clanwars.htm"><img src="/images/sub3.gif" width="122" height="19" border="0"></a></td>
</tr>
<tr>
<td><a href="/screenshots.htm"><img src="/images/sub4.gif" width="122" height="19" border="0"></a></td>
</tr>
<tr>
<td><a href="/downloads.htm"><img src="/images/sub5.gif" width="122" height="19" border="0"></a></td>
</tr>
<tr>
<td><a href="/tagwall.htm"><img src="/images/sub6.gif" width="122" height="19" border="0"></a></td>
</tr>
<tr>
<td><a href="/links.htm"><img src="/images/sub7.gif" width="122" height="19" border="0"></a></td>
</tr>
<tr>
<td><a href="/kontakt.htm"><img src="/images/sub8.gif" width="122" height="19" border="0"></a></td>
</tr>
</table></td>
<td width="629" bgcolor="#22252C" height="396">
<table width="629" border="0" cellpadding="0" cellspacing="0" height="394">
<tr>
<td height="213" valign="top" colspan="2" width="627">
<table border="0" cellpadding="0" cellspacing="0" width="627">
<tr>
<td height="10"></td>
</tr>
</table><font face="Verdana" size="2">
<table border="0" cellpadding="4" cellspacing="0" width="627">
<tr>
<td width="427" bgcolor="#333333" style="border: 1 solid #000000">
<p style="margin-left: 5"><font face="MS Sans Serif" size="2" color="#FFFFFF"><b>Tagwall</font></p>
</td>
<td width="200"></td>
</tr>
<tr>
<td width="427" style="border: 1 solid #000000" background="/images/bgnews.gif"><font face="Verdana" size="2">
<%
end sub
'-----------------------------------------------------------
sub EndOfPage
%>
<table border="0" cellpadding="0" cellspacing="0" width="627">
<tr>
<td height="10"></td>
</tr>
</table>
</td>
</tr>
</table>
</td>
<td width="19" background="/images/vliner.gif" height="396"> </td>
</tr>
<tr valign="top">
<td colspan="3" height="35"><img src="/images/bottom.gif" width="770" height="33"></td>
</tr>
<tr valign="top">
<td colspan="3"></td>
</tr>
</table><br>
</body>
</html>
<%
end sub
'-----------------------------------------------------------
sub InputForm
%>
<a name="top">
<FORM action="index.asp" METHOD="post" NAME="tagwall"><BR>
<TABLE border=0 cellPadding=0 cellSpacing=0>
<TR>
<TD CLASS="almtext">Navn</TD>
<TD><INPUT TYPE="text" name="nick" SIZE="22" CLASS="Flatinput" VALUE="<%=nick%>"></TD>
</TR>
<TR>
<TD CLASS="almtext">E-mail </TD>
<TD><INPUT TYPE="text" name="email" SIZE="22" MAXLENGTH="35" CLASS="FlatInput" VALUE="<%=email%>"></TD>
</TR>
<TR>
<TD CLASS="almtext">Besked </TD>
<TD><TEXTAREA TYPE="text" name="besked" SIZE="20" CLASS="FlatInput" rows="8" cols="22" onkeyup="this.form.nedtael.value=250-this.value.length"></TEXTAREA><br> <font face="Verdana" size="1"> Du har <INPUT TYPE="text" SIZE="2" CLASS="WhiteButton" name="nedtael" value="250"> tegn tilbage</TD>
</TR>
<TR>
<TD CLASS="almtext"> </TD>
<TD><INPUT TYPE="submit" VALUE="Skriv" CLASS="FlatButton" id=submit1 name=submit1> [ <A href="java script:open_window('smiley.htm','375','285');" CLASS="link1">Brug af smiley</A> ]</TD>
</TR>
</TABLE>
</FORM>
<%
end sub
'-----------------------------------------------------------
sub tagwall
Set RS = ConnDB.Execute("SELECT * FROM tagwall ORDER BY id DESC")
Do While Not Rs.eof
besked = RS("besked")
besked = Replace(besked,":)","<IMG SRC=gfx/happy.gif>")
besked = Replace(besked,":}","<IMG SRC=gfx/funny.gif>")
besked = Replace(besked,";D","<img src=gfx/teeth.gif>")
besked = Replace(besked,":P","<img src=gfx/tongue.gif>")
besked = Replace(besked,":D","<img src=gfx/laugh.gif>")
besked = Replace(besked,";)","<img src=gfx/blink.gif>")
besked = Replace(besked,"B)","<img src=gfx/sunglass.gif>")
besked = Replace(besked,":O","<img src=gfx/surprised.gif>")
besked = Replace(besked,":*","<img src=gfx/kiss.gif>")
besked = Replace(besked,"8)","<img src=gfx/rolleyes.gif>")
besked = Replace(besked,":X","<img src=gfx/closed.gif>")
besked = Replace(besked,">:(","<img src=gfx/angry.gif>")
besked = Replace(besked,":(","<img src=gfx/sad.gif>")
besked = Replace(besked,":{","<img src=gfx/cry.gif>")
besked = Replace(besked,":/","<img src=gfx/undecided.gif>")
besked = Replace(besked,":[","<img src=gfx/embarassed.gif>")
%>
<TABLE WIDTH="220" BORDER="0" CELLSPACING="0" CELLPADDING="0">
<TR>
<TD WIDTH="200" BGCOLOR="#925D1B">
<TABLE WIDTH="220" border="0" CELLSPACING="0" CELLPADDING="0">
<TR>
<TD><font color="ffffff" face="Verdana" size="1"> Navn: <A HREF="mailto:<%=RS("email")%>" CLASS="link1"><font color="ffffff" face="Verdana" size="1"><%=RS("nick")%></A></TD>
<TD ALIGN="right"><font color="ffffff" face="Verdana" size="1">Dato: <%=day(RS("dato"))%>/<%=month(RS("dato"))%> <%=year(RS("dato"))%></TD>
</TR>
</TABLE>
</TD>
</TR>
<TR>
<TD WIDTH="220">
<TABLE WIDTH="220" BORDER="0" CELLSPACING="0">
<TR>
<TD WIDTH="10" ><IMG SRC="clearpixel.gif" BORDER="0" WIDTH="10" HEIGHT="1" ALIGN="bottom" ALT=""></TD>
<TD BGCOLOR="#F7E2C7" WIDTH="262" CLASS="almtext"><%=besked%></TD>
<TD WIDTH="10" ><IMG SRC="clearpixel.gif" BORDER="0" WIDTH="10" HEIGHT="1" ALIGN="bottom" ALT=""></TD>
</TR>
</TABLE>
</TD>
</TR>
</TABLE>
<BR>
<%
RS.movenext
Loop
end sub
%>
<TR>
<a href="#top"><font face="Verdana" size="1" color="000000">[Ny besked]</a> <a href="login.asp"><font face="Verdana" size="1" color="000000">[Ret/Slet kommentarer]</a>
</TR>
</font></td>
<td width="200"></td>
</tr>
</table>
Se på http://shadow-of-darkness.dk
