Discuz!官方免费开源建站系统

 找回密码
 立即注册

QQ登录

只需一步,快速开始

搜索

QQ抢车位本地化插件火爆发布(最后1天)

  [复制链接]
潘洪全 发表于 2010-2-8 14:22:08 | 显示全部楼层 |阅读模式
UCHome插件
语言编码: GBK简体 
插件名称: 抢车位
插件作者:
适用版本: UCHome 2.0
本帖最后由 潘洪全 于 2010-02-09 19:32 编辑

先看图片,然后你再下载, 安装方法 上传到根目录后运行install.php进行安装!
本程序可直接使用腾讯抢车位的SWF文件,有需要的就自己添加!
申明下,压缩包内只是个txt的下载地址···你觉得DZ现在能把一个整包上传上来么? 土。。。
发一小部分后台代码...
      <td class="td1"><form action="?Adminclass=9&action=<%if Request("edit")<>"" then %>editpost<%else%>add<%end if%>" method="post" name="form" >
<%if Request("edit")<>"" then %><input name="pkid" type="hidden" id="pkid" value="<%=pkid%>"><%end if%>
          <table width="100%" border="0" align="center" cellpadding="2" cellspacing="1">
        <tr>
          <td width="15%" bgcolor="#CCFFCC">汽车类</td>
          <td width="35%">
       <select size=1 name="pktype" id="pktype">
<%if Request("edit")<>"" then %>
                     <option value="1" <%if pktype="1" then%>selected<%end if%>>微型车</option>
                   <option value="2" <%if pktype="2" then%>selected<%end if%>>小型车</option>
                   <option value="3" <%if pktype="3" then%>selected<%end if%>>紧凑型车</option>
                   <option value="4" <%if pktype="4" then%>selected<%end if%>>中型车</option>
                   <option value="5" <%if pktype="5" then%>selected<%end if%>>大型车</option>
                   <option value="6" <%if pktype="6" then%>selected<%end if%>>豪华车</option>
                   <option value="7" <%if pktype="7" then%>selected<%end if%>>MPV</option>
                   <option value="8" <%if pktype="8" then%>selected<%end if%>>SUV</option>
                   <option value="9" <%if pktype="9" then%>selected<%end if%>>跑车</option>
                   <option value="10" <%if pktype="10" then%>selected<%end if%>>VIP炫车</option>
<%else%>
                     <option value="1">微型车</option>
                   <option value="2">小型车</option>
                   <option value="3">紧凑型车</option>
                   <option value="4">中型车</option>
                   <option value="5">大型车</option>
                   <option value="6">豪华车</option>
                   <option value="7">MPV</option>
                   <option value="8">SUV</option>
                   <option value="9">跑车</option>
                   <option value="10">VIP炫车</option>
<%end if%>
        </select>
</td>
          <td width="25%">*必须填写</td>
          <td width="15%">*</td>
        </tr>
        <tr>
          <td bgcolor="#FFFFCC">汽车名</td>
          <td><input name="pkname" type="text" class="input1" id="pkname" size="15" value="<%=pkname%>"></td>
          <td>*必须填写</td>
          <td>*</td>
        </tr>
        <tr>
          <td bgcolor="#F4EFCC">汽车图标</td>
          <td><input name="pkgif" type="text" class="input1" id="pkgif" size="15" value="<%=pkgif%>">.gif</td>
          <td>*必须填写</td>
          <td>*</td>
        </tr>
        <tr>
          <td bgcolor="#F4EFCC">汽车价格</td>
          <td><input name="pkmoney" type="text" class="input1" id="pkmoney" size="15" value="<%=pkmoney%>">元</td>
          <td>*必须填写</td>
          <td>*</td>
        </tr>
       <tr>
          <td bgcolor="#FFFFCC">汽车油耗</td>
          <td><input name="pktt" type="text" class="input1" id="pktt" size="15" value="<%=pktt%>">L(升)</td>
          <td>*必须填写</td>
          <td>*</td>
        </tr>
       <tr>
          <td bgcolor="#FFFFCC">每分钟赚</td>
          <td><input name="pktimemoney" type="text" class="input1" id="pktimemoney" size="15" value="<%=pktimemoney%>">元</td>
          <td>*必须填写</td>
          <td>*</td>
        </tr>
        <tr>
          <td bgcolor="#F4EFCC">SWFID</td>
          <td><input name="pkswf" type="text" class="input1" id="pkswf" size="15" value="<%=pkswf%>">.swf</td>
          <td>*必须填写</td>
          <td>*</td>
        </tr> </table>
<table width="400px" border="0" align="center" cellpadding="2" cellspacing="1">
         <tr><td> <div align="center"><input name="page" type="hidden" id="page" value="<%=page%>">
              <input type="submit" name="Submit" value="<%if Request("edit")<>"" then %>修改<%else%>提交<%end if%>">
              <input type="reset" name="Submit2" value="重置">
          </div></td>
        </tr>
     </form></td>
    </tr>
   <tr><td><form action="?Adminclass=9&action=addmoney" method="post" name="form" >UserId:<input name="userid" type="text" class="input1" id="userid" size="6" value=""><input name="cmemoney" type="text" class="input1" id="cmemoney" size="8" value="5000"><input type="submit" name="Submit" value="加钱"></form></td></tr>
</table><br /><br />
<table width="700px" border="0" align="center" cellpadding="2" cellspacing="1">
        <tr>
          <td width="5%" bgcolor="#CCFFCC">序号</td>
          <td width="12%" bgcolor="#CCFFCC">类型</td>
          <td width="12%" bgcolor="#CCFFCC">车名</td>
          <td width="10%" bgcolor="#CCFFCC">标志</td>
          <td width="12%" bgcolor="#CCFFCC">价格</td>
          <td width="12%" bgcolor="#CCFFCC">油耗</td>
          <td width="12%" bgcolor="#CCFFCC">SWFID</td>
          <td width="14%" bgcolor="#CCFFCC">1分钟赚</td>
          <td width="11%" bgcolor="#CCFFCC">操作</td>
        </tr>
<%
set rsadd=server.CreateObject("ADODB.RecordSet")
sqladd="select * from pk_auto order by autoworth desc"
rsadd.open sqladd,u_conn,1,1
if rsadd.eof and rsadd.bof then
response.write "<div align=center><font size=2>还没有车子</font></div>"
else
   rscount=rsadd.recordcount
   rsadd.pagesize=50
   Page_Size=rsadd.pagesize
      pagea=rsadd.pagecount
   page=request.QueryString("page")
   if page="" then
   page=1
   else
      page=cint(page)
      if page<=0 then
      page=1
      end if
      if page>rsadd.pagecount then
      page=rsadd.pagecount
      end if
   end if  
rsadd.absolutepage=page
i = 0
do while not rsadd.eof
%>
      <tr>
          <td align=center><%=rsadd("autoid")%><a name="<%=rsadd("autoid")%>"></a></td>
          <td align=center>
                   <%if rsadd("autotype") = "1" then %>微型车<%end if%>
                   <%if rsadd("autotype") = "2" then %>小型车<%end if%>
                   <%if rsadd("autotype") = "3" then %>紧凑型车<%end if%>
                   <%if rsadd("autotype") = "4" then %>中型车<%end if%>
                   <%if rsadd("autotype") = "5" then %>大型车<%end if%>
                   <%if rsadd("autotype") = "6" then %>豪华车<%end if%>
                   <%if rsadd("autotype") = "7" then %>MPV<%end if%>
                   <%if rsadd("autotype") = "8" then %>SUV<%end if%>
                   <%if rsadd("autotype") = "9" then %>跑车<%end if%>
                   <%if rsadd("autotype") = "10" then %>VIP炫车<%end if%>
          </td>
          <td align=center><%=rsadd("autoname")%></td>
          <td align=center><img src="/apps/car7m8/parking/image/<%=rsadd("autobrand")%>.gif"><br><%=rsadd("autobrand")%></td>
          <td align=center><%=rsadd("autoworth")%>元</td>
          <td align=center><%=rsadd("autott")%>L</td>
          <td align=center><div align="center">
                <object classid="clsid27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=9,0,28,0" width="182" height="87">
                  <param name="movie" value="/apps/car7m8/parking/cars/<%=rsadd("swfid")%>.swf">
                  <param name="quality" value="high">
                  <embed src="/apps/car7m8/parking/cars/<%=rsadd("swfid")%>.swf" quality="high" pluginspage="http://www.adobe.com/shockwave/download/download.cgi?P1_Prod_Version=ShockwaveFlash" type="application/x-shockwave-flash" width="182" height="87"></embed>
                </object>
            </div></td>
          <td align=center><%=rsadd("autotimemoney")%>元/分钟赚</td>
          <td><a href="?Adminclass=9&edit=<%=rsadd("autoid")%>&page=<%=page%>">修改</a> <a href="?Adminclass=9&del=<%=rsadd("autoid")%>" onclick='javascript: return confirm("你确定要删除吗? ");'>删除</a></div></td>
        </tr>
<%
        i=i+1
            if i>=Page_Size then exit do
            rsadd.movenext
             loop
        rsadd.close
        set rsadd=nothing
          %>
</table>
<table width="400px" border="0" align="center" cellpadding="2" cellspacing="1">
        <tr>
           <td>页次 <%
        for i=1 to pagea
        Response.Write("[<a href=?Adminclass=9&page="&i&">"&i&"</a>] ")
        Next
        Response.Write("[共有<font color=red>"&rscount&"</font>辆车][每页"&age_Size&"辆]")
        end if
         %></td>  </r>
      <tr>
      </tr>
</table>

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?立即注册

x
 楼主| 潘洪全 发表于 2010-2-8 14:26:47 | 显示全部楼层
没人支持个?
回复

使用道具 举报

yes211 发表于 2010-2-8 14:42:04 | 显示全部楼层
不喜欢本地游戏 呵呵
回复

使用道具 举报

club731 发表于 2010-2-8 14:43:41 | 显示全部楼层
呵呵!支持!支持!再支持!
218 Bytes

就能做出这么强大的插件!
回复

使用道具 举报

hzh0503 发表于 2010-2-8 14:44:44 | 显示全部楼层
QQ抢车位不是3D的么
回复

使用道具 举报

 楼主| 潘洪全 发表于 2010-2-8 14:48:47 | 显示全部楼层
管它3D2D 能用就不错了···
回复

使用道具 举报

qqlljjk 发表于 2010-2-8 15:01:36 | 显示全部楼层
此帖仅作者可见
回复

使用道具 举报

 楼主| 潘洪全 发表于 2010-2-8 16:16:24 | 显示全部楼层
有问题留言在本帖内!!
回复

使用道具 举报

xiafei8506 发表于 2010-2-8 16:27:59 | 显示全部楼层
有问题留言在本帖内!!
回复

使用道具 举报

xiafei8506 发表于 2010-2-8 16:28:28 | 显示全部楼层
有问题留言在本帖内!!
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

手机版|小黑屋|Discuz! 官方站 ( 皖ICP备16010102号 )star

GMT+8, 2024-11-16 10:28 , Processed in 0.037805 second(s), 6 queries , Gzip On, Redis On.

Powered by Discuz! X3.4

Copyright © 2001-2023, Tencent Cloud.

快速回复 返回顶部 返回列表