<% PageShowSize=10 MyPageSize=12 %>
 

请您给我们评分
产品与描述相符:1分  2分  3分  4分  5分
卖家的服务态度:1分  2分  3分  4分  5分
卖家的发货速度:1分  2分  3分  4分  5分

为了保证质量与售后服务,所有的产品都是统一由广州总部发出。

如何订购?

第1种:你可以直接在网页上直接订购,下订后会有客服电话与你确认的。
第2种:你可以将你要订的"产品编号,你的收货地址,姓名"发信息到客服手机上。
收到订单后,我们一般会当天给你发货,全国3-7天到。货到了你指定地点后,快递送货员打你电话,你收到货就直接给钱送货员。
1:包装保密,配送保密,放心订购!
  本站所有产品均做到:包装保密,配送保密,客户信息保密!你可以放心订购。
如果你不方便留家里的收货地址,你只须留你附近的地址,只要你5分钟内能到就行!这样可以最大可能的保证你的隐私。但地址一定要具休,否则我们发不出货的。
姓名你可以只留姓氏,(比如:张先生,张小姐)。但电话一定要真实,因为送货员到了你所提供的地址后会打你电话的!
2:快递送货,货到付款!
  快递送货,货到之前会提前打你电话的。你收到货就直接给钱送货员就行了。保证了你的安全!
3:庆贺本站成立5周年,不管订多少全国都是免运费!
  庆贺本站成立5周年!不管订哪些产品,不管订多少,我们将为你免费送货。你只要给货款,无任何其它费用!
4:不管订多少,都有礼品送!
  不管订多少产品,均可以得到本站免费送的杜蕾斯安全套一盒(价值20元)
超过500元,免运费。送杜蕾斯安全套一盒,伟哥一粒。(价值135元)

<% 'On Error Resume Next If Rs.RecordCount>0 Then Response.Write("共有信息:"&Rs.RecordCount & "条  分页:") 'pageshowsize 每组页码数量 -- 每页显示的页面连接数,即1 2 3 4 5之类的,这样就是5个,作用是每pageshowsize页的翻记录 PageNextSize=int((MyPage-1)/PageShowSize)+1 '确定上一组页码的组号,如1-10组页码组号为1,2-20组号为2 Pagetpage=int((total-1)/rs.PageSize)+1 '确定最后一组页码组号 '产生上一组页码的连接,如果上一组页码组号pageshowsize大于1的话,则表示目前已经是第二组以上页码,可以显示前一组页码,则显示 if PageNextSize >1 then PagePrev=PageShowSize*(PageNextSize-1)'前组第一个数字 Response.write "9 " 'Response.write "页首 " end if '显示前一页,即当前页减一 if MyPage-1 > 0 then Prev_Page = MyPage - 1 Response.write "7 " end if '以下显示本组页码列表,既1 2 3 4 5或者11 12 13 14 15之类的 '如果总页数大于等于下一页码组最大页码,则当前组的页码数量为系统定义的每组页码数量 if Maxpages>=PageNextSize*PageShowSize then PageSizeShow = PageShowSize Else'如果小于,则当前组为最后一组,页码数量就是总的减去前一组的页码大值 PageSizeShow = Maxpages-PageShowSize*(PageNextSize-1) End if If PageSizeShow < 1 Then PageSizeShow = 1 '列出本组页码 for PageCounterSize=1 to PageSizeShow PageLink = (PageCounterSize+PageNextSize*PageShowSize)-PageShowSize if PageLink <> MyPage Then Response.write "[" & PageLink & "] " else Response.Write "["& PageLink &"] " end if If PageLink = MaxPages Then Exit for Next '下一页 if Mypage+1 <=Pagetpage then Next_Page = MyPage + 1 Response.write "8" end if '下一组页码 if MaxPages > PageShowSize*PageNextSize then PageNext = PageShowSize * PageNextSize + 1 'Response.write " 页尾" Response.write " :" End if End if rs.Close : Set Rs = Nothing %>