so ya don't want to show a comment.
first ya got find it! (thats the hard bit)
| level |
Comments |
<%
dim look_for
look_for = Request.Form("look_for")
set tigCON = Server.CreateObject("ADODB.Connection")
tigCON.Open(DSN)
query = "SELECT beta_levels.title AS level_title, "
query = query & "beta_comments.level_id as level_id, "
query = query & "beta_levels.nmb_comments as comments "
query = query & "FROM beta_comments INNER JOIN "
query = query & "beta_levels ON "
query = query & "beta_comments.level_id = beta_levels.id "
query = query & "GROUP BY beta_comments.level_id, beta_levels.title, "
query = query & "beta_levels.nmb_comments "
query = query & "ORDER BY level_title"
'Response.Write("Query = [" & query & "]
")
set tigRS = tigCON.Execute(query)
if (tigRS.EOF) then
%>
Nothing in the database to list atm?
is that right?
Get in touch with tigger@ebom.org if there is a serious problem
<%
end if
dim id
do while not tigRS.EOF
id = tigRS("level_id")
%>
| <%=tigRS("level_title")%> |
<%=tigRS("comments")%> |
<%
tigRS.MoveNext
loop
tigRS.close
tigCON.close
%>
