Option explicit fejl

Har du gemt den som asp? sorry ved det er irriterende dumt at blive spurgt om det hehe

prøv lige at slå show friendly http errors fra i din browser, så kan du se hvad fejlen er.

Hvad ligger der i sogstation1.asp?

tryk funktioner->internetindstillinger->avanceret og fjern hak ved "vis medddelelser om uskadelige http fejl"

du gør det under tools --> internet options --> advance -->  Her fjerner du hakket i Show frintly http error messages.

ja, hvis du slår friendly http errors fra i din browser vil du få en mere detaljeret fejl, og det vil være lettere at svare på hvad der er galt.

Mit gæt er dog at det har noget med den fil du includer - enten har du skrevet navnet/stien til filen forkert, eller også er der en fejl på den side du includer.

fejlen ligger med stor sandsynlighed i den kode du inkludere i sogstation1.asp. Når der er sat hal i show friendly... så vises der bare en standard fejlbesked, for at ikke avancerede brugere ikke bliver skramt at sjove asp fejl :-)

kære venner, fejlen står i titlen på spørgsmålet

option explicit skal står som den første kodelinie. Den gør den ikke hvis den inkluderes i sogstation1.asp

Hej igen!

Ja, det er tilsyneladende i sogstation1.asp fejlen ligger. Den skriver nemlig følgende, når jeg kører sogstation.asp

Fejltype:
Der opstod en Microsoft VBScript-kompileringsfejl (0x800A0400)
En sætning var ventet
/jernbaneside/forkortelser/sogstation1.asp, line 3
Option explicit


Koden til sogstation1.asp er følgende:

<% @Language = VBScript %>
<%
Option explicit
Response.Expires = 0
%>
<html>
<head>
<title>S&oslash;g efter station</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<script language="JavaScript" type="text/JavaScript">
<!--
function MM_findObj(n, d) { //v4.01
  var p,i,x;  if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
    d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
  if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
  for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);
  if(!x && d.getElementById) x=d.getElementById(n); return x;
}

function MM_validateForm() { //v4.0
  var i,p,q,nm,test,num,min,max,errors='',args=MM_validateForm.arguments;
  for (i=0; i<(args.length-2); i+=3) { test=args[i+2]; val=MM_findObj(args[i]);
    if (val) { nm=val.name; if ((val=val.value)!="") {
      if (test.indexOf('isEmail')!=-1) { p=val.indexOf('@');
        if (p<1 || p==(val.length-1)) errors+='- '+nm+' must contain an e-mail address.\n';
      } else if (test!='R') { num = parseFloat(val);
        if (isNaN(val)) errors+='- '+nm+' must contain a number.\n';
        if (test.indexOf('inRange') != -1) { p=test.indexOf(':');
          min=test.substring(8,p); max=test.substring(p+1);
          if (num<min || max<num) errors+='- '+nm+' must contain a number between '+min+' and '+max+'.\n';
    } } } else if (test.charAt(0) == 'R') errors += '- '+nm+' is required.\n'; }
  } if (errors) alert('The following error(s) occurred:\n'+errors);
  document.MM_returnValue = (errors == '');
}
//-->
</script>
<link href="Css/style.css" rel="stylesheet" type="text/css">
</head>
<body bgcolor="#FFFFFF" text="#000000">
<form name="Sogeform" onSubmit="MM_validateForm('Station','','R');return document.MM_returnValue" action="visstation.asp">
  <h2><b>S&oslash;g p&aring; stationsnavn</b></h2>
  <INPUT TYPE="text" SIZE="30" NAME="Station" class="text">
&nbsp;
  <input type="submit" value="  OK  " name="Sog" class="button">
</form>
</body>
</html>

prøv at gør som plx foreslår flyt Option explicit ud i toppen af den første fil du viste os

eller nærmere flyt det her:

<% @Language = VBScript %>
<%
Option explicit
Response.Expires = 0
%>

og evt ret det til

<%
  @Language = VBScript 
  Option explicit
  Response.Expires = 0
%>

hver gang du bruger <%%>, så tager det ekstra tid for serveren at fortolke siden. Det er ikke noget du mærker nu, men når du en dag sidder og laver meget store scripts, så er dte godt at have vendet sig til at anvende dem så få gang e som muligt.

Perfekt! Det hjalp at flyttede koden om på sogstation.asp.

Den vil dog ikke godtage

<%
  @Language = VBScript 
  Option explicit
  Response.Expires = 0
%>

Det er kun

<% @Language = VBScript %>
<%
Option explicit
Response.Expires = 0
%>

der virker.

moejensen får point!

okay, det kan være fordi den vil havde dem adskildt.

Tak for point.