页面导航：
→ 正文内容
关于网站文件自动备份程序的一点思考
摘要：& 本文提供了一种使用asp&php脚本来实现网站文件备份的思路，可以实现指定文件的按天备份。& 个人网站往往在虚拟主机上，对主机的控制权限很小，因此不能使用诸如任务计划来实现定时备份，我们需要换一种思路来实现相似的自动备份。& 我们可以利用用户对网站的访问来实现对指定文件的按天备份。& 基本思路是：用户访问网站&→&读取最后备份日期、读取当前日期然后比较，如果这两个日期不一致则调用备份程序来实现对指定文件的备份，备份完成后再写入新的日期标记，这时候用户再访问网站，日期已经是最新的了，就会跳过备份程序继而执行其他程序。& 分析这个思路：备份程序会在每天的第一个用户访问网站的时候启动，便可以达到按天备份的效果，然而如果这天没有用户访问则不会备份，这个并无多大关系，因为如果没有用户访问网站，则网站内容不会发生很大改变。因此可以忽略这个情况。& 需要注意的是，可能存在两个人同时访问网站，而同时启动备份程序的情况，便可能会对备份内容造成覆盖，对此我们可以在程序中添加判断语句，如果文件已经存在则不去覆盖它。& 如果是要备份的两个文件的文件名也相同则也会造成覆盖，我们假定文件是全不相同的。& 还有一个比较重要的问题是，在备份程序中必须采用的时期格式是&&&&4位数年和2位数月、日，不足位数必须补零。&&例如:只有这样才能实现日期大小的比较，在asp中我们可以用一个小程序来实现，在php中已经有这样的日期格式了。& 下面详细说明程序的构造，以asp为例。& ===bak_set.asp===&
代码如下:Dim&root_dir&& root_dir&=&"/"&& Dim&bak_set&& Set&bak_set&=&Server.createobject("Scripting.Dictionary")&& bak_set.Add&"last_bak"&,&""&& bak_set.Add&"file_list"&,&"data.mdb|system.mdb"&& bak_set.Add&"file_path"&,&"database/|database/"&& bak_set.Add&"bak_dir"&,&"backup/"&& bak_set.Add&"bak_date"&,&"|||"&& bak_set.Add&"perfix"&,&"@"&& bak_set.Add&"date_out"&,&"2"&&以上是备份设置文件，root_dir&是网站主目录的路径，是网站的一个全局设置，剩下的是备份设置，我们需要知道：要备份的文件名、路径，备份在什么地方，备份保留几天，备份文件的文件名前缀，两个经常变化的设置是最后备份日期和备份过的日期的列表。在全部的路径设置中都需要用“/”结束& Iso标准日期函数：&& 代码如下:Function&IsoDate(str_date)&&&&&Dim&temp&& &&&&If&IsDate(str_date)&Then&& &&&&&&&&temp&=&Year(str_date)&"-"&&Right("0"&Month(str_date),2)&&&"-"&&Right("0"&&&Day(str_date),2)&& &&&&Else&& &&&&&&&&temp&=&str_date&& &&&&End&If&& &&&&IsoDate=temp&& End&Function&& 备份函数的思路：& 先将备份设置读取出到函数中的变量中，并且得到网站的服务器路径&& 检查备份主文件夹(例如：backup/)是否存在，当前备份文件夹（例如：backup//）是否存在，然后将需要备份的文件保存到当前备份文件夹；&& 计算出备份文件的保存期，读取以前的备份日期列表,然后两者相比较，如果日期小于保存期则将备份文件删除，如果不需要删除则将日期转存到新变量中。&& 生成新的备份设置并将之写入原设置文件。&& 具体程序如下：&
代码如下:'==================================&& '&Function:&文件定时备份程序backup&files&& '&Need&var:&root_dir&,&bak_set&,&isodate()&& '&Need&file&bak_set.asp&& '&return&:&true&/&false&& '==================================&& Function&bak_start()&& &&&&'1&& &&&&Dim&perfix&& &&&&&&&&perfix&=&bak_set("perfix")&& &&&&Dim&files&& &&&&&&&&files&=&split(bak_set("file_list"),"|")&& &&&&Dim&paths&& &&&&&&&&paths&=&split(bak_set("file_path"),"|")&& &&&&Dim&now_date&& &&&&&&&&now_date&=&isodate(date)&& &&&&&&&&'response.Write(now_date)&& &&&&Dim&sev_root&&& &&&&&&&&sev_root&=&Server.MapPath(root_dir)&& &&&&Dim&bak_root&& &&&&&&&&bak_root&=&sev_root&&&"\"&&&bak_set("bak_dir")&& &&&&Dim&bak_dir&& &&&&&&&&bak_dir&=&bak_root&&&"\"&&&now_date&&&"\"&& &&&&'2&create&backup&& &&&&Dim&fso&& &&&&Set&fso&=&Server.createobject("Scripting.FileSystemObject")&& &&&&If&Not&fso.FolderExists(bak_root)&Then&fso.CreateFolder(bak_root)&& &&&&If&Not&fso.FolderExists(bak_dir)&Then&fso.CreateFolder(bak_dir)&& &&&&'response.Write(bak_dir)&& &&&&If&&Ubound(files)&&&Ubound(paths)&Then&& &&&&&&&&bak_start&=&false&&& &&&&&&&&Exit&Function&& &&&&End&If&&& &&&&Dim&i&& &&&&&&&&'On&Error&Resume&Next&& &&&&For&i&=&0&To&Ubound(files)&& &&&&&&&&&&&&'response.Write(sev_root&&&"\"&&&paths(i)&&&files(i))&& &&&&&&&&If&fso.FileExists(&sev_root&&&"\"&&&paths(i)&&&files(i)&)&And&Not&fso.FileExists(bak_dir&&&perfix&&&files(i))&Then&&& &&&&&&&&&&&&fso.CopyFile&sev_root&&&"\"&&&paths(i)&&&files(i)&,&bak_dir&&&perfix&&&files(i)&& &&&&&&&&End&If&& &&&&Next&& &&&&'3&Delete&out&of&date&backup&& &&&&Dim&date_out&& &&&&date_out&=&isodate(&date&-&Abs(bak_set("date_out"))&)&& &&&&'response.Write(date_out)&& &&&&Dim&dates&& &&&&Dim&bak_date&& &&&&bak_date&=&""&& &&&&dates&=&split(bak_set("bak_date"),"|")&& &&&&For&i&=&0&To&Ubound(dates)&& &&&&&&&&If&dates(i)&&&date_out&Then&& &&&&&&&&&&&&'On&Error&Resume&Next&& &&&&&&&&&&&&If&fso.FolderExists(bak_root&&&"\"&&&dates(i))&Then&fso.DeleteFolder&bak_root&&&"\"&&&dates(i)&& &&&&&&&&Else&& &&&&&&&&&&&&bak_date&=&bak_date&&&dates(i)&&&"|"&& &&&&&&&&End&If&& &&&&Next&& &&&&bak_date&=&bak_date&&&now_date&& &&&&bak_set("bak_date")&=&bak_date&& &&&&'4&update&settings&& &&&&Dim&f&& &&&&Set&f&=&fso.OpenTextFile(Server.MapPath("bak_set.asp"),2,true)'2&写&& &&&&Dim&temp&,keys&& &&&&temp&=&"&%"&&vbCrlf&&&_&& &&&&"Dim&root_dir"&vbCrlf&&&_&& &&&&"root_dir&=&"""&&root_dir&&""""&&vbCrlf&&&_&&& &&&&"Dim&bak_set"&&vbCrlf&&&_&& &&&&"Set&bak_set&=&Server.createobject(""Scripting.Dictionary"")"&vbCrlf&& &&&&keys&=&bak_set.Keys&& &&&&For&i&=&0&to&Ubound(keys)&& &&&&&&&&temp&=&temp&&&"bak_set.Add&"""&keys(i)&"""&,&"""&&&bak_set(keys(i))&&&""""&&&vbCrlf&& &&&&Next&& &&&&temp&=&temp&&&"%"&&&"&"&& &&&&f.write&temp&& &&&&f.Close&& &&&&Set&fso&=&Nothing&& &&&&Set&f&=&Nothing&& &&&&bak_start&=&true&& End&Function&&&最后，也是最重要的，那就是安全问题，如果备份的文件能被浏览器打开，那后果可能是很严重的！所以应当谨慎选取备份文件夹，如果服务器允许访问网站的外部目录，那么应当把备份的路径也指定到网站外部，例如：网站根目录解析到了&XXX/htdoc/&而你对此也有读写权限&xxx/&那么就可以将备份文件加指定到&xxx/backup/&这样就比较安全。如果没有这样的权限，那么就必须保证，需要备份的文件本身就是安全的。&
上一篇：下一篇：
最 近 更 新
热 点 排 行
12345678910下面是我家族辈分排序 我文言文还不错、但是不知道全部意思和宗旨是什么 .大神们请不吝赐教~成受荣道 思文鼎广 万良孟仲 继正朝邦 本同启秀 忠敬嘉祥 希先一志 善应名彰 仁昭义立 裕世_作业帮
拍照搜题，秒出答案
下面是我家族辈分排序 我文言文还不错、但是不知道全部意思和宗旨是什么 .大神们请不吝赐教~成受荣道 思文鼎广 万良孟仲 继正朝邦 本同启秀 忠敬嘉祥 希先一志 善应名彰 仁昭义立 裕世
下面是我家族辈分排序 我文言文还不错、但是不知道全部意思和宗旨是什么 .大神们请不吝赐教~成受荣道 思文鼎广 万良孟仲 继正朝邦 本同启秀 忠敬嘉祥 希先一志 善应名彰 仁昭义立 裕世之纲 开宗永发 衍庆咸昌.家族世代郝姓.我是祥字辈.有同宗的吗
“有感于繁荣昌盛的事风 （世人）繁衍不息 大贤大德之人辈出 使国运能够很好地持续 怀着共建美好的起点 敬拜各祥瑞（可以理解为那些好的神仙或现象） 追溯古朴风尚 响应开明制度 为了彰显美德得以传承 为世人（后世）编此族纲 （愿）本族从此繁衍不息 代代可庆都能昌盛 ”因为文言文有大量的简略之处 很难做到逐字翻译 基本意思就是这样了《邪王追妻之兽妃驾到》 006 你当得起姑奶奶一个跪吗？
类别：玄幻魔法
作者：凤狱如歌 书名：
&&&&本书由潇湘书院首发，请勿转载！&&&&“我想在场的诸位都不会忘了，我如今不过只有三级灵修者的修为吧？而凤红雪的修为又如何？”凤云月一字一句道：“八级灵修。敢问二长老，你真的认为，我有能力掐死她？”&&&&二长老皱紧了眉头没说话，族长和另外两位长老也沉默以对。&&&&凤云月继续道：“那点指痕，相信以长老们的眼力定能看得出下手力道之轻重，轻易便能判断的出是否能真正危害到凤红雪的性命。”&&&&“那是……”二长老一时语塞。&&&&不等二长老继续发难，凤云月手指着眼角的一块青紫，扯起唇角略带讽刺地问道：“二长老只看见凤红雪颈上的指痕，却瞧不见我脸上的这些青紫擦伤吗？”随着她举起胳膊的动作，白皙的胳膊上一块不算太严重却也无法忽视的烧灼痕迹也出现在众人眼前，那显然是被火灵气所伤。&&&&“我恶毒？”凤云月语气更凉，“二长老恐怕说反了吧？”&&&&“你这话何意！”还是性子最急的二长老最先反应过来，怒瞪着小眼睛斥道：“做错了事居然还敢狡辩！你差点掐死红雪还不叫错，那何为错！？对待同族同辈竟能如此心狠手辣，凤云月，你小小年纪怎么能如此恶毒！”&&&&族长和三位长老也没想到凤云月会有此一语，一时都有些愣神。&&&&整个大厅的人，包括厅外一直注意着里面动静的人全部惊讶地看向凤云月，带着一脸的匪夷所思和鄙夷。&&&&凤云月满意地收回视线，见凤程和三位长老都拧紧了眉头似乎不满于她的回答，才不紧不慢道：“我只是不认为自己这样做有错。”&&&&“我并未否认凤红雪脖子上的指痕是我留下。”凤云月目光不经意地扫到凤红雪身上，后者原本还得意的脸色却瞬间僵住，仿佛想起之前从凤云月身上感觉到的那股让人灵魂震颤的寒意，身体轻微地抖了抖。&&&&凤云月没有刻意用敬称，因为她不认为眼前这些人值得自己去真心尊敬，在场的人也都注意到了这一点，面色都不太好看，但暂时也没有计较这些小问题，只以为凤云月大概是被凤红雪揍得失了理智才会胡言乱语。&&&&凤云月神色不变地与凤程对视，“族长，我想你和三位长老并没有听懂我说的话。”&&&&凤程看着一脸平静的凤云月，沉声道：“此事有牧凡，牧修，秋恒三人亲眼所见，云月，你还是承认吧。”&&&&“你还想抵赖！？”身材略微发福的三长老黑着脸指着凤红雪的脖子道：“红雪脖子上还留着指痕，只要稍加比对便能确认是谁留下的，你以为你不承认便能蒙混过关了吗！”&&&&面上，却只是凉凉道：“欲加之罪何患无辞，我不认为我有错，为何要跪。”&&&&跪下认错？你算哪根葱就敢让姑奶奶给你跪下？你当得起姑奶奶一个跪吗！&&&&凤云月冷冷看了眼和还算长得端正的凤程不同，完全称得上尖嘴猴腮的二长老，无声冷笑。&&&&很快，二长老便紧随着凤程的话厉声道：“凤云月！一个时辰前，你无缘无故出手打伤红雪，甚至差点掐死活活她！还不跪下认错！”&&&&凤程目光沉沉地看着不远处神色平静的凤云月，他一直以来最不喜的废物女儿，心头有一抹古怪的感觉稍纵即逝。&&&&戏够不够精彩，要看他们的表现。&&&&这出戏，在其他人眼里，她是主角，而在她看来，在场的除她以外的所有人，才真正是戏里的主角，她？不过是一个看客罢了，心情来了友情客串一下龙套给他们助助兴。&&&&好在，凤云月非一般人，在四个凤家最强者面前仍然不卑不亢，眉都不曾皱一下，镇定自若地开口：“不知。”就算知道也没有她主动提起的道理吧？她还等着看凤红雪是如何颠倒是非黑白，凤家人又是如何不分青红皂白。&&&&随着凤程话音刚落，三位长老们带着责备的目光也齐齐射了过来，这次没有故意释放威压，却同样给人一定的压迫感。&&&&凤程五官硬朗，虎背熊腰，目光炯炯，仅仅只是面无表情地坐在那里便自有一番不怒而威的气势，此时比平日里更低沉的声音在大厅内响起，顿时让原本看着凤云月笑话，满面嘲讽的年轻一辈们本能地绷紧了身体收敛情绪，微微低下头。&&&&“云月，你可知今日叫你过来所谓何事。”凤家现任族长凤程，也是凤云月的父亲，看上去年约四十，实则实际年龄要翻几个番，修者的年轻从来不能用外表来定论，只是介于身份，有些人会刻意将自己的外表维持在中年。&&&&待她将厅内的扫视一圈，首座上的人也终于开口了。&&&&最后，在目光扫过一个透着股清冷气质的俊秀少年时，凤云月微微顿了一下，很快淡然地移开了视线。&&&&但此时的凤云月早已经散去了当时眼底浓烈的戾气，还有那经历过生死爆炸后临时没能回过神而不经意间流露出来的血腥气，冷芒散去，眼神平静，唇角微微勾起，先不说狼狈与否，至少整个人看起来牲畜无害，分毫看不出那三个少年所感受过的狠戾冰冷。&&&&这些人看上去约莫都在十三岁到十七岁之间，有男有女，外表皆很出色，有些在她的记忆里有印象，有些就很模糊，其中一身红衣的凤红雪格外地引人注目，不过凤云月根本没多看她一眼，直接略了过去，凤红雪身后的三个不久前才见过的少年在注意到她视线扫过来的时候本能地移开视线，目光里仍存着几分紧张惊惶，显然还没完全从之前的震惊中回过神来。&&&&凤云月在偌大的大厅中央空地站定，不着痕迹地打量着厅内的十数人，族长和三位长老，哪怕是身为废物的凤云月记忆中也记得很清楚，而在三位长老们旁边的五六个三四十岁的中青年男子，应该就是凤家的强者，和族长同辈，他们下首才是年轻一辈，也就是和她同一辈分的凤家最年轻一辈。&&&&()
您的到来是对我们最大的支持， 喜欢就多多介绍朋友来吧!
如果您喜欢,请,方便以后阅读邪王追妻之兽妃驾到最新章节更新连载
如果你对《邪王追妻之兽妃驾到》有什么建议或者评论，请
发表。更多热门小说：