--- title: "Read this:" type: "forum-thread" url: "https://www.webforum.nu/amne/asp/5405-read-this" topic: "ASP" topic_url: "https://www.webforum.nu/amne/asp" author: "cgi" published: "2000-02-26T18:50:00.000Z" updated: "2000-02-28T17:24:00.000Z" replies: 6 views: 511 page: 1 pages: 1 language: "sv-SE" site: "webForum — webforum.nu" rights: "Upphovsrätten till varje inlägg tillhör dess författare." attribution: "Citera som: webForum, https://www.webforum.nu/amne/asp/5405-read-this" --- # Read this: ## #1 — cgi, 2000-02-26T18:50Z Oj oj vad jag frågar mycket, men vad har man för val när man fattar noll:??. Okey, här kommer frågan, har försökt byggt upp en sida med asp, men det kommer bara upp: Expected statement /cgi-bin/gastbok.asp, line 101 Option Explicit ^ . Så här ser koden ut till sidan: ```



<% IF Request.Querystring("link") = "lankar" THEN %> Länkar
<% ELSE %> Länkar
<% END IF %> <% IF Request.Querystring("link") = "lankar" THEN %>   - underlänk1
  - underlänk2
  - underlänk3
<% END IF %> <% IF Request.Querystring("link") = "gastbok" THEN %> Gästbok
<% ELSE %> Gästbok
<% END IF %> <% IF Request.Querystring("link") = "gastbok" THEN %>   - underlänk1
  - underlänk2
  - underlänk3
<% END IF %> <% IF Request.Querystring("link") = "forum" THEN %> Forum
<% ELSE %> Forum
<% END IF %> <% IF Request.Querystring("link") = "forum" THEN %>   - underlänk1
  - underlänk2
  - underlänk3
<% END IF %> <% IF Request.Querystring("link") = "css" THEN %> Css
<% ELSE %> Css
<% END IF %> <% IF Request.Querystring("link") = "css" THEN %>   - underlänk1
  - underlänk2
  - underlänk3
<% END IF %> <% IF Request.Querystring("link") = "download" THEN %> Downloads
<% ELSE %> Downloads
<% END IF %> <% IF Request.Querystring("link") = "download" THEN %>   - underlänk1
  - underlänk2
  - underlänk3
<% END IF %>

 <%@ Language=VBScript %> <% Option Explicit 'Deklarerar databas variabler Dim Connect, conntemp, DSNtemp 'Deklarerar övriga variabler Dim inlagg ' Här skapar vi en dsn-less connection mot gbok Set Connect=server.CreateObject("adodb.connection") DSNtemp="DRIVER={Microsoft Access Driver (*.mdb)}; " DSNtemp=dsntemp & "DBQ=" & server.mappath("gbok.mdb") Connect.Open DSNtemp %> <% If Request.Querystring("klar") = "gastbok" then Response.Redirect "gbproc.asp" End if %>
Namn:


 E-post:
Ort:
 Gillar:
Meddelande:
Vad har besökarna skrivit.

<% 'Ta ut alla inlägg och sortera dom efter datum inlagg= "SELECT Namn,Datum,Epost,Ort,Gillar,Meddelande FROM gbok WHERE id=id ORDER BY datum DESC" Set inlagg= Connect.Execute(inlagg) 'Skriv ut alla inlägg Do until inlagg.EOF %> <% inlagg.MoveNext Loop %>
Namn:<%=inlagg("Namn")%>
Datum:<%=inlagg("Datum")%>
Epost:"><%=inlagg("epost")%>
Ort:<%=inlagg("Ort")%>
Gillar:<%=inlagg("Gillar")%>
Meddelande:<%=inlagg("Meddelande")%>
<% 'Vid stänger databasen Connect.close set Connect=nothing %>
 
``` Tacksam för svar. \[Redigerat av cgi den 26 feb 2000\] \[Redigerat av cgi den 26 feb 2000\] \[Redigerat av cgi den 26 feb 2000\] Permalänk: https://www.webforum.nu/p/5405 ## #2 — Toonster, 2000-02-27T10:45Z Option explicit måste "ligga" i början av scriptet /T Permalänk: https://www.webforum.nu/p/238710 ## #3 — cgi, 2000-02-27T13:49Z Har försökt med det, men vill inte funka. Permalänk: https://www.webforum.nu/p/238711 ## #4 — nanne, 2000-02-28T07:09Z jorå såhär ska det se ut. \<%@ Language=VBScript Option Explicit %\> \ osv osv osv... Permalänk: https://www.webforum.nu/p/238712 ## #5 — cgi, 2000-02-28T11:40Z Nej du nanne, det funkar inte. Permalänk: https://www.webforum.nu/p/238713 ## #6 — Toonster, 2000-02-28T12:12Z Är det fortfarande samma felmeddelande? eller är det som jag misstänker ett annat felmeddelande? /T Permalänk: https://www.webforum.nu/p/238714 ## #7 — cgi, 2000-02-28T17:24Z Nej nu står det ett annat felmeddelande: Active Server Pages error 'ASP 0221' Invalid @ Command directive /cgi-bin/egenhemsida/gastbok.asp, line 2 The specified 'Option Explicit ' option is unknown or invalid. Permalänk: https://www.webforum.nu/p/238715 --- Tråden på webben: https://www.webforum.nu/amne/asp/5405-read-this