' Counts Number of Subjects
strSql = "select count(S_ID) from Subjects where H_Id = " & id
set rsCount = Conn.Execute(strSql)
' Count the number Of Replies
strSql = "select count(H_ID) from Replies where H_Id = " & id
set rsCountRep = Conn.Execute(strSql)
I den fetmarkerade raden får jag
Microsoft OLE DB Provider for ODBC Drivers error '80040e14'
[MySQL][ODBC 3.51 Driver][mysqld-4.0.25-max]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 '' at line 1
/wForum1/main.asp, line 90
conn ligger i en includefil så där är det inga problem
<!--#include virtual="/wForum1/Includes/databaseOpen.asp"-->
ett annat fel som jag inte hittar är från detta felmeddelandet
Microsoft OLE DB Provider for ODBC Drivers error '80040e14'
[MySQL][ODBC 3.51 Driver][mysqld-4.0.25-max]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 '' at line 1
/wForum1/main.asp, line 90
If A = 0 Then bgcolor = strColor1
If A = 1 Then bgcolor = strColor2
' Counts Number of Subjects
strSql = "select count(S_ID) from Subjects where H_Id = " & id
[B]set rsCount = Conn.Execute(strSql)[/B] // Detta är Rad 90 //
' Count the number Of Replies
strSql = "select count(H_ID) from Replies where H_Id = " & id
set rsCountRep = Conn.Execute(strSql)
Peter SMedlem sedan dec. 20025 483 inlägg Det finns inget innehåll i id.
Peter S skrev:
Det finns inget innehåll i id.
Tog bort id där och kunde lista alla forum, men nu blev problemet att inlägg och senast postat alla visas som i den första tråden
Tog bort id där och kunde lista alla forum, men nu blev problemet att inlägg och senast postat alla visas som i den första tråden
<% ' Gets the main categorys
Set RS = Conn.Execute("SELECT * from Heads WHERE Active = 1 order by H_Name")
if not rs.eof then
set id = RS("id")
set CreateDate = RS("CreateDate")
set H_Name = RS("H_Name")
set H_Decs = RS("H_Decs")
end if
A = 0
DO while not rs.EOF
s1_date = ""
s2_date = ""
s_dateIm = "1900-01-01"
antal = antal + 1
If A = 0 Then bgcolor = strColor1
If A = 1 Then bgcolor = strColor2
' Counts Number of Subjects
strSql = "select count(S_ID) from Subjects"
set rsCount = Conn.Execute(strSql)
' Count the number Of Replies
strSql = "select count(H_ID) from Replies"
set rsCountRep = Conn.Execute(strSql)
' Last post i replies
strSql = "select R_date, R_name,S_ID,H_ID,R_ID from Replies order by R_ID desc limit 1"
set rsCountDate = Conn.Execute(strSql)
if not rsCountdate.eof then
s1_date = rsCountDate(0)
s1_dateChech = rsCountDate(0)
s1_name = rsCountDate(1)
s1_ID = rsCountDate(2)
s1_HID = rsCountDate(3)
s1_RID = rsCountDate(4)
end if
' last post in subjects
strSql = "select S_date, S_name,S_Desc, S_ID, H_ID from Subjects order by S_ID desc limit 1"
set rsCountDateS = Conn.Execute(strSql)
if not rsCountDateS.eof then
s2_date = rsCountDateS(0)
s2_dateChech = rsCountDateS(0)
s2_name = rsCountDateS(1)
s2_ID = rsCountDateS(2)
s2_HID = rsCountDateS(3)
S_Desc = rsCountDateS(2)
s2_RID = ""
end if
if s1_date < s2_date or (isdate(s2_date) and not isdate(s1_date)) then
s_dateChech = s2_dateChech
strWho = ", "& StrLan12 &": " & s2_name
s_date = FormatDateTime(s2_date,2) & ", kl " & FormatDateTime(s2_date,4)
s_dateIm = FormatDateTime(s2_date,2)
S_ID = s2_ID
H_ID = s2_HID
R_ID = s2_RID
elseif s1_date > s2_date or (isdate(s1_date) and not isdate(s2_date)) then
s_dateChech = s1_dateChech
strWho = ", "& StrLan12 &": " & s1_name
s_date = FormatDateTime(s1_date,2) & ", kl " & FormatDateTime(s1_date,4)
s_dateIm = FormatDateTime(s1_date,2)
S_ID = s1_ID
H_ID = s1_HID
R_ID = s1_RID
else
s_date = StrLan2
strWho = ""
s_dateChech = "1900-01-01"
end if
if Cdate(s_dateIm) = date then im = "forum_new" else im = "forum"
if Cdate(s_dateIm) = date then srtAlt = "Nya inlägg idag" else srtalt = "Inga nya idag"
%>
Peter SMedlem sedan dec. 20025 483 inlägg Du måste deklarera id m.fl. utanför if-satsen för att kunna nå dem i SQL-frågan.
nåt bra förslag, eftersom denna koden listar alla forum på framsidan så har jag inget id i nån request
varför måste du ha ett id om du ska lista alla forum? eller missar jag något?
nu kör jag utan id i where satsen för att å alla forum listade men då får jag det som bilden visar, anledningen till alla problem är att jag inte har byggt det själv så det är lite svårt med kontrollen på det :-)