<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%> 同城约炮_女找男_约炮 - 夜色交友网
导航 搜索

更多

最新注册美女会员

更多

最新注册帅哥会员

更多

约会故事

    <% set rsx=Server.CreateObject("ADODB.recordset") rsx.open "select top 5 id,username,title,addtime,userid from [love_article] where flag=1 order by id desc",conn,1,1 i=0 do while not rsx.eof addtime = rsx(3) addtime = month(addtime)&"/"&day(addtime)&"/"&year(addtime) %>
  • <%=rsx(1)%> - <%=rsx(2)%>  <%=addtime%>
  • <% i=i+1 rsx.movenext loop rsx.close set rsx=Nothing %>
  • 热门城市

    <% set rs=Server.CreateObject("ADODB.recordset") rs.open "select top 60 id,cityname,pinyin from [Wiki_city] where flag='1' order by id",conn,1,1 i=0 do while not rs.eof %><%=rs(1)%> <% i=i+1 rs.movenext loop rs.close set rs=Nothing %>

  • 热门主题

    <% set rsx=Server.CreateObject("ADODB.recordset") rsx.open "select top 25 id,keys from [Z8_ys4_keys] where 0.01 >= CAST(CHECKSUM(NEWID(), id) & 0x7fffffff AS float) / CAST (0x7fffffff AS int) ",conn,1,1 i=0 do while not rsx.eof %><%=rsx(1)%> <% i=i+1 rsx.movenext loop rsx.close set rsx=Nothing %>

  • 友情链接

<%closeconn%>