最新WEB游戏源码服务端(完整修改版).doc

2011WEB网页游戏服务端源码全集webgame源码，本人已测试，供大家下载一、抢车位源码停车大战ASP+ACCESS带MSSQL版权声明：（停车大战V1.0FORDVBBSAC)停车大战V1.0FORDVBBS版本，是由NDS.西域数码(NWDS.CN)于2008年11月开发，作者:SING_CEE游戏演示地址WWW.NWDS.CN/BBS本游戏插件于2008年12月圣诞节前免费开放游戏源码，供开发爱好者体验和改进，无论你是使用还是改进本游戏都请保留这些文字声明，如果你有重大的改进或开发方面有什么难题请发信息给我。安装步骤：1.将DVBBS82.MDB中的4个数据表导入你的DVBBS数据库中。2.拷贝所有文件和文件夹到DVBBS根目录。3.在DVBBS后台插件管理论坛菜单管理新建菜单标题：停车大战注释版权：停车大战V1.0NWDS.CN西域数码链接：parking.asp插件ID:parking能使用插件的用户组：1,2,3,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,264.提交二次开发说明：停车大战游戏使用ASP和FLASHAS相结合这是一种最新的WEB应用发展方向，这个游戏源码希望对WEB游戏初学者有所帮助。欢迎有兴趣的开发者改进停车大战游戏插件，并请在新的版本中保留本文中的版权声明！目前停车大战游戏还有部分功能没有完善，比如游戏中赚取的金钱和论坛中的金币互相兑换功能，以及金钱奖励方式的更加合理化，增加后台管理（增加新车、增加新车位背景、奖励控制、汇率等管理）还有很多功能都需要大家一起来完善。停车大战文件说明：parking.asp停车大厅游戏主文件pkbuy.asp购车pkbuywnd.asp购车窗体pkchangewnd.asp换车窗体pkecwnd.asp换金币窗体pkfk.asp罚款操作调用pkhelp.asp帮助pknewsp.asp读车位信息调用pknextcar.asp停车选择车pkpostcar.asp确认停车pkreg.asp注册游戏pksellwnd.asp出售窗体pktop.asp排行榜目录parkingcars各种车的SWF文件image所有图片parking.swf封装的FLASH文件parking.swf是一个用FLASHAS3封装的FLASH程序文件，他通过与ASP文件的通信读取和传递数据、参数。具体如何传递数据可以通过研究pknewsp.asp（获取当前停车位信息）pknextcar（获取待停辆信息）pkpostcar.asp（停放车辆）pkfk.asp（罚款）这4个ASP文件中的变量vNewLines和Request变量获得。实在懒得在看一遍代码就简单说明一下吧：/例如：pknextcar.aspvnextcar=Request(nextcar)就是读取从parking.swf返回的参数nextcar返回数据给parking.swf：vNewLines=rs(mycarid)&|&rs(autoname)&|&rs(swfid)&|&maxcar&|&rs(autotype)Response.WriteNewLines=&Server.URLEncode(vNewLines)&Result=OK数据表说明：将所有数据表导入DVBBS82.MDB详细结构字段说明见数据表结构备注pk_auto所有汽车资料pk_miss事件消息pk_mycar所有用户车的信息pk_spaces所有用户的车位信息点击下载地址：抢车位源码停车大战ASP+ACCESS带MSSQL2、魔兽网页游戏源码(asp)完整版web魔兽源码支持纯access模式，也支持sqlserver。我们这里只讨论纯access模式的架设。所以游戏运行的电脑上需要安装access数据库。首先，点击AspMao.exe，就可以启动netbox支持asp(如果你有iis的话就不要点击了，把代码放到iis根目录下)，访问/main/下面找到配置文件：FS_Inc/Const.asp1、修改如下代码： -会员系统是Sql数据库；1:SQL,0:ACCESS ConstG_IS_SQL_User_DB=1复制代码为 -会员系统是Sql数据库；1:SQL,0:ACCESS ConstG_IS_SQL_User_DB=0复制代码启用access模式。2、修改 -会员数据库,后面不能带/,不带虚拟目录 ConstG_User_DATABASE_CONN_STR=Server=.;UserID=saassword=123456;Database=wow2复制代码为 -会员数据库,后面不能带/,不带虚拟目录 ConstG_User_DATABASE_CONN_STR=Foosun_Data/FS_ME.mdb复制代码3、修改/main/lib/Line.asp SqlNowString=GetDate()如果是SQL数据库请使用呢个 SqlNowString=Now()如果是ACCESS数据库请使用呢个复制代码修改为 SqlNowString=GetDate()如果是SQL数据库请使用呢个 SqlNowString=Now()如果是ACCESS数据库请使用呢个复制代码注释掉sqlserver的sql函数语句4、修改/main/lib/Line.asp第43行User_Conn.execute(DeletefromFS_ME_UsersOnlinewhereUserName=orUserNumber=orDateDiff(&SqlChar&n&SqlChar&,lasttime,&SqlNowString&)&UserOnlineTime&)注释掉这句删除超时在线用户的代码，这个在access里有问题。好了，访问/main/就可以显示登录页面了。注册一个用户就可以进去玩了点击下载地址：魔兽网页游戏源码(asp)完整版三、剑侠2外传（网页游戏源码）=外网=剑侠外传源码安装步骤：一、上传所有文件，注意：global.asa必须上传到网站的根目录（虚拟目录），首先到首页注册好授权站长的帐号，然后运行：http:/江湖绝对路径/setup/setup.asp进入超级管理，然后选择用户管理，将你的帐号设置成，门派：六扇门；身份：掌门；等级：11然后进入系统设置进行其他项目的设置！为确保安全设置好后务必将setup文件夹删除！二、注意事项：1、站长参数：门派：六扇门身份：掌门等级：112、特别注意：站长必须从站长安全登录口登录，并要求输入密钥，非授权站长或者输入了错误的密匙从安全登录口登录都将出现蓝屏死机，网管秘密登录口默认路径：http:/江湖绝对路径/mm.asp也可以自行修改，注意保密，密匙可以到站长管理-系统设置-更改密匙进行更改！默认密匙为：13、找回密码功能需要服务器的*TP服务的支持，所以某些空间未安装此组建使用时出现500内部错误属于正常，请找空间服务商解决！关于服务器的安装组件可以用本江湖的test.asp服务器探针测试得到！点击下载地址：剑侠2外传（网页游戏源码）=外网=剑侠外传源码Ogame私服(傻瓜式一键安装版本）只要把这个程序上传后.在输入/install/就是你的域名。只要跟流程来做写上你的数据库帐号和密码就好了！点击下载地址：Ogame私服(傻瓜式一键安装版本）四、仿QQ农场牧场（源码）最新安装步骤:1.将压缩包内文件解压，上传upload里的所有文件到相应文件夹（你的uchome根目录下）2.到phpmyadmin导入uchome_happyfarm_config.sqluchome_happyfarm_mc.sqluchome_happyfarm_nc.sql数据库文件(如果前缀不是默认的uchome_替换成你的前缀否则农场无法连接调用mysql数据库)3.在header.htm文件中，搜索“热闹”，并在后面加以下代码开心农场5.更新UCH缓存，开始感受完美QQ版农场6.补充说明：修改开通牧场VIP等级：打开happyfarmindex.php文件查找reqYellowlevel修改后面的数字1、修改开通牧场VIP等级：打开happyfarmindex.php文件查找reqYellowlevel修改后面的数字2、名称乱码：搜索:happyanimal.php和happyfarm.php里的函数unicode_encodegb替换为unicode_encode3、作物/动物介绍，说话乱码：打开happyfarmmodulencini.x文明用语，happyfarmmodulemcini.x文明用语另存为utf-8编码格式4、公告修改打开:happyfarm.php查找:getNotice下面找到:echoid:.$_SGLOBALtimestamp.,content:u63D0u793AuFF1Au5929u6C14u8F6Cu51B7uFF0Cu8BF7u591Au70E4u706BuFF0Cu5C11u4E0Au7F51uFF0Cu5C11u5077u83DCuFF0Cu7231u62A4u597Du81EAu5DF1u7684u8EABu4F53u3002-u519Cu573Au7BA1u7406u5458,time:.$_SGLOBALtimestamp.,code:1;使用工具:Unicode中文互转，进行修改5、关于注册默认VIP等级在数据库初始值上修改.暂时未做文本配置.6、关于装饰反复购买和刷经验问题都是假像.由于还没完成YB购买的代码所以未对数据库操作.刷新就恢复7、.简易管理后台如何使用http:/你的home地址/adminfarm.php用户UID:为数字ID不是帐号8、一键摘取时间段设置打开happyfarmindex.php文件查找batchStealHour修改后面的参数.注意按照格式9、.home主页动态提示名称显示编码修复打开happyfarm/happyfarm.php查找$touserspacename=unicode_encodegb($touserspacename);删除此行10、狗咬人的钱修改查找：$dog_money=$cropstype$asale;$int2_temp=rand(1,10);if($int2_temp8)上面的8越小，咬人的几率越高往下.$dog_money=$dog_money+round(20*rand(1,30)/5)*rand(1,2);else$dog_money=$dog_money+round(10*rand(1,20)/5);rand是取随机数round是四舍五入根据自己需要进行调节。可以改rand（1，20）将后面的数字缩小，或者将数字5调大狗咬人的钱就少了！点击下载地址：仿QQ农场牧场（源码）最新五、Flash斗地主源码（网页斗地主源码）网页版的在线三人斗地主游戏，Flash+PHP5+Mysql5，打开网页即可直接斗地主，无需下载客户端！新增了提示、托管、记分牌、声音、时钟、好友邀请等功能。点击下载地址：Flash斗地主源码（网页斗地主源码）六、停车大战V1.0源码软件类型：国产软件 授权方式：共享软件 界面语言：简体中文 软件大小：5 MB 文件类型：.rar 运行环境：Win2003,WinXP,Win2000,Win9X 软件等级： 发布时间：2010-09-18 官方网址：http:/ 演示网址：http:/ 下载次数： 88 软件介绍 %dim i,page,rscount,pagea page=request.QueryString(page)if Request(action)=add thenIF not isNumeric(request.form(pkmoney) then response.write response.write alert(error!请输入数字!);response.write response.write location=javascript:history.back(1) response.endEnd ifIF not isNumeric(request.form(pktimemoney) then response.write response.write alert(error!请输入数字!);response.write response.write location=javascript:history.back(1) response.endEnd ifIF not isNumeric(request.form(pktype) then response.write response.write alert(error!请输入数字!);response.write response.write location=javascript:history.back(1) response.endEnd ifif trim(request.form(pkname)= then response.write response.write alert(请输入车名);response.write response.write location=javascript:history.back(1) Response.End end ifif trim(request.form(pkgif)= then response.write response.write alert(请输入车的gif);response.write response.write location=javascript:history.back(1) Response.End end ifif trim(request.form(pkswf)= then response.write response.write alert(请输入车的swf);response.write response.write location=javascript:history.back(1) Response.End end ifif trim(request.form(pktt)= then response.write response.write alert(请输入油耗);response.write response.write location=javascript:history.back(1) Response.End end ifset rsadd=server.CreateObject(ADODB.RecordSet)sqladd=select * from pk_autorsadd.open sqladd,u_conn,1,3rsadd.addnewrsadd(autotype)=trim(request(pktype)rsadd(autoname)=trim(request(pkname)rsadd(autobrand)=trim(request(pkgif)rsadd(autoworth)=trim(request(pkmoney)rsadd(autott)=trim(request(pktt)rsadd(swfid)=trim(request(pkswf)rsadd(autotimemoney)=trim(request(pktimemoney)rsadd.updatersadd.close response.write response.write alert(添加样式成功!继续添加!);response.write response.write location=user_music_admin.asp?Adminclass=9rs.closeset rs=nothingend ifif Request(action)=addmoney thenIF not isNumeric(request.form(cmemoney) then response.write response.write alert(error!请输入数字!);response.write response.write location=javascript:history.back(1) response.endEnd ifIF not isNumeric(request.form(userid) then response.write response.write alert(error!请输入数字!);response.write response.write location=javascript:history.back(1) response.endEnd ifmusicconn.Execute(UPDATE pk_spaces Set pkumoney = pkumoney +&request.form(cmemoney)& where pkuid = &request.form(userid) response.write response.write alert(加钱成功!USERID=&request.form(userid)& 金钱+&request.form(cmemoney)&元);response.write response.write location=user_music_admin.asp?Adminclass=9end ifif Request(action)=editpost thenIF not isNumeric(request.form(pkmoney) then response.write response.write alert(error!请输入数字!);response.write response.write location=javascript:history.back(1) response.endEnd ifif not isNumeric(request.form(pkid) then response.write response.write alert(错误！);response.write response.write location=javascript:history.back(1) Response.End end ifIF not isNumeric(request.form(pktimemoney) then response.write response.write alert(error!请输入数字!);response.write response.write location=javascript:history.back(1) response.endEnd ifIF not isNumeric(request.form(pktype) then response.write response.write alert(error!请输入数字!);response.write response.write location=javascript:history.back(1) response.endEnd ifif trim(request.form(pkname)= then response.write response.write alert(请输入车名);response.write response.write location=javascript:history.back(1) Response.End end ifif trim(request.form(pkgif)= then response.write response.write alert(请输入车的gif);response.write response.write location=javascript:history.back(1) Response.End end ifif trim(request.form(pkswf)= then response.write response.write alert(请输入车的swf);response.write response.write location=javascript:history.back(1) Response.End end ifif trim(request.form(pktt)= then response.write response.write alert(请输入油耗);response.write response.write location=javascript:history.back(1) Response.End end ifif trim(request.form(pkid)= then response.write response.write alert(错误！);response.write response.write location=javascript:history.back(1) Response.End end ifset rsadd=server.CreateObject(ADODB.RecordSet)sqladd=select * from pk_auto where autoid=&trim(request.form(pkid)&rsadd.open sqladd,u_conn,1,3rsadd(autotype)=trim(request(pktype)rsadd(autoname)=trim(request(pkname)rsadd(autobrand)=trim(request(pkgif)rsadd(autoworth)=trim(request(pkmoney)rsadd(autott)=trim(request(pktt)rsadd(swfid)=trim(request(pkswf)rsadd(autotimemoney)=trim(request(pktimemoney)rsadd.updatersadd.closeset rsadd=nothing response.write response.write alert(修改成功!);response.write response.write location=user_music_admin.asp?Adminclass=9&edit=&trim(request.form(pkid)&page=&trim(request.form(page)&#&trim(request.form(pkid)&end ifIF Request(del) Then musicconn.Execute(Delete From pk_auto Where autoid=&Request(del) response.write response.write alert(删除成功！);response.write response.write location=user_music_admin.asp?Adminclass=9 Response.EndEnd IFdim rspkinfo,pkid,pktype,pkname,pkgif,pkswf,pkmoney,pktimemoney,pkttif Request(edit) and Request(edit)0 thenSet rspkinfo = musicconn.Execute(Select * From pk_auto Where autoid=&Request(edit)&) pkid=rspkinfo(autoid) pktype=rspkinfo(autotype) pkname=rspkinfo(autoname) pkgif=rspkinfo(autobrand) pkswf=rspkinfo(swfid) pkmoney=rspkinfo(autoworth) pktimemoney=rspkinfo(autotimemoney) pktt=rspkinfo(autott)rspkinfo.closeset rspkinfo=nothingend if% 添加车子 form action=?Adminclass=9&action=%if Request(edit) then %editpostadd method=post name=form %if Request(edit) then %input name=pkid type=hidden id=pkid value= 汽车类 %if Request(edit) then % option value=1 selected微型车 option value=2 selected小型车 option value=3 selected紧凑型车 option value=4 selected中型车 option value=5 selected大型车 option value=6 selected豪华车 option value=7 selectedMPV option value=8 selectedSUV option value=9 selected跑车 o