--- title: "Står helt stilla.??" type: "forum-thread" url: "https://www.webforum.nu/amne/asp/6055-står-helt-stilla" topic: "ASP" topic_url: "https://www.webforum.nu/amne/asp" author: "cgi" published: "2000-07-14T20:47:00.000Z" updated: "2000-07-14T22:38:00.000Z" replies: 2 views: 190 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/6055-står-helt-stilla" --- # Står helt stilla.?? ## #1 — cgi, 2000-07-14T20:47Z Är det någon som vet vad det är för fel om det står: Expected statement /forum.asp, line 41 \ koden ser ut så här: \[kod\] \<% Sub DisplayChildMessages(Parent,Level) Dim RSMeddelande Dim SQL Dim i Session.LCID = 1053 Application("Sample_ConnectionString") = "DRIVER={Microsoft Access Driver (\*.mdb)};DBQ=URL=forum.mdb" SQL = "SELECT Meddelande.Id, " & "Meddelande.Rubrik, Meddelande.Datum, " & "Anvandare.Anvandarid FROM Meddelande, Anvandare " & "WHERE Meddelande.\[Anvandarid\] = Anvandare.Id AND " & "Meddelande.Parent=" & Parent SQL = "Select \* from Forum Order by id desc" RSMeddelande.Open SQL, Application, 1,2 Do While Not RSMeddelande.EOF Response.Write "\" Response.Write "\" For i = 1 to level Response.Write " " Next Response.Write "\" Response.Write RSMeddelande("Rubrik") Response.Write "\" Response.Write "\\" Response.Write RSMeddelande("Anvandarid") Response.Write "\\" Response.Write FormatDateTime(RSMeddelande("Datum"),2) Response.Write "\" DisplayChildMeddelande RSMeddelande("id"),Level+1 RSMeddelande.MoveNext Loop End Sub \ \ \-Forum-\ \ \<% DO UNTIL RS.EOF counter = counter + 1 If counter Mod 2 = 0 then color = "COCOCO" Else color = "COCOOO" End If %\> \ \\Nytt inlägg\\\ \ \ \

\Skrivet datum\\ \ \<% RS.MOVENEXT LOOP %\> \<% Application("Sample_ConnectionString") = "DRIVER={Microsoft Access Driver (\*.mdb)};DBQ=URL=forum.mdb" Application.Open "Forum" DisplayChildMeddelande 0,1 %\> \ \[kod\] står helt stilla. :q Permalänk: https://www.webforum.nu/p/6055 ## #2 — Vide, 2000-07-14T21:21Z Felet ligger precis som felmeddelandet tyder här: ``` End Sub ``` Du avslutar inte ASPkoden med dess avgränsare, så här skall det se ut: ``` End Sub %> ``` Permalänk: https://www.webforum.nu/p/244441 ## #3 — cgi, 2000-07-14T22:38Z Kom på det efter ett tag, måste fått ett mindre hjärn släpp. :) Permalänk: https://www.webforum.nu/p/244442 --- Tråden på webben: https://www.webforum.nu/amne/asp/6055-står-helt-stilla