%@LANGUAGE="VBSCRIPT"%> <%option explicit%> <% Dim strPropId,rsGetPropDetails,strPropDetailsSql,arrImages,strImages 'strPropId=Request.QueryString("propid") strPropDetailsSql="Select * from tblProperties where prop_featured='yes'" Set rsGetPropDetails=Server.CreateObject("adodb.recordset") rsGetPropDetails.open strPropDetailsSql,objConn,3,3 strImages=trim(rsGetPropDetails("prop_image")) arrImages=split(rsGetPropDetails("prop_image"),",") %>
|
|||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||