当前位置:首页 » 操作系统 » asp游戏源码

asp游戏源码

发布时间: 2023-08-26 02:04:34

① 请人修改一下asp源码

我用的是“就爱设计V6版”更改的,程序就是你提供的那个源程序:

第一步:将下载下来的压缩解压,解后在得到的文件夹下面找到“inc”文件夹,复制到你网站的目录下;保留effects.js、lightbox.css、lightbox.js、prototype.js、scriptaculous.js这五个文件,其它的可删除。

第二步:在你显示照片的那个文件中的<head></head>区域加入如下代码:
<link rel="stylesheet" href="inc/lightbox.css" type="text/css" media="screen" />
<script src="inc/prototype.js" type="text/javascript"></script>
<script src="inc/scriptaculous.js?load=effects" type="text/javascript"></script>
<script src="inc/lightbox.js" type="text/javascript"></script>

注意上面的路径,根据自己的实际情况调整。

第三步:你图片的超链要改成如下格式:<a href="Images/2006561019522.jpg" rel="lightbox[plants]"><img src="Images/2006561019522.jpg" width="49" height="49" border="0"></a>

即<a>中,href值要为图片地址,后面还要加rel="lightbox[plants]" ,如果没有则不会达到那样的效果;

◆我将你的源码改成如下:

<%
set skinrs=conn.execute("select proct_skins from sd_skins where id="&sd_web(5)&"")
if skinrs.eof then
response.Redirect("error.asp?title="&server.URLEncode("模板参数设置错误")&"")
response.End()
else
show=skinrs(0)
webcode
response.Write(""&show&"")
end if

sub showpic(n,w,h,m)
show_pic="<table width='98%' border='0' align='center' cellpadding='0' cellspacing='0'>"
show_pic=show_pic&"<tr>"
show_pic=show_pic&"<td height='4'></td>"
show_pic=show_pic&"</tr>"
show_pic=show_pic&" </table>"
show_pic=show_pic&"<table width='98%' border='0' align='center' cellpadding='0' cellspacing='0'>"
show_pic=show_pic&" <tr>"
classid=trim(request("classid"))
if classid="" or not isnumeric(classid) then
classid=0
else
set rs1=conn.execute("select id from sd_class where followid="&classid&"")

tj="classid="&classid&" "

while not rs1.eof
tj=tj&" or classid="&rs1(0)&""
rs1.movenext
wend
end if
select case classid
case "0"
sql="select id,title,pic from sd_proct order by id asc"
case else
sql="select id,title,pic from sd_proct where "&tj&" order by id asc"
end select
set rs=server.CreateObject("adodb.recordset")

rs.open sql,conn,1,1
if rs.eof then
show_pic=show_pic&"没有资料"
else
rs.pagesize=clng(n)
currentpage=Clng(request("page"))
if currentpage<1 then currentpage=1
if currentpage>rs.pagecount then currentpage=rs.pagecount
rs.absolutepage=currentpage
i=0
k=0
Do While Not rs.Eof

show_pic=show_pic&" <td><table border='0' cellspacing='2' cellpadding='0'>"
show_pic=show_pic&"<tr>"
show_pic=show_pic&" <td colspan='2'><a href='"&rs(2)&"' rel='lightbox[plants]'>"
show_pic=show_pic&"<img src='"&rs(2)&"' alt='"&rs(1)&"' width='"&w&"' height='"&h&"' border='0' class='proct'></a></td>"
show_pic=show_pic&"</tr>"
show_pic=show_pic&"<tr>"
show_pic=show_pic&"<td width='50%' height='30' align='left'>产品编号:<a href='showproct.asp?id="&rs(0)&"'>"&classid&"-"&rs(0)&"</a></td>"
show_pic=show_pic&"</table></td>"

i=i+1
k=k+1
if k=clng(m) then
k=0
show_pic=show_pic&"</tr><tr>"
end if
rs.MoveNext
If i>=rs.pagesize Then Exit Do
Loop

show_pic=show_pic&"<tr>"
show_pic=show_pic&"<td height='30' colspan='3' align='center'>共有: "&rs.recordcount&" 信息 "
show_pic=show_pic&"<a href="&request.ServerVariables("url")&"?classid="&classid&">首页</a> "
show_pic=show_pic&"<a href="&request.ServerVariables("url")&"?page="¤tpage-1&"&classid="&classid&">上一页</a>"
show_pic=show_pic&" <a href="&request.ServerVariables("url")&"?page="¤tpage+1&"&classid="&classid&">下一页</a>"
show_pic=show_pic&" <a href="&request.ServerVariables("url")&"?page="&rs.pagecount&"&classid="&classid&">尾页"
show_pic=show_pic&"</a></td>"
show_pic=show_pic&"</tr>"
end if
show_pic=show_pic&"</table>"
end sub
%>

② asp源码/网络编程

if Request.QueryString("link")<>"" then '如果link参数不为空值
linkpath=Request.ServerVariables("Query_String") '获得所有参数字串即"?"后面的部分,如xxx.asp?a=1&b=2 linkpath的值就是a=1&b=2
pos=Instr(linkpath,"link=") '获得 字串 link= 在linkpath中的位置
linkpath=right(linkpath,len(Request.ServerVariables("Query_String"))-pos-4)
'len(Request.ServerVariables("Query_String"))-pos-4 '获得 字串 link以后的字串,包含link 然后-4 得到=的距左的位置,再Rigth取得=后边的字串
Response.Redirect(linkpath) '浏览器转向
else
Response.Redirect("main.asp") '同上
end if

写这代码的人闲的? 得到的结果就相当于Request.QueryString("link")的值

等同以下代码
if Request.QueryString("link")<>"" then
Response.Redirect(Request.QueryString("link"))
else
Response.Redirect("main.asp")
end if

③ asp源代码

想学asp,先了解asp有什么功能,常用有什么函数

再了解asp的基本语法,不超过5-6种基本语法

等了知道asp能做什么事,再想办法解决实际问题

比如要在页面打印hello

直接在<%%>之间打入 Response.Write("hello")

如果想晚上一点至二点就打印hello,其它时间打印ok,就这个写

if hour() > 1 and hour() < 2 then
Response.Write("hello")
else
Response.Write("ok")
end if

是用你的思维去指挥电脑做事的。电脑其实也很傻,要你一步一步告诉它怎么做。

④ 网上下载的ASP源码怎么使用

用dreamweaver打开,编辑
你要懂点代码才行 你没有这方面的基础的话,可以去下个科讯cms模板,直接就可以改,图形化的很好用

⑤ 下载的asp源码怎么使用

关于源码到底应该什么使用的问题
做为一个新手+菜鸟,特别是喜欢搞自己的网站却对源码的概念一窍不通的人来说

。最大的痛苦莫过于把一个源码下载下来之后,却发现自己不知道什么用。一般

下载下来都是一个压缩包,一解压里面都是一大堆自己以前从没见过的文件类型

。这鬼东西什么用呢?又不能像QQ等软件一样直接双击就可以安装。而一些解说

里又说只要把它们全部上传到空间里就可以了。这样笼统的说法可以菜鸟们难住

了,本文就是专门对这样的菜鸟讲解如何使用源码的。这里只说asp和php源码,

其它源码同理。

<一>:
1:首先针对asp,如果你是要在本地,也就是自己的电脑上使用的话,就必须得

先安装iis服务。现在的电脑操作系统精简得太多,绝大部分都把这个服务去掉了

。所以你不得不自己下载一个iis安装包来安装。先用迅雷搜索一下iis,看到评

价最多的,大部分人都说好用的,就把它下载下来。下载完以后解压。
打开电脑控制面板,添加/删除程序,添加/删除windows组件,把Internet信

息服务(IIS)前面的小方框内打上勾,其它不用管,点下一步;然后它会提示你插

入磁盘,点确定,又出现个对话框,文件复制来源那里点浏览到你刚才解压后的

文件夹,选中打开;接着后面会连着冒出几次一样的对话框,重复刚才的操作就

可以了。安装好后,再进入电脑控制面板,性能和维护,管理工具,Internet信

息服务,找到默认网站,右击进入它的属性,文档,分别添加index.asp和

index.htm;主目录(嫌麻烦可以直接跳到下面2),在本地路径更改为一个你喜

欢的文件夹,最好是个空文件夹。例如空文件夹名为“110”,总之什么好记就起

什么名。(注意:如果电脑上找不到Internet信息服务(IIS)的,是电脑操作系统

太过精简的问题,建议安装雨木林风6.0纯净版。)
2:把你下载好的asp源码解压后得到一个文件夹视情况而定,把文件侠里的那一

堆东西全部复制到c盘下的Inetpub下的wwwroot下。或者复制到空文件侠“110”

下。
3:在浏览器里输入:http://localhost/ 或 http://127.0.0.1/ 就可访问这个

源码程序了。
4:如果它提示找不到网页,请先确认你的源码里有没有index.asp等默认文档,

如果有install.asp那就请先运行它,即输入http://localhost/install.asp 或

http://127.0.0.1/install.asp后回车即可。如果还不行,八成是你数据库连接

有问题,请检查conn.asp(用记事本打开,一般是这个文件。)里的数据库的连

接参数是否正确,否则改正之。

<二>:
1:如果是php源码,在本地电脑使用时。要先安装phpnow环境套件包,里面包含

了php+mysql等,也是用迅雷搜索下载。那个套件安装很傻瓜化,不用我说了。
2:把所有的源码复制到套件安装目录下的htdocs文件夹里,使用方法如上面的3


3:如果打不开,请先确定你的数据库是需要导入的吗?如果是,请用

http://127.0.0.1/phpmyadmin/导入数据库。再检查数据库连接文件config.php

(用记事本打开,一般是这个文件。)里的数据库连接参数如密码等是否正确,

否则改之。
4:如果你添加了虚拟主机,想在虚拟主机里运行php源码,那就把源码复制到虚

拟主机所控的文件夹下,用“http://虚拟主机地址/ ”来访问。

<三>:
1:如果是想把源码放在网络空间上,自己建立一个网站。请先确认你的空间是支

持哪种类型的源码,比如是asp+access呢还是php+mysql等。
2:如是asp类型的,请把所有源码上传到网站根目录或某一目录,如“120”下,

用“http://你网站域名/”或“http://你网站域名/120/”访问。如出问题请参

考上文。
3:如是php类型的,含有sql数据库的先把数据库导入空间服务器,再根据空间商

提供给你的数据库账号密码修改数据库连接参数,然后全部上传到空间里。访问

同2。如果不含数据库,一般是含有安装文件install.php的,访问不了就运行安

装文件。
4:sql数据库导入问题。请先确认你的空间服务器允不允许远程访问服务器数据

库,如果允许就用sql2000等之类的程序导入数据库,如何导入问题就不说了,网

上一搜大把有。如果不允许就登陆空间服务器提供商给的用户控制面板进入数据

库管理进行数据库的导入。

完毕。

请尊重原创作者,转载请注明出处,尖叫论坛:http://7c.cz.cc http://www.xia20.co.tv

热点内容
小孩什么时候学编程比较好 发布:2025-02-01 12:03:10 浏览:960
c语言的认识 发布:2025-02-01 11:58:03 浏览:520
svn连接服务器地址 发布:2025-02-01 11:51:31 浏览:416
对源程序为什么要编译 发布:2025-02-01 11:47:46 浏览:218
sql表添加记录 发布:2025-02-01 11:22:08 浏览:864
word编辑加密 发布:2025-02-01 11:18:53 浏览:571
php变量文本 发布:2025-02-01 11:10:46 浏览:426
音悦台上传mv 发布:2025-02-01 11:05:02 浏览:516
微信如何设置访问限制 发布:2025-02-01 10:43:06 浏览:335
b站缓存视频下架还有吗 发布:2025-02-01 10:37:52 浏览:940