Hallo Asp'ler
bekomme beim auslesen meines Gästebuchs immer eine Syntaxfehlermeldung.
Hier der Code:
----------------------------------------------------------------------
<TITLE>Einträge im Gästebuch</TITLE>
</HEAD>
<BODY BGCOLOR="#ffffff">
<H1>Einträge im Gästebuch</H1>
<%
strConnection = "Driver={Microsoft Access Driver (*.mdb)};DBQ="
strConnection = strConnection & Server.MapPath("Internet.mdb")
strConnection = strConnection & ";DriverId=25;FIL=MS Access;MaxBufferSize=512;PageTimeout=5;"
' korrekt nach Datum absteigend sortiert; first ten records
Const cstrFirstTenRecords = "SELECT TOP 10 ID,Name,Vorname,Strasse,Ort,PLZ,Handy,EMail,Homepage,Eintrag,Browser,Betriebssystem,EntryDate ORDER BY ID DESC"
' next ten records
Const cstrNextTenRecP1 = "SELECT TOP 10 ID,Name,Vorname,Strasse,Ort,PLZ,Handy,EMail,Homepage,Eintrag,Browser,Betriebssystem,EntryDate from Guestbook WHERE ID < "
Const cstrNextRecP2 = " ORDER BY ID DESC"
' previous ten records; WRONG SORT ORDER INITIALLY!
Const cstrPrevTenRecP1 = "SELECT TOP 10 ID,Name,Vorname,Strasse,Ort,PLZ,Handy,EMail,Homepage,Eintrag,Browser,Betriebssystem,EntryDate from Guestbook WHERE ID > "
Const cstrPrevRecP2 = " ORDER BY ID ASC"
strPageDirection = Trim(Request.QueryString("Page"))
If "" = strPageDirection Then strPageDirection = "Start"
nLastIndex = Trim(Request.QueryString("Index"))
If ("" = nLastIndex Or Not IsNumeric(nLastIndex)) Then strPageDirection = "Start"
Select Case strPageDirection
Case "Next"
strSQL = cstrNextTenRecP1 & nLastIndex & cstrNextRecP2
Case "Prev"
strSQL = cstrPrevTenRecP1 & nLastIndex & cstrPrevRecP2
bTopDown = True
Case Else
strSQL = cstrFirstTenRecords
End Select
Set conn = CreateObject("ADODB.Connection")
conn.Open strConnection
Set rs = CreateObject ("ADODB.Recordset")
rs.Open strSQL, conn
----------------------------------------------------------------------
Fehlermeldung:
----------------------------------------------------------------------
Versuchen Sie Folgendes:
· Klicken Sie auf die Schaltfläche Aktualisieren, oder versuchen Sie es später noch einmal.
· Öffnen Sie localhost die Homepage, und suchen Sie dann nach den Verknüpfungen zu den gewünschten Informationen.
HTTP 500.100 - Interner Serverfehler - ASP-Fehler
Internet-Informationsdienste
Technische Informationen (für den Support)
· Fehlertyp:
Microsoft OLE DB Provider for ODBC Drivers (0x80040E14)
[Microsoft][ODBC Microsoft Access Driver] Syntaxfehler (fehlender Operator) in Abfrageausdruck 'EntryDate ORDER BY ID DESC'.
/freaks/entries.asp, line 40
· Browsertyp:
Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1)
· Seite:
GET /freaks/entries.asp
· Zeit:
Samstag, 19. Februar 2005, 09:50:54
· Weitere Informationen:
Microsoft Support
----------------------------------------------------------------------
Wer kann mir helfen bin noch totaler Anfänger in ASP.
Besten Dank im Voraus.
Gruß
Rob
bekomme beim auslesen meines Gästebuchs immer eine Syntaxfehlermeldung.
Hier der Code:
----------------------------------------------------------------------
<TITLE>Einträge im Gästebuch</TITLE>
</HEAD>
<BODY BGCOLOR="#ffffff">
<H1>Einträge im Gästebuch</H1>
<%
strConnection = "Driver={Microsoft Access Driver (*.mdb)};DBQ="
strConnection = strConnection & Server.MapPath("Internet.mdb")
strConnection = strConnection & ";DriverId=25;FIL=MS Access;MaxBufferSize=512;PageTimeout=5;"
' korrekt nach Datum absteigend sortiert; first ten records
Const cstrFirstTenRecords = "SELECT TOP 10 ID,Name,Vorname,Strasse,Ort,PLZ,Handy,EMail,Homepage,Eintrag,Browser,Betriebssystem,EntryDate ORDER BY ID DESC"
' next ten records
Const cstrNextTenRecP1 = "SELECT TOP 10 ID,Name,Vorname,Strasse,Ort,PLZ,Handy,EMail,Homepage,Eintrag,Browser,Betriebssystem,EntryDate from Guestbook WHERE ID < "
Const cstrNextRecP2 = " ORDER BY ID DESC"
' previous ten records; WRONG SORT ORDER INITIALLY!
Const cstrPrevTenRecP1 = "SELECT TOP 10 ID,Name,Vorname,Strasse,Ort,PLZ,Handy,EMail,Homepage,Eintrag,Browser,Betriebssystem,EntryDate from Guestbook WHERE ID > "
Const cstrPrevRecP2 = " ORDER BY ID ASC"
strPageDirection = Trim(Request.QueryString("Page"))
If "" = strPageDirection Then strPageDirection = "Start"
nLastIndex = Trim(Request.QueryString("Index"))
If ("" = nLastIndex Or Not IsNumeric(nLastIndex)) Then strPageDirection = "Start"
Select Case strPageDirection
Case "Next"
strSQL = cstrNextTenRecP1 & nLastIndex & cstrNextRecP2
Case "Prev"
strSQL = cstrPrevTenRecP1 & nLastIndex & cstrPrevRecP2
bTopDown = True
Case Else
strSQL = cstrFirstTenRecords
End Select
Set conn = CreateObject("ADODB.Connection")
conn.Open strConnection
Set rs = CreateObject ("ADODB.Recordset")
rs.Open strSQL, conn
----------------------------------------------------------------------
Fehlermeldung:
----------------------------------------------------------------------
Versuchen Sie Folgendes:
· Klicken Sie auf die Schaltfläche Aktualisieren, oder versuchen Sie es später noch einmal.
· Öffnen Sie localhost die Homepage, und suchen Sie dann nach den Verknüpfungen zu den gewünschten Informationen.
HTTP 500.100 - Interner Serverfehler - ASP-Fehler
Internet-Informationsdienste
Technische Informationen (für den Support)
· Fehlertyp:
Microsoft OLE DB Provider for ODBC Drivers (0x80040E14)
[Microsoft][ODBC Microsoft Access Driver] Syntaxfehler (fehlender Operator) in Abfrageausdruck 'EntryDate ORDER BY ID DESC'.
/freaks/entries.asp, line 40
· Browsertyp:
Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1)
· Seite:
GET /freaks/entries.asp
· Zeit:
Samstag, 19. Februar 2005, 09:50:54
· Weitere Informationen:
Microsoft Support
----------------------------------------------------------------------
Wer kann mir helfen bin noch totaler Anfänger in ASP.
Besten Dank im Voraus.
Gruß
Rob
