% strSQL = "select * from jrp_project where cat_id = 6 " Set rsProject = conn.execute(strSQL) strSQL = " select * from jrp_intro " Set rsIntro = conn.execute(strSQL) strTemp = Replace(rsIntro("fitout_intro"),chr(13),"") %>