<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>

用户名： 密码： 验证码： 设为首页 | 收藏本站 首页 出租中心 出售中心 求租中心 求购中心 商铺新闻 商铺知识 商铺风水 开店一点通 　 商铺分区 福田 罗湖 南山 宝安 龙岗 盐田 　　  商铺查询： 搜索类型 -->意向<-- 商铺出租 商铺出售 商铺求租 商铺求购 区域 -->区域<-- 福田 罗湖 南山 宝安 龙岗 盐田 面积 -->面积<-- 1000m²以下 1000-2000m² 2000-5000m² 5000-8000m² 8000-10000m² 10000m²以上   <% db1="/! _spdb/# qy_sp !#/#qy_spdb.mdb" Set conn1 = Server.CreateObject("ADODB.Connection") connstr1="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(""&db1&"") conn1.Open connstr1 set rs=server.CreateObject("adodb.recordset") rs.open "select top 10 [id],title,filepath from News_Info where [type]='特别关注' order by id desc",conn1,1,1 if rs.eof then response.Write("") else while not rs.eof %> <% rs.movenext wend end if rs.close %> 暂时没有特别关注信息!!! · <% if len(rs("title"))>10 then response.Write(""&left(rs("title"),10)&"..."&"") else response.Write(""&rs("title")&"") end if %> ·阿里妈妈帮你实现网络赚钱梦 平整简洁的豪华型厨房图展 深圳房价“功不可没” 理性投资时代来临   几条创业赚钱经典名言 发表日期:2007-8-22 下午 01:54:30  信息来源:深圳商铺网 　　1、一个人如果赚得比你多10倍，而在工作上花的时间又不比你多，那么他一定是做了与你大不相同的事。 　　2、人们所拥有最伟大的事物，就是自由。钱财能带来自由。 　 　　3、人们过分忙碌于应付生活，而无法停下来思索如何解决他们的金钱问题。大多数人甚至无法花1小时的时间来想想他们应如何致富，以及他们为何从来不这么做。 　 　　 4、写下你想要的金钱数目，以及你给自己多少时间去赚到这笔钱。这就是神秘的致富秘密。 　　5、整天工作的人，没有时间挣钱。 　 　　 6、一个人有100万并不能称为“百万富翁”，只有那些拥有100万但又能连续投资使100万再增值100万的人， 才可以称得上“百万富翁”。前者充其量只是个“存款额”很高的人，他们不能荣获“百万富翁”的称号。 　　 7、凡是用金钱买不到的东西用金钱买到了，它原有的价值便不存在了。 　 　　 8、1角硬币和20美元的金币沉在海底是毫无区别的。只有当你将他们拾起并投入流通时，它们的价值区别才显现出来。 　 　　9、富人舍钱，穷人舍力。富人思来年，穷人思眼前。 　 　　 10、一位百万富翁说：我一直让自己的收入来满足自己的需要，相反，许多人喜欢调整自己的需要来适应自己的收入。 　 　　11、做生意第一要大胆，第二要大胆，第三还是要大胆。 　 　　 12、便宜没好货，好货不便宜，因为成本在那摆着呢。 　 　13、商业本质是不公正的。利润就是最大的不公正，真正的公正应该是没有利润。 　 　　 14、洛克菲勒曾经说过这样一句话：即使把我的衣服脱光，再放到杳无人烟的沙漠中，只要有一个商队经过，我又会成为百万富翁。 　　　　 欢迎友情链接:   北京厂房财富信息网　| 上海厂房财富信息网 | 　广州厂房财富信息网 　|　 东莞厂房财富信息网 |　 武汉厂房财富信息网 |   深圳厂房财富信息网 <% db="/! _spdb/# qy_sp !#/#qy_spdb.mdb" Set conn = Server.CreateObject("ADODB.Connection") connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(""&db&"") conn.Open connstr set rs=server.CreateObject("adodb.recordset") rs.open "select * from links order by linkorder asc",conn,1,1 dim i i=0 response.Write("") while not rs.eof response.Write("") i=i+1 if i mod 6 =0 then response.Write("") rs.movenext wend rs.close set rs=nothing conn.close set conn=nothing %> "&rs("linkname")&"