%
DIM Site
DIM strBody
Site = "3"
oConn.Open(sConnString) 'This opens the database.
Set rConn = oConn.Execute("SELECT * FROM Table1 WHERE Site = '"& Site &"'")
strBody = rConn.Fields("Body").Value
strBody = Replace(strBody, "
", "|")
%>
Site Modification
<%
'Destroy the connections
oConn.Close
set oConn = Nothing
%>