【转载】《蜗居》脱去了当代都市白领的内裤

这些天,无论走到哪里,无论遇到什么人,几乎都在谈论《蜗居》。
 

   这已经不是一部热播的电视连续剧,成了一个很火的社会话题。波及城市各个阶层。
 
   我开始锲而不舍地向所有熟悉的电视谈话节目建议做一个关于《蜗居》的话题。尽管这个话题已经在网络汇成了口水的海洋。
 
   应网友的要求——他们是我未曾谋面的最棒的朋友,骂我都透着真诚和智慧,我决定写下自己对这部戏的真实感受。
   
   我首先想到了已经声名狼藉的陈冠希同志,他向我们证明了在这个开放的社会,除了掌握外语很重要以外,掌握基本的电脑知识也无比重要。由于他的意外失误,无数人通过网络见识了他和很多女明星身体上不该暴露的零件。后果至今很严重。
   
   因为这是人体的底线。也就是说,在一个文明的社会,人至少要穿着内裤,当然女同志还要戴着胸罩示众是起码要求,尽管有裸体的杂志和电影都普遍受广大人民群众欢迎,但多数人还是得忍着,保持偷窥状态,并对周围有没有警察高度警惕。
   
   但充满情色欲望台词、场景的《蜗居》却走得更远。因为这部交织着爱情、婚姻、亲情、金钱、权力、欲望的作品,似乎在逼真而无情地展示都市房奴的绝望挣扎,以及“蚁族”们永远无法兑现的梦想——尽管这些人无比勤劳勇敢、无比渴望生活。
   
  仅仅如此,这部大戏不可能激起如此强烈的社会情绪巨澜。因为这个碎片化的时代,人们的价值体系已经随着财富、阶层的分化支离破碎,是很难有共同语境的一地鸡毛。
   
  从一开始,这部戏就试图剥去都市浮华斑斓、光鲜亮丽的外套,甚至底裤。由于脱得过于彻底,便显得相当残忍。多数普通人被刺痛除了有情感共振以外,就是曾经 还对生活报有幻想,指望着通过奋斗改变命运。但假如通向幸福的通天塔已经属于少数人的专利,假如你无休止的忙碌到头来还是一场空,你将如何面对?很多人没 有准备好面对这个快速逼近的现实,于是躲避,并自欺欺人,看励志书甚至追随骗钱的成功学大师。直到《蜗居》的出现,才使这样一个命题更赤裸裸地摆放在很多 人面前:假如“奋斗即找死,不奋斗即等死”,你该怎么办?
   
  如赵传一句著名的歌词:生活的压力和生命的尊严哪一个更重要?论到你回答了。你已无路可逃。
 
  面对苟活的海平夫妇、不愿苟活却只能当小三的海藻、有家室却不甘于平淡生活的腐败干部宋思明,你很难用简单的是非曲直来判定每个人的选择是否值得称许或诟病,因为大家都拧巴,都扭曲,我说的不仅仅是生存状态,也包括背后的社会环境和情感、价值认知。
   
   这部戏在提醒我们:在一个底线被金钱、权力和欲望击穿的都市里,小人物要坚守纯粹的善良、忠诚、爱、信任和关怀已是不可能完成的任务。

    存在即合理。这是一道不难做的选择题:为了生存,或者叫活得体面而尊严,而面前又没有一个公平公正的阶层上升通道,您只能做交易,用海藻的话来说,叫“肉 偿”。残忍吗?其实,这样的交易早已在农民或农民工这样的弱势阶层中存在多年了——您知道多少农民的孩子自觉放弃上大学了吗?多少农民或农民工的女儿沦为 娼妓,好一点的成为二奶了吗?只不过这次轮到都市白领了——他们是曾经的白领和精英啊。
   
  我不相信也不愿相信这是全社会普遍的常态,但已不鲜见,足以引起我们的警惕和反思。
 
  所以,《蜗居》脱掉都市白领底裤露出的不是一个健硕美丽的胴体,而是伤痕和溃疡。关于人性。关于情欲。关于体制。关于信仰。
 
  这叫转型之痛。
 
  曾经与人探讨人性的颜色。我说:人性即不是黑色的,也不是白色的,是灰色的。宛如繁华都市的本质。但我们必须有一种冲动:让它变白,而不是逐渐沦为黑色的 社会。守住底线的前提不是每个人虚假地发誓从此变得高尚,而是首先要真实地面对集体的堕落。从这个角度上,《蜗居》可谓入木三分,难能可贵。
   
  最后,想起了作家杰克·凯鲁亚克的一句名言:我们找不到灵魂的家园,于是我们集体在路上。但我们至少可以实现我的身体我做主,不轻易拿它做交易,给它穿上底裤。

记录一下这次感冒(现在依然在家休息ing…)

我每年都感冒几次,也不奇怪了,这两年好些了。在上周三的晚上,即11月18日,睡觉前感觉全身发冷,那会儿还没发烧,估摸着第二天肯定要感冒了。果然,第二天起床后就头疼,全身无力,当时没测体温,我估计的37度5往上了,去了单位后喝了一杯感冒清热颗粒,两包咖啡(希望可以减轻头疼),可是全身还是发冷,还一直冒汗,一位同事看我一直冒汗,建议我去单位的医务室开点药,我是觉得反正我的药也快喝完了,就去医务室开点,便宜。去了那儿先测体温,当时胳肢窝里都是汗,问医生出很多汗不会影响体温吧,大夫说出汗就是好了,我还挺轻松的,测完一看是39度。。。。把我都吓一跳,医生一看也觉得不太对,让我再测一次,再测一次还是39度。。。。。。可我觉得没那么难受,按理说39度已经烧的很严重了,后来想想有可能是那两杯咖啡让我感觉头没那么疼。后来大夫说让我直接去医院输液吧,别喝药了。

和领导请了假直接打车去了307医院,离单位最近的一个较好的医院了,在发热门诊一测,是39度1。。。。。直接输液吧,开始准备输青霉素和头孢的,这个好的快,这两个会过敏,所以要做皮试,做完后大夫说我对这两个过敏,不能输。。。。。我记得我小时候输过青霉素的啊~~~没法,大夫又重新开了药叫左氧,再加一个退烧的,和氯化钠一起输的。对了,穿插说一下,我还做了H1N1的检测,医院说这个是自愿检测的,不强要求,60块钱,要48小时之后出结果。。下午5点多,终于输完了,输完后就感觉全身有点力量了,不是之前全身无力那样,头也没那么疼了,回单位取了电脑,就打车回家了,回家后再测体温已经是37度了,好多了已经。

第二天和领导打了电话,想在家先休息一天,我觉得我可以工作了,身体没什么问题,主要是怕传染给周围同事,我觉得我这次是流感,但不确保是不是H1N1,那更不能去单位祸害别人去了。。。。这里还是赞扬一下我女朋友,很感动。。。知道我发烧了,可能是流感,晚上还是来照顾我了,和我一起买了粥喝的。第二天我就没去输液了,一是觉得已经没那么烧了,万一去医院再给传染了。而是觉得输液太多了,以后吃药不管用就不好了。。。。

第三天,就是星期六21号,下午1点多先去307医院领了报告单,万幸不是H1N1,是普通流感病毒感染。遂给单位领导打电话告知,领导说先在家休息,上班时间等通知,应该是一周时间。简单的说,在家隔离一周*_*

现在已经不发烧了,温度也正常,就是嗓子还有些不舒服,有时会咳嗽,一直在和热水。刚给一好兄弟打了个电话,这几天的测试帮我盯着点,拜托兄弟有我的bug的话,帮修改一下:)

我继续喝热水了…..

PS: 大家多喝水,注意休息,千万别感冒啊。。。休息好了就不容易感冒,否则容易受病毒侵害

最后祝各位朋友身体健康,万事如意[emot]grin[/emot]

js 取得 Unix时间戳(Unix timestamp)

js 取得 Unix时间戳

Unix时间戳(Unix timestamp),或称Unix时间(Unix time)、POSIX时间(POSIX time),是一种时间表示方式,定义为从格林威治时间1970年01月01日00时00分00秒起至现在的总秒数。Unix时间戳不仅被使用在Unix 系统、类Unix系统中,也在许多其他操作系统中被广告采用。

目前相当一部分操作系统使用32位二进制数字表示时间。此类系统的Unix时间戳最多可以使用到格林威治时间2038年01月19日03时14分07秒(二进制:01111111 11111111 11111111 11111111)。其后一秒,二进制数字会变为10000000 00000000 00000000 00000000, 发生溢出错误,造成系统将时间误解为1901年12月13日20时45分52秒。这很可能会引起软件故障,甚至是系统瘫痪。使用64位二进制数字表示时间 的系统(最多可以使用到格林威治时间292,277,026,596年12月04日15时30分08秒)则基本不会遇到这类溢出问题。

  

如何在不同编程语言中获取现在的Unix时间戳(Unix timestamp)?

Java time
JavaScript Math.round(new Date().getTime()/1000)
getTime()返回数值的单位是毫秒
Microsoft .NET / C# epoch = (DateTime.Now.ToUniversalTime().Ticks – 621355968000000000) / 10000000
MySQL SELECT unix_timestamp(now())
Perl time
PHP time()
PostgreSQL SELECT extract(epoch FROM now())
Python import time 然后 time.time()
Ruby 获取Unix时间戳:Time.now Time.new
显示Unix时间戳:Time.now.to_i
SQL Server SELECT DATEDIFF(s, ‘1970-01-01 00:00:00’, GETUTCDATE())
Unix / Linux date +%s
VBScript / ASP DateDiff("s", "01/01/1970 00:00:00", Now())
其他操作系统
(如果Perl被安装在系统中)
命令行状态:perl -e "print time"

  

如何在不同编程语言中实现Unix时间戳(Unix timestamp) → 普通时间?

  

Java String date = new java.text.SimpleDateFormat("dd/MM/yyyy HH:mm:ss").format(new java.util.Date(Unix timestamp * 1000))
JavaScript var unixTimestamp = new Date(Unix timestamp * 1000) 然后 commonTime = unixTimestamp.toLocaleString()
Linux date -d @Unix timestamp
MySQL from_unixtime(Unix timestamp)
Perl my $time = Unix timestamp 然后 my ($sec, $min, $hour, $day, $month, $year) = (localtime($time))[0,1,2,3,4,5,6]
PHP date(‘r’, Unix timestamp)
PostgreSQL SELECT TIMESTAMP WITH TIME ZONE ‘epoch’ + Unix timestamp) * INTERVAL ‘1 second’;
Python import time 然后 time.gmtime(Unix timestamp)
Ruby Time.at(Unix timestamp)
SQL Server DATEADD(s, Unix timestamp, ‘1970-01-01 00:00:00’)
VBScript / ASP DateAdd("s", Unix timestamp, "01/01/1970 00:00:00")
其他操作系统
(如果Perl被安装在系统中)
命令行状态:perl -e "print scalar(localtime(Unix timestamp))"

【转载】QQ农场数据分析

最近QQ农场很火,昨天晚上在家研究起QQ农场来。对于Web应用,交互的数据还是很好分析的。要分析QQ农场,我主要使用到的工具有,HTTP协议抓包工具,我用的是firefox上插件jerad’s web recorder,这个东东非常好用。swf反编译工具,我使用的是SWFDecompiler。

当进入农场时,例如请求获取到的数据为:

{“farmlandStatus”:[{“a”:10,”b”:1,”c”:0,”d”:0,”e”:1,”f”:0,”g”:0,”h”:1,”i”:100,”j”:0,”k”:0,”l”:0,”m”:0,”n”:[],”o”:0,”p”:[],”q”:1255359728,”r”:1255359728},{“a”:10,”b”:1,”c”:0,”d”:0,”e”:1,”f”:0,”g”:0,”h”:1,”i”:100,”j”:0,”k”:0,”l”:0,”m”:0,”n”:[],”o”:0,”p”:[],”q”:1255359726,”r”:1255359726},{“a”:10,”b”:1,”c”:0,”d”:0,”e”:1,”f”:0,”g”:0,”h”:1,”i”:100,”j”:0,”k”:0,”l”:0,”m”:0,”n”:[],”o”:0,”p”:[],”q”:1255359700,”r”:1255359700},{“a”:10,”b”:1,”c”:0,”d”:0,”e”:1,”f”:0,”g”:0,”h”:1,”i”:100,”j”:0,”k”:0,”l”:0,”m”:0,”n”:[],”o”:0,”p”:[],”q”:1255359727,”r”:1255359727},{“a”:10,”b”:1,”c”:0,”d”:0,”e”:1,”f”:0,”g”:0,”h”:1,”i”:100,”j”:0,”k”:0,”l”:0,”m”:0,”n”:[],”o”:0,”p”:[],”q”:1255359726,”r”:1255359726},{“a”:10,”b”:1,”c”:0,”d”:0,”e”:1,”f”:0,”g”:0,”h”:1,”i”:100,”j”:0,”k”:0,”l”:0,”m”:0,”n”:[],”o”:0,”p”:[],”q”:1255359700,”r”:1255359700},{“a”:10,”b”:1,”c”:0,”d”:0,”e”:1,”f”:0,”g”:0,”h”:1,”i”:100,”j”:0,”k”:0,”l”:0,”m”:0,”n”:[],”o”:0,”p”:[],”q”:1255359729,”r”:1255359729},{“a”:10,”b”:1,”c”:0,”d”:0,”e”:1,”f”:0,”g”:0,”h”:1,”i”:100,”j”:0,”k”:0,”l”:0,”m”:0,”n”:[],”o”:0,”p”:[],”q”:1255359726,”r”:1255359726},{“a”:10,”b”:1,”c”:0,”d”:0,”e”:1,”f”:0,”g”:0,”h”:1,”i”:100,”j”:0,”k”:0,”l”:0,”m”:0,”n”:[],”o”:0,”p”:[],”q”:1255359725,”r”:1255359725}],”items”:{“1”:{“itemId”:213},”2″:{“itemId”:214},”3″:{“itemId”:215},”4″:{“itemId”:216}},”exp”:10852,”weather”:{“weatherId”:3,”weatherDesc”:”\u96e8\u5929″},”serverTime”:{“time”:1255434832},”user”:{“uId”:7174870,”userName”:null,”money”:18353,”headPic”:null,”exp”:10852,”yellowlevel”:0,”yellowstatus”:0,”canbad”:50,”pf”:false},”cacheControl”:{“seed”:7,”tool”:1,”diy”:2},”a”:true,”b”:0,”c”:false,”task”:{“taskId”:0,”taskFlag”:0}}

通过反编译flash,可以在Main_v_10.swf与happyfarm_v_1.swf中破译上面这么怪异的表述,看来开发人员还是蛮有水平的,充分为了节省网络流量,用一个字母来表示。

farmlandStatus中有9块地正在使用。每块地的数据分析:
{“a”:10,”b”:1,”c”:0,”d”:0,”e”:1,”f”:0,”g”:0,”h”:1,”i”:100,”j”:0,”k”:0,”l”:0,”m”:0,”n”:[],”o”:0,”p”:[],”q”:1255359728,”r”:1255359728},

a:种子的编号
b:地的状态,1表示有植物在种
c:曾经是否有草
d:曾经是否有虫子
e:曾经是否干旱
f:大于0有草
g:大于0有虫子
h:等于0干旱
i:优秀程度
j:采摘的次数
l:大于0叶,最小能偷多少?这个不能太确认
m:大于0时,表示还剩下多少个
n:偷过我果实的好友uid列表
0:施肥的次数
p:动作?
q:作物播种时间点

r:更新时间点

用户数据分析:
“user”:{“uId”:7174870 ,”userName”:null,”money”:18353,”headPic”:null,”exp”:10852,”yellowlevel”:0,”yellowstatus”:0,”canbad”:50,”pf”:false},
uid:你的QQ号码在农场中的编号
money:表示用户的金币
exp:表示用户的经验,等级是根据经验计算出来的
yellowlevel,yellowstatus跟黄钻用户相关,偶不是黄钻。

一些URI,其中每个URI都有和farmTime与farmKey,其中farmTime为提交的时间点,既然每次要提交farmTime,那farmKey的加密码规则肯定与它有关,可能是MD5(farmTime+密钥)

下面我是抓包得到的farmKey 与farmTime

farmKey    52363cfa7e60658be05db5fce363416d
farmTime    1255434831

# 进入农场:

api.php?mod=user&act=run

# 获取所有好友
api.php?mod=friend&farmKey=%s&farmTime=%s&inuId=”
body=({“refresh”:”true”})

# 获取某好友信息
api.php?mod=user&act=run&flag=1&farmKey=%s&farmTime=%s&inuId=’
body={‘ownerId’:fid}

# 浇水 fid: 用户ID place:土地编号
api.php?mod=farmlandstatus&act=water&farmKey=%s&farmTime=%s&inuId=’
body={‘ownerId’:fid,’place’:place}

# 除草 fid:用户ID place:土地编号
api.php?mod=farmlandstatus&act=clearWeed&farmKey=%s&farmTime=%s&inuId=’
body={‘ownerId’:fid,’place’:place}

# 杀虫
api.php?mod=farmlandstatus&act=spraying&farmKey=%s&farmTime=%s&inuId=’
body={‘ownerId’:fid,’place’:place,’tId’:0}

# 获取商店列表
api.php?mod=repertory&act=getSeedInfo&farmKey=%s&farmTime=%s&inuId=’

# 查看自己购买的物品
api.php?mod=repertory&act=getUserSeed&farmKey=%s&farmTime=%s&inuId=’

# 翻土
api.php?mod=farmlandstatus&act=scarify&farmKey=%s&farmTime=%s&inuId=’
body={‘ownerId’:fid,’place’:place}

# 种植
api.php?mod=farmlandstatus&act=planting&farmKey=%s&farmTime=%s&inuId=’
body={‘cId’:cid,’ownerId’:uid,’place’:place}

经过反复地抓取数据分析,最后还是能够分析出farmkey的加密规则,原来是这样的:

MD5(farmtime + “密钥”.substr(farmtime% 10)),密钥这里就不说了,免得腾讯对我个小博客来点什么的。

【转】C++ builder 家用摄像头捕捉图像

我们来开发一个用家用摄像头捕捉图像的小程序。程序的主要代码如下,其中步骤说明将插入到代码当中。

步骤一:

在C++ builder中新建的Form上插入:2个button,一个panel,一个ComboBox和一个SaveDialg

步骤二:编写代码
[code]
//—————————————————————————-
#include <vcl.h>
#pragma hdrstop

#include "Unit1.h"
#include "vfw.h"         //双击Form后,在代码区先加入vfw头文件。      
//—————————————————————————-
#pragma resource "*.dfm"
#pragma package(smart_init)
TForm1 *Form1;      //加入自定义变量。
HWND hWndC;
CAPDRIVERCAPS CapDrvCaps;
CAPSTATUS CapStatus;
//—————————————————————————-
__fastcall TForm1::TForm1(TComponent *Owner)
: TForm(Owner)
{
}
//—————————————————————————-
void __fastcall TForm1::FormCreate(TObject *Sender)
{
Table1->Open();
}
//—————————————————————————-
void __fastcall TForm1::Button1Click(TObject *Sender)    // 加入启动camere的程序。
{
  char szDeviceName[80];
  char szDeviceVersion[80];
  for (int wIndex=0;wIndex<10;wIndex++)
  {
    if (capGetDriverDescription(wIndex,szDeviceName,sizeof(szDeviceName),szDeviceVersion,sizeof(szDeviceVersion)))
        {
            Camera->Items->Add(szDeviceName);
        }
    }
    if(Camera->Items->Count>0)
        Camera->ItemIndex=0;
    else
    {
        ShowMessage("There is no camera!");
        Close();
    }

//检查视频是否处于实时捕获状态
  if(CapStatus.fLiveWindow==1)
  //CapStatus.fLiveWindow=1表明当前初频已处于实时捕获状态,否则CapStatus.fLiveWindow=0
  {
    ShowMessage("You needn't do it again!");
    return;
  }
  hWndC=capCreateCaptureWindow((LPSTR)"My Capture Window",WS_CHILD | WS_VISIBLE,0,0,160,120,(HWND)Panel2->Handle,Camera->ItemIndex+1);
  //连接设备:
  capDriverConnect(hWndC,0);
  capPreviewRate(hWndC,50); // rate, in milliseconds
  capPreview(hWndC,TRUE); // starts preview
  //获取视频驱动相关性能
  capDriverGetCaps(hWndC,&CapDrvCaps,sizeof(CAPDRIVERCAPS));
  //获取捕获窗口状态
  capGetStatus(hWndC,&CapStatus,sizeof(CAPSTATUS));
  SetWindowPos(hWndC,NULL,0,0,CapStatus.uiImageWidth,CapStatus.uiImageHeight,SWP_NOZORDER | SWP_NOMOVE);
}
//—————————————————————————

void __fastcall TForm1::FormClose(TObject *Sender, TCloseAction &Action)
{
   if(hWndC)
  {
    capPreview(hWndC,FALSE);
    capDriverDisconnect(hWndC);
  }

}
//—————————————————————————

void __fastcall TForm1::Button2Click(TObject *Sender)    //加入图像保存程序。
{
if(SavePictureDialog1->Execute())
capFileSaveDIB(hWndC,(SavePictureDialog1->FileName+".bmp").c_str());
}
//—————————————————————————

[/code]
步骤三:

运行并测试。

用AutoIt写了一个图片自动归档软件

[size=4]在内网论坛看到有人发帖说需要一个照片自动归档的软件,就是把图片可以按照图片的日期放到相应的文件夹中,感觉用AutoIt这种软件应该挺好实现的,就写了一个,代码如下[/size]
[code]
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

Opt(‘MustDeclareVars’, 1)

AutoPhoto()

Func AutoPhoto()
Local $font,$msg,$Button_1,$radio1,$radio2,$radio3,$radio4,$isOldPhoto,$isCreatDate
$isOldPhoto=True;
$isCreatDate=True;
GUICreate(“图片自动归档程序V1.1–Made By 蓝色天空”,500,200) ; will create a dialog box that when displayed is centered
GUISetState(@SW_SHOW) ; will display an empty dialog box
GUICtrlCreateLabel(“这是一个图片自动归档程序,请把该软件放到图片的同一目录下。”, -1, 10) ; next line
GUICtrlCreateLabel(“选择是否保留原图片和归档日期的方式后,点击按钮后图片即可自动归档”, -1, 30) ; next line
$radio1 = GUICtrlCreateRadio(“保留原图片”, 10, 60, 100, 20)
$radio2 = GUICtrlCreateRadio(“不保留原图片”, 150, 60, 100, 20)
GUIStartGroup()
GUICtrlSetState($radio1, $GUI_CHECKED)
$radio3 = GUICtrlCreateRadio(“按创建日期归档”, 10, 80, 100, 20)
$radio4 = GUICtrlCreateRadio(“按修改日期归档”, 150, 80, 100, 20)
GUIStartGroup()
GUICtrlSetState($radio3, $GUI_CHECKED)
$Button_1 = GUICtrlCreateButton(“开始自动归档”, 10, 120, 100)
; Run the GUI until the dialog is closed
While 1
$msg = GUIGetMsg()
Select
Case $msg = $GUI_EVENT_CLOSE
ExitLoop
Case $msg = $radio1 And BitAND(GUICtrlRead($radio1), $GUI_CHECKED) = $GUI_CHECKED
$isOldPhoto=True;
Case $msg = $radio2 And BitAND(GUICtrlRead($radio2), $GUI_CHECKED) = $GUI_CHECKED
$isOldPhoto=False;
Case $msg = $radio3 And BitAND(GUICtrlRead($radio3), $GUI_CHECKED) = $GUI_CHECKED
$isCreatDate=True;
Case $msg = $radio4 And BitAND(GUICtrlRead($radio4), $GUI_CHECKED) = $GUI_CHECKED
$isCreatDate=False;
Case $msg = $Button_1
doAutoPhoto($isOldPhoto,$isCreatDate); Will Run/Open Notepad
EndSelect
WEnd
GUIDelete()
EndFunc   ;==>Example1

Func doAutoPhoto($isOldPhoto,$isCreatDate)
Local $search,$file,$t,$yyyymd
; 显示当前目录中所有文件的文件名
$search = FileFindFirstFile(“*.jpg”)

; 检查搜索是否成功
If $search = -1 Then
MsgBox(0, “错误”, “该目录下已经没有jpg图片文件”)
Exit
EndIf

While 1
$file = FileFindNextFile($search)
If $isCreatDate=True Then
$t = FileGetTime($file, 1)
EndIf
If $isCreatDate=False Then
$t = FileGetTime($file, 0)
EndIf
If Not @error Then
$yyyymd = $t[0] & “年” & $t[1] & “月” & $t[2] & “日”
;MsgBox(0, $file+”的创建日期:”, $yyyymd)
If $isOldPhoto=True Then
FileCopy($file, @ScriptDir & “\” & $yyyymd & “\”, 8)
EndIf
If $isOldPhoto=False Then
FileMove($file, @ScriptDir & “\” & $yyyymd & “\”, 8)
EndIf
;MsgBox(4096, “文件:”, @ScriptDir & “\” & $yyyymd & “\”)
EndIf
If @error Then ExitLoop
;MsgBox(4096, “文件:”, $file)
WEnd
FileClose($search)
MsgBox(64, “海蓝”, “恭喜,所有图片归档完毕”)
EndFunc
[/code]
[size=4]使用时将这个软件和你需要整理的图片放到同一个目录下,然后点击那个“开始自动归档”按钮,选择是否保留原图片,以及是按创建日期归档,还是按修改日期归档。然后点击下面的按钮就好了[/size]
[img][attach]189[/attach][/img]
[size=4]原先目录下有4张图片[/size]
[img][attach]190[/attach][/img]
[size=4]当运行程序后,会变为如下的样子,会按照日期进行归档[/size]
[img][attach]191[/attach][/img]

下载地址:
http://itbrother.com/soft/autoPhoto.rar

每一个成功的奥特曼背后都有一个默默挨打的小怪兽

(一)
“妈妈,妈妈,”小怪兽问,“我什么时候才能长大呢?”
正做饭的怪兽妈妈和蔼地问:“干吗想长大呀,做妈妈的乖宝宝不好吗?”
“长大了我就能让奥特曼打了。”小怪兽一脸的憧憬。

(二)
“妈妈,妈妈。”小怪兽兴奋地跑进屋,“我考上啦……”
正做饭的怪兽妈妈穿着围裙迎出来:“你考上什么啦,儿子。”
小怪兽满脸的幸福:“我考上‘替身演员’了,一级棒的。”
“你真了不起,儿子。”怪兽妈妈说,“不过,替身演员是干什么的呀。”
“就是给与奥特曼对打的怪兽当替身,妈妈,以后你从电视上看到的每一只被奥特曼打的怪兽都是我哟。“

继续阅读