仓酷云

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

[学习教程] ASP网页设计asp写的日记处置办法

[复制链接]
乐观 该用户已被删除
跳转到指定楼层
楼主
发表于 2015-1-16 23:44:58 | 只看该作者 回帖奖励 |正序浏览 |阅读模式

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

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

x
问题是他们究竟是喜欢他们是使用软件时,速度快还是速度慢好.(当然在3秒以内).无论是他们输入资料时,查找资料时,分析资料时.1、完成办法
一个誊写日记的函数,供应几个参数,用户程序挪用这个函数就能够完成日记的纪录。日记纪录到xml文件中,日记文件按日期天生,天天新创建一个日记文件,文件名为:yyyy_mm_dd.xml,分离用了年代日。而检察日记也一样平常复杂,用户想看哪天的日记,只需间接挪用该xml文件便可。由于xml文件已默许了一个xsl文件来格局化输入。
2、誊写日记的办法
’纪录日记的程序
’塞北的雪
’日期:2004.11.20
’username:用户信息(标示举行该操纵的职员)
’operate:操纵(标示用户举行了甚么操纵)
’userip:用户IP(标示用户用于登录体系的盘算机的IP地点)
’opdate:用户操纵产生的日期
’日记写进一个xml文件,第一次写进时假如xml文件不存在,则创立。
’前往值:1暗示翻开日记文件时堕落
’前往值:9暗示准确完成写进日记文件


functionWriteSysLog(sys_userid,sys_username,operate)
dimop_username
iftrim(sys_userid)=""andtrim(sys_username)=""then
op_username="匿名"
else
op_username=sys_userid&"/"&sys_username
endif

xmlPath="/"&getRoot()&"/log/SysLog/"
xmlFile=replace(cstr(ConvertDate(date())),"-","_")&".xml"
RootNode="syslog"’日记文件根节点名字
LogFile=server.mappath(xmlPath&xmlFile)’日记文件路径
setfso=server.CreateObject("scripting.filesystemobject")

’假如日记文件不存在,就创立一个,并写进头信息和根信息
ifnotfso.FileExists(LogFile)then
fso.CreateTextFileLogFile
setfff=fso.GetFile(LogFile)
setmmm=fff.openastextstream(2)
mmm.write"<?xmlversion=""1.0""encoding=""gb2312""?>"&vbcrlf&"<?xml-stylesheettype=’text/xsl’href=’../logInfo.xsl’?>"&vbcrlf&"<"&rootnode&"></"&rootnode&">"
setmmm=nothing
setfff=nothing
endif
setfso=nothing

Setxd=Server.CreateObject("msxml2.domdocument")
xd.async=false
xd.load(LogFile)
ifxd.parseError.errorcode0then
WriteSysLog=1’翻开日记文件堕落
exitfunction
endif

’创立新节点信息

setet=xd.documentElement



setcnode=xd.createElement("log")
et.appendchild(cnode)

setnode2=xd.createElement("username")
node2.text=op_username
cnode.appendchild(node2)
setnode2=xd.createElement("operate")
node2.text=operate
cnode.appendchild(node2)
setnode2=xd.createElement("userip")
node2.text=Request.ServerVariables("Remote_Addr")
cnode.appendchild(node2)
setnode2=xd.createElement("opdate")
node2.text=cstr(now())
cnode.appendchild(node2)
xd.saveLogFile’写进日记文件

setcnode=nothing
setnode2=nothing
setxd=nothing
writeSysLog=9’申明一般写进了日记信息
endfunction

’取得以后假造目次的名字
functiongetRoot()
url=Request.ServerVariables("URL")
url=right(url,len(url)-1)
getRoot=mid(url,1,instr(url,"/")-1)
endfunction

’将一个一名的数字后面加零
functionFillZero(str)
ttt=str
iflen(str)=1then
ttt="0"&str
endif
FillZero=ttt
endfunction
’转化日期,将一名补上零2003-1-2-->2003-01-02
functionConvertDate(tDate)
ttt=tDate
ifisd</p>ActiveServerPage技术为应用开发商提供了基于脚本的直观、快速、高效的应用开发手段,极大地提高了开发的效果。在讨论ASP的安全性问题之前,让我们来看看ASP是怎么工作的。
爱飞 该用户已被删除
11#
发表于 2015-3-27 17:10:07 | 只看该作者
完全不知道到底自己学的是什么。最后,除了教程里面说的几个例子,还是什么都不会。
透明 该用户已被删除
10#
发表于 2015-3-19 09:16:38 | 只看该作者
运用经典的例子。并且自己可以用他来实现一些简单的系统。如果可以对他进行进一步的修改,找出你觉得可以提高性能的地方,加上自己的设计,那就更上一个层次了,也就会真正地感到有所收获。
再现理想 该用户已被删除
9#
发表于 2015-3-11 19:20:25 | 只看该作者
以HTML语言整合(HTML负责界面上,ASP则负责功能上)形成一个B/S(浏览器/服务器)模式的网页程序。
飘灵儿 该用户已被删除
8#
发表于 2015-3-4 11:41:41 | 只看该作者
不是很难但是英文要有一点基础网上的教程很少有系统的详细的去买书吧,另不用专门学习vb关于vbscript脚本在asp教材都有介绍
不帅 该用户已被删除
7#
发表于 2015-2-15 14:15:49 | 只看该作者
跟学别的语言一样,先掌握变量,流程控制语句(就是ifwhileselect)等,函数/过程,数组
蒙在股里 该用户已被删除
6#
发表于 2015-2-6 07:19:37 | 只看该作者
ASP.Net和ASP的最大区别在于编程思维的转换,而不仅仅在于功能的增强。ASP使用VBS/JS这样的脚本语言混合html来编程,而那些脚本语言属于弱类型、面向结构的编程语言,而非面向对象,这就明显产生以下几个问题:
深爱那片海 该用户已被删除
5#
发表于 2015-1-29 23:55:37 | 只看该作者
最近在学asp,不要问我为什么不直接学.net,因为公司网站是asp做的所以有这个需要,卖了本书asp入门到精通,对里面的六大内置对象老是记不住,还有很多属性和方法看的头晕。
兰色精灵 该用户已被删除
地板
发表于 2015-1-28 05:12:35 | 只看该作者
我们必须明确一个大方向,不要只是停留在因为学而去学,我们应有方向应有目标.
简单生活 该用户已被删除
板凳
发表于 2015-1-24 10:37:16 | 只看该作者
代码逻辑混乱,难于管理:由于ASP是脚本语言混合html编程,所以你很难看清代码的逻辑关系,并且随着程序的复杂性增加,使得代码的管理十分困难,甚至超出一个程序员所能达到的管理能力,从而造成出错或这样那样的问题。
第二个灵魂 该用户已被删除
沙发
发表于 2015-1-19 06:45:04 | 只看该作者
那么,ASP.Net有哪些改进呢?
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

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

GMT+8, 2024-12-23 05:20

Powered by Discuz! X3.2

© 2001-2013 Comsenz Inc.

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