<%@ 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) %> ... from IDEAtrader Suite
 
 
 

 

IDEAfirst

IDEApro

IDEAtrader

IDEAadvisor

wIDEA

BradyNet

About IDEA

Our Management

Partner

Press Center

Advertise

Careers

Contact Us

  
  
   

... from IDEApro Suite

<%= rsSQLTop("story_subject") %>

 

<% story = Replace(Trim(rsSQLTop("Story_body")), vbCrLf, "
") Response.Write(story) %>

 

 

For IDEAtrader suites kindly visit www.intermoney.com

 

Explore Our Samples

<% counter = 0 while not(rsSQLpro.EOF) if (counter = 0 ) then Response.Write("

... from IDEApro Suite

") end if Response.Write("

") Response.Write(rsSQLpro("story_abstract")) Response.Write("
") Response.Write(rsSQLpro("story_date")) Response.Write("
Read

") rsSQLpro.MoveNext counter = counter + 1 wend %>