har du subben i en include fil eller?? om så är fallet så måste du inkludera den
Hej!
När jag kör koden nedan får jag det här meddelandet:
Feltyp:
Kompileringsfel i Microsoft VBScript (0x800A03EA)
Syntaxfel
/laktos/default.asp, line 129
Sub SubReg()
Här är koden:
%
'######### LITE STUFF SOM ÄR BRA ATT HA #############
Select Case Ucase (Request.QueryString("category"))
Case "START"
Call SubStart()
Case "REG"
Call SubReg()
End Select
'################# SLUT #######################
'####### DATABAS ANSLUT ##########
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=c:/inetpub/wwwroot/laktos/databas.mdb"
%>
<!--############## VISA STARTSIDAN ################-->
<html>
<head>
<title> Välkommen till mjölkfri.nu </title>
<style type="text/css">
<!--
form { font-family: Tahoma; font-size: 7pt; }
input { font-family: Tahoma; font-size: 7pt; border-width: 1px; border-color: #FFFFFF; background-color: #FFFFFF}
a:hover { color: #E79E20 }
a:link { text-decoration: none; color: #7A7A7A}
a:visited { text-decoration: none; color: #7A7A7A}
a:active { text-decoration: none; color: #7A7A7A}
a:hover { color: #E79E20 }
-->
</style>
</head>
<body background="bg2.gif" marginheight="0" marginwidth="0">
<%Sub SubStart%>
<!--SKAPA HUVUDTABELLEN-->
<table width="100%" height="700" border="0" cellpadding="0" cellspacing="0">
<td align="center" valign="middle">
\<!--MITTERSTA TABELLEN--\>
\<table width="700" height="300" border="0" cellpadding="0" cellspacing="1" bgcolor="#000000"\>
\<td\>
\<table width="700" height="300" border="0" cellpadding="0" cellspacing="1" bgcolor="#E9E9E9"\>
\<div align="center" valign="top"\>
\<td valign="top"\>
\<a href="default.asp?category=START" target="\_top"\>Start\</a\>
\<a href="medlem.asp" target="\_top"\>Din sida\</a\>
\<a href="medlem.asp?category=GASTBOK" target="\_top"\>Gästbok\</a\>
\<a href="medlem.asp?category=MESS" target="\_top"\>Meddelanden\</a\>
\<a href="forum.asp" target="\_top"\>Forum\</a\>
\<a href="default.asp?" target="\_top"\>Länk\</a\>
\<a href="default.asp?" target="\_top"\>Länk\</a\>
\<a href="default.asp?" target="\_top"\>Länk\</a\>
\<a href="default.asp?" target="\_top"\>Länk\</a\>
\<a href="default.asp?" target="\_top"\>Länk\</a\>
\<a href="default.asp?" target="\_top"\>Länk\</a\>
\<a href="default.asp?" target="\_top"\>Länk\</a\>
\<a href="default.asp?" target="\_top"\>Länk\</a\>
\<a href="default.asp?" target="\_top"\>Länk\</a\>
\<hr width="700" color="#000000" NOSHADE\>
\</td\>
\</div\>\<tr\>
\<!--TABELLEN SOM INNEHÅLLER FORMULÄRET--\>
\<td align="left" valign="middle"\>
<table width="200" height="50" border="0" cellapadding="0" cellspacing="0">
<td>
<font face="Verdana, Arial" size="2"><b>Smeknamn:</b></font>
</td>
<td>
<input type="text" name="ANV" size="20">
</td>
<tr>
<td>
<font face="Verdana, Arial" size="2"><b>Lösen:</b></font>
</td>
<td>
<input type="text" name="PASS" size="20">
</td>
<tr>
<td>
<input type="submit" value="logga in">
</td>
</table>
<font color="#000000" size="2" face="Verdana"> <a href="default.asp?category=REG" target="_top"><b>Registrera</b></a></font>
</td>
<tr>
<td valign="bottom" align="center">
<hr color="#000000" width="700" NOSHADE">
\</td\>\<tr\>
\<td height="10" valign="bottom" align="center"\>
\</td\>
\</table\>
\</table\>
\</td\>
\</table\>
<%
'####### OKEJ...NU SKA VI VISA REG SIDAN ##########
Sub SubReg()
%>
<!--SKAPA HUVUDTABELLEN-->
<table width="100%" height="700" border="0" cellpadding="0" cellspacing="0">
<td align="center" valign="middle">
\<!--MITTERSTA TABELLEN--\>
\<table width="700" height="300" border="0" cellpadding="0" cellspacing="1" bgcolor="#000000"\>
\<td\>
\<table width="700" height="300" border="0" cellpadding="0" cellspacing="1" bgcolor="#E9E9E9"\>
\<div align="center" valign="top"\>
\<td valign="top"\>
\<a href="default.asp?category=START" target="\_top"\>Start\</a\>
\<a href="medlem.asp" target="\_top"\>Din sida\</a\>
\<a href="medlem.asp?category=GASTBOK" target="\_top"\>Gästbok\</a\>
\<a href="medlem.asp?category=MESS" target="\_top"\>Meddelanden\</a\>
\<a href="forum.asp" target="\_top"\>Forum\</a\>
\<a href="default.asp?" target="\_top"\>Länk\</a\>
\<a href="default.asp?" target="\_top"\>Länk\</a\>
\<a href="default.asp?" target="\_top"\>Länk\</a\>
\<a href="default.asp?" target="\_top"\>Länk\</a\>
\<a href="default.asp?" target="\_top"\>Länk\</a\>
\<a href="default.asp?" target="\_top"\>Länk\</a\>
\<a href="default.asp?" target="\_top"\>Länk\</a\>
\<a href="default.asp?" target="\_top"\>Länk\</a\>
\<a href="default.asp?" target="\_top"\>Länk\</a\>
\<hr width="700" color="#000000" NOSHADE\>
\</td\>
\</div\>\<tr\>
\<div valign="top"\>
\<td align="left" valign="top"\>
\<font color="#000000" size="2" face="Verdana, Arial"\>Alla formulär som är markerade med\</font\> \<font color="red" size="2"\>\*\</font\> \<font color="#000000" size="2" face="Verdana, Arial"\>är obligatoriska\</font\>
\</div\>
</td>
\<tr\>
\<td valign="bottom" align="center"\>
\<hr color="#000000" width="700" NOSHADE"\>
\</td\>\<tr\>
\<td height="10" valign="bottom" align="center"\>
\</td\>
\</table\>
\</table\>
\</td\>
\</table\>
<%
End Sub
%>
</body>
</html>
Jag har markerat den felaktiga raden meb fet stil
Vad är det för fel?