problem
Jeg får denne fejl. Hvad betyder det:Der opstod en Microsoft VBScript-kompileringsfejl fejl '800a0400'
En sætning var ventet
/debat/header.asp, linje 3
Option Explicit
^
Kode uddrag:
<!-- Minus AutoDato -->
<% @LANGUAGE=VBscript %>
<% Option Explicit %>
<%' Her sikre vi at forumet kan køres på servere hvor VBscript ikke er default %>
<% '/// Denne skal være includeret i starten (linje 1) <!-- #INCLUDE FILE="header.asp" -->%>
<%
Response.buffer=True
'Dim af variabler sikre de staves korrekt og optimerer hastigheden
Dim Arkiv_frist,Years,Months,Days,Hours,Minutes,Seconds,OutDate,OutTime,fdays,rsID2
Dim Timenow,Timeout,conn,dbName,dbf,Sitemap,Dirlocation,Site,Smtpserver,Sender,rsEmailad
Dim Sendername,Priority,ContentTransferEncoding,Charset,Subscribe,Confirm,subject,Treadmail
Dim MessageID,Post,TreadID,Count,Topcount,mode,Username,Name,Emailad,strName,MessageTime
Dim indents,rsClients, rsClients2,CHTreadmail,CHNewest,Newest,FirstMessage,strEmailad,Users,UserError
Dim strCount,StrTopCount,strTreadmail,strFirstmessage,strNewest,Knowtify,Antalfo,conf,forumname
Dim Antalark,action,send,send1,send2,send3,rs,rs0,rsUsers,rs1,rs2,rs3,snow,snow1,snow2,snow3
Dim b,n,rsTrash,menu1,menu2,Tilmeld,Frameld,intPage,intpageCount,intnum,rsSubtread,forums
Dim AdminEmail,commentsP,SQL,SQL1,SQL2,SQL3,SQL4,SQL5,SQL6,SQL7,subtype,Posted,NString,MString
Dim Replied,Followed,Ptype,RedURL,id,id2,rsConfirm,strPWDA,admin,rsMessage,TidM,treadopcl
Dim Vals,Cols,Vals1,Vals2,Cols1,Cols2,Allpost,JMail,Comments,Text,NameM,SubjectM,Usernames,intRecCount
Dim Formname,Description,commentsR,commentsS,commentsE,commentsM,subbed,SQLadmin,NewString,antal
' Her sørger den for at siderne ikke bliver cachet!
Response.Expires = 0
Response.Expiresabsolute = DateAdd("d", -2, Now())
Response.AddHeader "pragma","no-cache"
Response.AddHeader "cache-control","private"
Response.CacheControl = "private"
