仓酷云

 找回密码
 立即注册
搜索
热搜: 活动 交友 discuz
查看: 701|回复: 12
打印 上一主题 下一主题

[学习教程] ASP编程:2yup漂泊祈愿瓶人人一齐做(三)

[复制链接]
愤怒的大鸟 该用户已被删除
跳转到指定楼层
楼主
发表于 2015-1-16 23:35:17 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

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

x
ASP最大的缺点在于网络的安全性和可靠性,企业将经营数据放在开放的平台上,最大的担忧就是如何保证这些数据不被其他人破坏。《2yup漂泊祈愿瓶人人一齐做》(三)


***************************************************************
(接上讲七的第一前面)
----------------------------------------------------------------
以下内容是:1、设定区。2、参数处置。3、通用函数。
请将他们分离放到第一讲(四)“站点的页面计划”指定的地位,实在安排
版面是在第二讲的(七)“站点网页制造”的步骤1内的顶上和下角。
------------------------------------------------------------------


2、(步骤3)按照(一)和构架创建设定区。

构建立置区次要是依据(一)功效和请求的第14点请求,如今将他们完成以下:
<%
**************************
*****设定区部分*****
**************************

=================基础设定===============
max=7每页显现数
ListNum=16边上列表数量
rate=2办理或搜刮时瓶子流速
User="8chinaasp"办理用户名
PassWord="8chinaasp"办理暗码
PageTitle="2YUP漂泊祈愿瓶"网页称号
homepage="2yup.com"主页网址,不必加http://
MyWeb="ASP中文网"主页称号
imgType=".gif"不必改
picPath="pic/"图片档案夹路径
path="Pic/wishBoard.mdb"数据库路径(为平安请变动)
=================毗连设定===============
右边链接[注重:“||”是支解符],这是发生自界说链接的设定
援用通用函数中的MyLinks(LinkArr)就能够发生。
申明:排序应当是[链接称号]||[链接申明]||[链接网址]两头利用支解符“||”

L1="主页||ASP中文网||http://"&homepage&""
L2="文档||文档中央||http://www.2yup.com/asp/article/"
L3="论坛||ASP论坛||http://www.2yup.com/asp/"
%>


<%
****************************
*****参数处置部分*****
****************************
================参数处置================
猎取数值
keyword=Trim(Request("k"))
howfind=Trim(Request("h"))
Cpage=Trim(Request("Page"))
Action=Trim(request("Action"))
id=Trim(request("id"))
UserName=Session("User")
办理或加入
IfAction="exit"Then
Calllogout()
Endif
保持数据库
Callopendb(conn,path)
处置登进和删除
SelectCaseAction
登进
Case"login2"
Calllogin2
删除
Case"del"
CalldelWish()
消失落id才不会为显现已删瓶子而堕落
id=""
EndSelect

====处置数据库====
求取搜刮数据
ifkeyword""then
findData="and"&howfind&"like%"&checkStr(keyword)&"%"
endif
求取单个祈愿数据
ifid""then
findData=findData&"andid="&id&""
endif
设定读写形式
LockType=1
ifinStr(Action,"Save")orinStr(Action,"detail")then
LockType=3
endif
举行数据库查寻
sql="select*fromwishwherePass=True"&findData&"orderbydatedesc"
Callchangetable(conn,sql,rs,LockType)
瓶子总数
num=rs.recordcount

====有数据处置====
IFrs.EOFTHEN
设定没无数据时的提醒内容
ifid=""andkeyword=""then
Msgs="<b>恭喜您将成为第一个许愿人!</b>"
else
Msgs="<b>没有您要找的许愿瓶!</b>"
endif
ENDIF
%>


3、(步骤4)按照(四)和构架编写通用函数。
实在这个步骤和下一个步骤5--“编写各部位程式”,是不克不及截然分隔的,
分明的通用函数能够间接利用和在这步中下手编写,可是有的则必要到下
一步的时分分离副程式的编写才干准确的写出来。如今我将我们这个祈愿
瓶程序里利用到的通用函数都写鄙人面,假如有毛病的,或是不分明的可
以提出来。
<%
**********************************
*****通用数据库函数部分*****
**********************************

*******************************************************************
翻开数据库
subopendb(connect,path)
setconnect=server.CreateObject("adodb.connection")
connect.open"provider=microsoft.jet.oledb.4.0;"_
&"datasource="&server.MapPath(path)
endsub

*******************************************************************
查询或变动数据库
functionchangetable(conn,sql,rs,LockType)
setrs=server.createobject("ADODB.recordset")
rs.opensql,conn,1,LockType
endfunction

*******************************************************************
封闭数据库
subclosedb(connect)
connect.close
setconnect=nothing
endsub

*******************************************************************
封闭一时表
subclosetable(rs)
ifRs.state=1then
Rs.Close
SetRs=Nothing
endif
</p>帮助用户快速实现各种应用服务,ASP商有整合各方面资源的能力,可在短期内为用户提供所需的解决方案。例如,典型的ERP安装,如果要在客户端安装的话需要半年到二年的时间,但是美国的一些ASP商如USI和CORIO能在90—120天内提供ERP应用方案。
小妖女 该用户已被删除
沙发
发表于 2015-1-18 15:56:54 | 只看该作者
哪些内置对象是可以跳过的,或者哪些属性和方法是用不到的?
山那边是海 该用户已被删除
板凳
发表于 2015-1-22 08:33:32 | 只看该作者
代码的可重用性差:由于是面向结构的编程方式,并且混合html,所以可能页面原型修改一点,整个程序都需要修改,更别提代码重用了。
深爱那片海 该用户已被删除
地板
发表于 2015-1-25 08:27:56 | 只看该作者
代码的可重用性差:由于是面向结构的编程方式,并且混合html,所以可能页面原型修改一点,整个程序都需要修改,更别提代码重用了。
变相怪杰 该用户已被删除
5#
发表于 2015-1-25 13:22:33 来自手机 | 只看该作者
兴趣爱好,那么你无须学编程,申请一个域名和空间,在网上下载一些免费开源的CMS系统,你不用改代码,只须熟悉它们的后台操作,像office一样简单方便,很快就能建一个站点,很多站长都是这样做的
愤怒的大鸟 该用户已被删除
6#
 楼主| 发表于 2015-1-25 15:27:20 | 只看该作者
掌握asp的特性而且一定要知道为什么。
柔情似水 该用户已被删除
7#
发表于 2015-1-28 06:40:15 | 只看该作者
ASP.Net摆脱了以前ASP使用脚本语言来编程的缺点,理论上可以使用任何编程语言包括C++,VB,JS等等,当然,最合适的编程语言还是MS为.NetFrmaework专门推出的C(读csharp),它可以看作是VC和Java的混合体吧。
只想知道 该用户已被删除
8#
发表于 2015-2-5 12:24:58 | 只看该作者
没有坚实的理论做基础,那么我们连踏入社会第一步的资本都没有,特别对于计算机专业的学生学好专业知识是置关重要的。在这里我侧重讲一下如何学习ASP,从平时的学习过程中。
若相依 该用户已被删除
9#
发表于 2015-2-11 20:10:57 | 只看该作者
Response:从字面上讲是“响应”,因此这个是服务端向客户端发送东西的,例如Response.Write
乐观 该用户已被删除
10#
发表于 2015-3-2 18:17:32 | 只看该作者
下载一个源代码,然后再下载一个VBScript帮助,在源代码中遇到不认识的函数或是其他什么程序,都可以查帮助进行解决,这样学习效率很高。
若天明 该用户已被删除
11#
发表于 2015-3-11 05:08:21 | 只看该作者
下载一个源代码,然后再下载一个VBScript帮助,在源代码中遇到不认识的函数或是其他什么程序,都可以查帮助进行解决,这样学习效率很高。
精灵巫婆 该用户已被删除
12#
发表于 2015-3-17 21:08:25 | 只看该作者
不能只是将它停留在纸上谈兵的程度上。
活着的死人 该用户已被删除
13#
发表于 2015-3-25 02:38:29 | 只看该作者
交流是必要的,不管是生活还是学习我们都要试着去交流,通过交流我们可以学到很多我们自己本身所没有的知识,可以分享别人的经验甚至经历。
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|Archiver|手机版|仓酷云 鄂ICP备14007578号-2

GMT+8, 2025-1-9 05:15

Powered by Discuz! X3.2

© 2001-2013 Comsenz Inc.

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