<% MySection = "Dogs" MyTitle = "Dogs" DogID = Request("DogID") Set Conn = Server.CreateObject("ADODB.Connection") Conn.Open Session("ConnectionString") SQL = "SELECT TBL_DogTitles.DogTitleID, TBL_DogTitles.DogID, TBL_DogTitles.TitleID, TBL_DogTitles.DefaultTitle, TBL_Titles.Title, TBL_Titles.Descript " &_ "FROM TBL_DogTitles LEFT OUTER JOIN " &_ "TBL_Titles ON TBL_DogTitles.TitleID = TBL_Titles.TitleID " &_ "WHERE (TBL_DogTitles.DogID = " & DogID & ") ORDER BY TBL_Titles.Title;" Set RS_DogTitle = Conn.Execute(SQL) %> Dogs

Page: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23
24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41

 
<% Conn.Close %>