---
title: "Syntax fel!"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/101763-syntax-fel"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "crisse6"
published: "2004-04-18T14:05:52.000Z"
updated: "2004-04-21T15:26:46.000Z"
replies: 16
views: 288
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/101763-syntax-fel"
---

# Syntax fel!

## #1 — crisse6, 2004-04-18T14:05Z

Hej!

Försöker med paging här, men kör nu med mySQL, nytt för mig...

Får felmess på mina sql-satser...?

```
<%
Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open("Driver={MySQL ODBC 3.51 Driver};Server=localhost;Option=16834;Database=mysql;")

Set objRs = Server.Createobject("Adodb.Recordset")
strSQL = "Select from t_bryggsnack Order by datum desc"
response.write strSQL
intPageId = request.querystring( "pageid" )
if intPageId = "" then intPageId = 1

with objRs
  .cursorlocation = 3
  .open strSQL, Connect
end with
If objRs.EOF then
	response.write "Inga inlägg..."
Else
with objRs
  .pagesize = 10
  .absolutepage = intPageId
end with

intPages = cint( objRs.pagecount )
intCurrentPost = 0

do while not objRs.eof and intCurrentPost < objRs.pagesize
  strContents = strContents &_
    "<tr><td>" & objRs( "namn" ) & "</td>" &_
    "<td>" & objRs( "meddelande" ) & "</td></tr>"
  intCurrentPost = intCurrentPost + 1
  objRs.movenext
loop

for i = 1 to objRs.pagecount
  strNavigation = strNavigation & " <a href='?page=bryggsnack&pageid=" & i & "'>" & i & "</a>"
next

response.write "<table>" & strContents & "</table>"
response.write "<table><tr><td>" & strNavigation & "</td></tr></table>" 
End IF
%>
```

och sen sidan som tar emot...

```
<%
Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open("Driver={MySQL ODBC 3.51 Driver};Server=localhost;Option=16834;Database=mysql;")

namn = request.form("namn")
bryggplats = request.form("bryggplats")
meddelande = request.form("meddelande")
ip = request.form("ip")

If namn = "" OR meddelande = "" then
	session("error") = "Du har antingen inte fyllt i namn eller meddelande."
	response.redirect "default.asp?page=bryggsnack"
Else
	
strSQL = "Insert into t_bryggsnack "&_
			"(namn, datum, bryggplats, meddelande, ip) "&_
			"VALUES ('"&namn&"', #"&Date()&"#, '"&bryggplats&"', '"&meddelande&"','"&ip&"')"
Connect.execute strSQL,,128
response.redirect ("default.asp?page=bryggsnack")
End IF
%>
```

VA I!

Permalänk: https://www.webforum.nu/p/101763

## #2 — @nders, 2004-04-18T14:08Z

Man använder inte brädgårdar för att omsluta datum.

Dessutom: bifoga alltid felmeddelande samt utskriven SQL-fråga.

Permalänk: https://www.webforum.nu/p/1325918

## #3 — crisse6, 2004-04-18T14:11Z

Men får inte ut sql frågan i response.... 
får bara:

```
Feltyp:
Microsoft OLE DB Provider for ODBC Drivers (0x80040E14)
[MySQL][ODBC 3.51 Driver][mysqld-4.0.18-nt]You have an error in your SQL syntax. Check the manual that corresponds to your MySQL server version for the right syntax to use near 'from t_bryggsnack Order by datum desc' at line 1
/kindes/sajten/bryggsnack.asp, line 37
```

Permalänk: https://www.webforum.nu/p/1325920

## #4 — cyprys, 2004-04-18T14:11Z

```
Select [b][red]*[/red][/b] from t_bryggsnack Order by datum desc
```

Permalänk: https://www.webforum.nu/p/1325921

## #5 — crisse6, 2004-04-18T14:12Z

oj... hade glömt \* där i sqlsatsen.... ;)

Permalänk: https://www.webforum.nu/p/1325922

## #6 — @nders, 2004-04-18T14:16Z

> Men får inte ut sql frågan i response....

Jodå. Kör en response.end direkt efter så körs inget mer på sidan, och det kan då inte heller bli fel.

Permalänk: https://www.webforum.nu/p/1325927

## #7 — crisse6, 2004-04-18T14:18Z

jahaaaaaaa du tänker schåååååå!

Permalänk: https://www.webforum.nu/p/1325928

## #8 — crisse6, 2004-04-18T14:19Z

ett annat problem....
försöker få in Föregående, Nästa oså.... 
placerar jag det fel nu?

```
do while not objRs.eof and intCurrentPost < objRs.pagesize
  strContents = strContents &_
    "<tr><td>" & objRs( "namn" ) & "</td>" &_
    "<td>" & objRs( "meddelande" ) & "</td></tr>"
  intCurrentPost = intCurrentPost + 1
  objRs.movenext
loop

for i = 1 to objRs.pagecount
  strNavigation = strNavigation & " <a href='?page=bryggsnack&pageid=" & i & "'>" & i & "</a>"
next

function getPreviousLink( intPageId )
  if intPageId > 1 then
    getPreviousLink = " <a href='?page=bryggsnack&pageid=" & intPageId - 1 & "'>&lt;&lt; Föregående</a> "
  end if
end function

function getNextLink( intPageId, intPageCount )
  if cint( intPageId ) < cint( intPageCount ) then
    getNextLink = " <a href='?pageid=" & intPageId + 1 & "'>Nästa &gt;&gt;</a> "
  end if
end function

response.write "<table>"& getPreviousLink &"</table>"
response.write "<table>"& getNextLink &"</table>"
```

Permalänk: https://www.webforum.nu/p/1325929

## #9 — @nders, 2004-04-18T14:22Z

Vad är det som inte funkar?

(Du kan f.ö. inte ha \<table\>-taggar runt länkarna)

edit: du skickar ju heller inte med några parametrar till funktionerna som ska skapa länkarna? Börja med det.

Permalänk: https://www.webforum.nu/p/1325931

## #10 — crisse6, 2004-04-18T14:26Z

Vad menar du? Det gör jag väl?
Detta mess får jag:

Fel antal argument eller felaktig egenskapstilldelning.: 'getPreviousLink'

så de så!

Permalänk: https://www.webforum.nu/p/1325933

## #11 — @nders, 2004-04-18T14:28Z

> **crisse6 skrev:**
>
> Detta mess får jag:
> 
> Fel antal argument eller felaktig egenskapstilldelning.: 'getPreviousLink'
> 
> så de så!

Du skickar ju inga argument, då får du det felet, så det stämmer finfint det.

Permalänk: https://www.webforum.nu/p/1325935

## #12 — crisse6, 2004-04-18T14:30Z

Okej, jag förstår nog inte riktigt....................... Vad vill du se? Förklara nu :P

Permalänk: https://www.webforum.nu/p/1325936

## #13 — @nders, 2004-04-18T14:31Z

> **crisse6 skrev:**
>
> Vad vill du se? Förklara nu :P

Jag vill se att du kallar på funktionerna på rätt sätt. Det sätt du själv har specificerat.

Permalänk: https://www.webforum.nu/p/1325937

## #14 — crisse6, 2004-04-18T14:34Z

Det gör jag nog inte då? haha, fattar inget nu..... Kan du visa hur det ska se ut?

Permalänk: https://www.webforum.nu/p/1325938

## #15 — @nders, 2004-04-18T14:36Z

När du skapar funktionen så säger du ju att du ska skicka in en eller två parametrar till den:

```
function getPreviousLink[b]( intPageId )[/b]
..
function getNextLink[b]( intPageId, intPageCount )[/b]
```

Men när du kallar på funktionerna så struntar du i att skicka med parametrarna som du sagt att du ska skicka med.

```
response.write "<table>"& getPreviousLink[b](PARAMETER HÄR)[/b] &"</table>"
response.write "<table>"& getNextLink[b](PARAMETRAR HÄR)[/b] &"</table>"
```

Permalänk: https://www.webforum.nu/p/1325939

## #16 — crisse6, 2004-04-18T14:37Z

jaaaaaaaha! okej..... då är jag med!
snygg kombination av kod och citat där @nders :P

Permalänk: https://www.webforum.nu/p/1325940

## #17 — crisse6, 2004-04-21T15:26Z

Hej igen.....
Fick inte det att bli rätt där med Föregående och Nästa.... Det visas inte på sidan, bara om det e mer än 1 sida.. ?! Skulle liksom vilja ha dom där, fast inte klickbara om det inte finns fler sidor.. gärna också så det står "Nu visas posterna 1-10" osv.. 

Något har jag ju gjort skumt!

```
<%
Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open("driver=mysql;server=mysql.webkonsulterna.com;user=xxx;password=xxxx;database=abkkindes;")

Set objRs = Server.Createobject("Adodb.Recordset")
strSQL = "Select * from t_bryggsnack Order by datum desc"

intPageId = request.querystring( "pageid" )
if intPageId = "" then intPageId = 1

with objRs
  .cursorlocation = 3
  .open strSQL, Connect
end with
If objRs.EOF then
	response.write "<hr size=""1"" color=""black"">Inga inlägg...<hr size=""1"" color=""black"">"
Else
with objRs
  .pagesize = 10
  .absolutepage = intPageId
end with

intPages = cint( objRs.pagecount )
intCurrentPost = 0

meddelande = replace(server.htmlencode(objRs("meddelande")),vbcrlf,"<br>")

do while not objRs.eof and intCurrentPost < objRs.pagesize
	meddelande = replace(server.htmlencode(objRs("meddelande")),vbcrlf,"<br>")
  strContents = strContents &_
    "<table cellspacing=""2"" cellpadding=""0"" border=""0"" class=""brod"" width=""700"">"&_
	"<tr><td><b>Namn:</b> " & objRs( "namn" ) & "</td></tr>" &_
    "<tr><td><b>Datum</b>: " & objRs( "datum" ) & "</td></tr>" &_
	"<tr><td><b>Bryggplats:</b> "&objRs("bryggplats") &"</td></tr>"&_
	"<tr><td><b>IP:</b> "&objRs("ip")&"</td></tr>"&_
	"<td><b>Meddelande:</b><br>"& meddelande &"</td></tr></table><hr size=""1"" color=""black"">"
  intCurrentPost = intCurrentPost + 1
  objRs.movenext
loop

for i = 1 to objRs.pagecount
  strNavigation = strNavigation & " <a class=""lankar"" href='?page=bryggsnack&pageid=" & i & "'>" & i & "</a>"
next

function getPreviousLink( intPageId )
  if intPageId > 1 then
    getPreviousLink = " <a class=""lankar"" href='?page=bryggsnack&pageid=" & intPageId - 1 & "'>&lt;&lt; Föregående</a> "
  end if
end function

function getNextLink( intPageId, intPageCount )
  if cint( intPageId ) < cint( intPageCount ) then
    getNextLink = " <a class=""lankar"" href='?page=bryggsnack&pageid=" & intPageId + 1 & "'>Nästa &gt;&gt;</a> "
  end if
end function

response.write "<table class=""brod""><tr><td>"& getPreviousLink( intPageId )
response.write strContents
response.write strNavigation 
response.write getNextLink( intPageId, intPageCount ) &"</td></tr></table>"
End IF
%>
```

Permalänk: https://www.webforum.nu/p/1328278

---

Tråden på webben: https://www.webforum.nu/amne/asp/101763-syntax-fel