<% set conn=server.CreateObject ("adodb.connection") conn.CursorLocation =3 conn.Open application("ConnectionSTR") %> <%=application("companyName")%>
 
<% set rsinfo=conn.Execute ("select infoStr1 from [info] where iType='BuyInfo'") if not rsinfo.eof then response.Write replace(rsinfo(0),vbcrlf,"
") end if rsinfo.close set rsinfo=nothing %>
Copyrightc© Two Sex Girls CD
ijsѪR 800X600

<% conn.Close set conn=nothing session("LinkStr")="/include/buyinfo.asp?" %>