Den sidste i listen

select Max(ID)

SELECT * TOP 1 FROM tblTabelnavn ORDER BY id ASC

eller

SELECT * TOP 1 FROM tblTabelnavn ORDER BY id DESC

//>Rune

SELECT * TOP 1 FROM tblTabelnavn ORDER BY id ASC

Giver fejlen:

[Microsoft][ODBC Microsoft Access Driver] Syntax error (missing operator) in query expression '* TOP 1'.

Bruger jeg select Max(ID) giver den fejlen:
"Item cannot be found in the collection corresponding to the requested name or ordinal. "
Når jeg prøver at kører: TropicV = rs("Tropic")

select Max(ID)

id skal du erstatte med dit autonummer felt.

hvis det hedder ID skal du selvfølgelig lige nævne de andre kolonner du vil have ud.

select Max(ID), tropicv from

hvis du har et felt som hedder tropicv

Mit autonummer felt hedder også ID

strSQL = "select Max(Id), Tropic from Forum"

Giver fejlen:
[Microsoft][ODBC Microsoft Access Driver] You tried to execute a query that does not include the specified expression 'Tropic' as part of an aggregate function.

"SELECT TOP 1 * FROM dintabel ORDER BY id desc"

den virker

Det ser ud til at virke.. Men nu giver den fejl ved:

strSQL = "Insert into Forum (Name, Title, Msg, Forum, Tropic, First, Date) values("

strSQL = strSQL & "'" & NavnV & "', "
strSQL = strSQL & "'" & TitleV & "', "
strSQL = strSQL & "'" & MsgV & "', "
strSQL = strSQL & "'" & ForumV & "', "
strSQL = strSQL & "'" & TropicV & "', "
strSQL = strSQL & "'" & FirstV & "', "
strSQL = strSQL & "'" & DateV & "')"

Conn.Execute(strSQL)   


"[Microsoft][ODBC Microsoft Access Driver] Syntax error in INSERT INTO statement. "

strSQL = "Insert into Forum (Name, Title, Msg, Forum, Tropic, First, Date)
values('" & NavnV & "', '" & TitlV & "', '" & MsgV & "', '" & ForumV & "', '" & TropicV & "', '" & FirstV & "', '" & DateV & "')"

strSQL = "Insert into Forum (Name, Title, Msg, Forum, Tropic, First, Date) values('" & NavnV & "', '" & TitleV & "', '" & MsgV & "', '" & ForumV & "', '" & TropicV & "', '" & FirstV & "', '" & DateV & "')"

Det giver den samme fejl

Det er ved: Conn.Execute(strSQL)
Den giver fejlen

synes det ser okay ud... hvilke datatyper er

Name, Title, Msg, Forum, Tropic, First, Date

?

"''" skal der rundt om og tekstfelter.
"" om tal
#"''"#  om dato

Jeg har prøvet at lave en test og udskrive hvad strSQL er, den siger:

Insert into Forum (Name, Title, Msg, Forum, Tropic, First, Date) values('dsffsdjnks', 'sdfnsd', 'sdf', '1', '4', '1', '4/27/2005')

Det ser fuldstændig rigtigt ud

men hvilke datatyper er de felter i din db?

strSQL = "Insert into Forum (Name, Title, Msg, Forum, Tropic, First, Date) values('" & NavnV & "', '" & TitleV & "', '" & MsgV & "', " & ForumV & ", " & TropicV & ", " & FirstV & ", #'" & DateV & "'#)"

eller

strSQL = "Insert into Forum (Name, Title, Msg, Forum, Tropic, First, Date) values('" & NavnV & "', '" & TitleV & "', '" & MsgV & "', " & ForumV & ", " & TropicV & ", " & FirstV & ", '" & DateV & "')"

Ingen af de 2 virker.. Det er (Tekst, Tekst, Tekst, Tal, Tal, Tal, Dato)

strSQL = "Insert into Forum ([Name], [Title], [Msg], [Forum], [Tropic], [First], [Date]) values('" & NavnV & "', '" & TitleV & "', '" & MsgV & "', " & ForumV & ", " & TropicV & ", " & FirstV & ", #" & DateV & "#)"

Den her burde virke

Den virkede. Tak.. Send et svar hvis du vil have points

hvis du vil prøve din egen med den rettelse jeg har lavet..

Nu burde det virker med alle de forslag:))

strSQL = "Insert into Forum ([Name], [Title], [Msg], [Forum], [Tropic], [First], [Date]) values("

strSQL = strSQL & "'" & NavnV & "', "
strSQL = strSQL & "'" & TitleV & "', "
strSQL = strSQL & "'" & MsgV & "', "
strSQL = strSQL & "'" & ForumV & "', "
strSQL = strSQL & "'" & TropicV & "', "
strSQL = strSQL & "'" & FirstV & "', "
strSQL = strSQL & "'" & DateV & "')"

Conn.Execute(strSQL)   

og ellers

strSQL = "Insert into Forum ([Name], [Title], [Msg], [Forum], [Tropic], [First], [Date]) values("

strSQL = strSQL & "'" & NavnV & "', "
strSQL = strSQL & "'" & TitleV & "', "
strSQL = strSQL & "'" & MsgV & "', "
strSQL = strSQL & "" & ForumV & ", "
strSQL = strSQL & "" & TropicV & ", "
strSQL = strSQL & "" & FirstV & ", "
strSQL = strSQL & "#" & DateV & "#)"

Conn.Execute(strSQL)

Det får du her:))

problemet var at du har et kolonnefelt som hedder

Date

og det er et reserveret ord.. så der skal [] rundt om.