%@ Language=VBScript %> <% response.end sid = Request.QueryString("sid") IDEAConn.Open strIDEAConn SQLTop = "Select * from stories where story_rec_id = " & sid Set rsSQLTop = IDEAConn.Execute(SQLTop) SQLpro = "SELECT top 5 stories.* FROM stories INNER JOIN stories_tag_index ON stories.story_rec_id = stories_tag_index.story_rec_id WHERE (stories_tag_index.tag_id IN (460) AND stories.deleted = 0 AND stories.story_date < '" & DateAdd("d",-3,now) &"') AND DataLength(stories.story_abstract) > 2 ORDER BY stories.story_date DESC" Set rsSQLpro = IDEAConn.Execute(SQLpro) %>
|
Home > Sample analysis |
|||||||||||||
|
|
|||||||||||||