Keyword or Search: <% Dim MyValue2 Randomize MyValue2 = Int((6 * Rnd) + 1) Set Conn = Server.CreateObject("ADODB.Connection") Conn.Open Session("trsa_ConnectionString2") MySQL = "Select * From HouseAds Where HouseAdID Like '%" & MyValue2 & "%' " Set Conn = Conn.Execute(MySQL) %> "> " alt="" width=130 height=85 border=1 align=top> <% conn.close %>	Making good accounts out of bad Kenneth Weiser of M. R. Weiser & Co. conducted a Profitability of Accounts Seminar for 16 persons in New York Oct. 17. He discussed ways in which to develop and use a customer profitability system, providing methods of identifying unprofitable customers and converting them into profitable ones. Two similar sessions are scheduled in 1979 —in Chicago Sept. 12 and in New York Oct. 16.