~~胸腔静无¤

我的世界，还剩下什么？

392280254@qq.com(~~胸腔静无¤) — Thu, 05 Nov 2009 12:54:03 GMT

躲在我的世界，创造着我的世界！

时至今日，我的世界，还剩下了什么？

该离开的离开了，不该离开的也离开了

没有离开的，也是即将离开的~

那种似有似无，若即若离的感觉，非常痛。

抬眼望去，甚至不知该注视何方~

原来，我也只是一个凡人。

一个耗尽激情也没找出个目标的俗人。

逝去的光芒，有谁会想起？

笑话（来自网络）

392280254@qq.com(~~胸腔静无¤) — Thu, 05 Nov 2009 06:24:10 GMT

有一次坐公交拿了IC卡排队上车，前面一个人是扔硬币的，我大脑短路跟着把IC卡扔进去了……
　　　
　　　　●邻居忘了带钥匙，从我家阳台翻过去，在屋里找到钥匙后，又翻回来，再打开自家房门。更令人叫绝的是，我自始至终在阳台接应着，未觉有不妥之处。唉，我俩的脑袋肯定被同一个门缝挤过。
　　
　　　　●某日发现手机不见了，翻遍包包以及屋中各个角落，未果。遂郁闷地跌坐地上，从口袋掏出手机，给大家群发短信：我手机丢了
　　
　　　　●一次大家打麻将停电了，就点根蜡烛继续打，后来有人嫌热，嚷嚷“喂~把电扇打开”大家忙劝“不行不行，蜡烛会被吹灭。
　　
　　　　●自从宿舍里装上电话，我们就变成了"君子"，君子动口不动手，当然更懒得动腿，有什么事宁可花点电话费，也不愿出门走动走动。我们屋有个小伙儿叫李雷，暑假找了份工作，在一家网站做程序员。昨天他上班去了，有人打电话找他，我接的。我说李雷不在，对方问他回老家了吗？我说没有，对方说："那你告诉他，我是他同学，你让他回来给我打个电话吧，电话号码是××××。"我拿笔记了下来(后来我才知道，其实那是斜对过宿舍的电话，跟我们不太熟)。
　　
　　　　晚上李雷回来，我跟他说了电话的事，他说大概是高中同学打来的吧，于是就按那个电话回了过去。李雷是陕西人，电话一通他就问："请问你们这儿有陕西的吗？ " 接电话的人说："我们这儿没有，我们对门倒是有一个，你等会儿啊，我给你喊......"
　　
　　　　马上，就听到楼道里大喊："李雷，过来接电话，你老乡！"
　　
　　　　李雷愣了一下，跟我们屋老三说，我过去接个电话，这儿你帮我盯着，如果通了，就说我一会儿就回来。李雷过去了，老三拿起电话。没过几秒钟，里面就传出" 喂，喂"的声音，老三马上说："他出去了，你等一下啊！"然后推开门就喊："李雷，这个电话通了，赶快回来。"李雷在那边等了会儿，见没反应就挂了，回屋从老三手里接过电话，只能听到挂断后的"嘟嘟"声。"奇怪！"他郁闷地说："怎么都没人接呢？"
　　
　　　　然后他拿起记号码的纸条，再次拨通那个号码："你们这儿有陕西的吗......"
　　
　　　　●高中时候，班里一哥们，1981年生，不大，就是特老相.....
　　
　　　　以下是他坐公交时发生的一点事情：
　　
　　　　高二时候，这哥们坐公交去学校，因为路途长，百无聊赖的时候，邻座的一个35岁左右的男人跟他搭话，那人张嘴就来句：“大哥，去哪里？”
　　
　　　　这哥们也许是平常遭遇这样的待遇多了，也并不万分惊奇，颇平静的回答：“三中”。
　　
　　　　那男人第二句话：“噢，去看孩子吧？孩子上学挺苦的.....”
　　
　　　　那哥们脸部抽搐了一下，没吭声。
　　
　　　　第三句话：“大哥，你孩子上几年级了？”那哥们是真烦了，也不解释，顺口来了句：”高一”
　　
　　　　这个时候，经典出现了。那男人异常惊奇地瞪大眼睛看着那哥们，看了足足十秒钟，来了句:“大哥，那您结婚可是挺晚的啊！”
　　
　　　　●我记得我上高中时，见一要好的哥们在校门外买大饼吃，你们也知道嘛，高中时期用脑过度经常会饿，我就马上跑上去先是捶了他一下，然后就夺下他的大饼就啃了一口，还骂骂咧咧的说，真不够意气，买饼也不带我买一个，结果一口饼还没咽下去，抬眼一看才发现认错人了，这也就算了，我后来居然边说对不起还边把我咬了一口的
　　
　　　　那个大饼往那男的手里一塞就跑了，整个过程一气呵成！！！
　　
　　　　记得当时跑回学校大门往回看时，那男的还站在摊子前手拿那个缺了个口的大饼发愣呢。我到现在有时候想起这事还忍不住捶自己两下！！！！
　　
　　　　●一道题目要求把以下四句话用关联词连接：
　　
　　　　1、张海迪姐姐瘫痪了；
　　
　　　　2、张海迪姐姐顽强地学习；
　　
　　　　3、张海迪姐姐学会了多门外语；
　　
　　　　4、张海迪姐姐学会了针灸。
　　
　　　　正确答案应该是："张海迪姐姐虽然瘫痪了，但顽强地学习，不仅学会了多门外语，而且还学会了针灸。
　　
　　　　结果有一个孩子写：虽然张海迪姐姐顽强地学会了针灸和多门外语，可她还是瘫痪了。
　　
　　　　又发现一个更猛的孩子写道：张海迪姐姐不但学会了外语，还学会了针灸，她那么顽强地学习，终于瘫痪了!
　　
　　　　●我是云南大学的，2000级，就是马家爵那一级的。小马哥出事，但还没被抓到的时候，通缉令上都说协助公安机关抓获小马哥可以有多少万的奖励。大家都很眼红，很想得到那大笔钱，上街都很注意路人的长相。有一天，出门坐在公共汽车上，人不多，只有一个人站着，忽然大家都盯着那个人看，我仔细一看，很像通缉令上小马哥的样子，可能大家都看出来了，都是一副又紧张又激动的模样。气氛紧张到了极点，那人被大家看得都惊慌起来，愤怒地大叫一声：“我不是马家爵！公共汽车司机很负责，果断地说：谁都不能下车，我把车开到派出所。大家摩拳擦掌，马上把所有车窗都关上。那人就一副很无奈的表情。到了派出所，司机神气地对警察说：我车上有人很像马家爵，我马上把车开来了。那人委屈地对警察说：警官，还是我，今天我已经第二次被抓到你们这了。
　　
　　　　●同桌感冒流鼻涕，但他忘记带手帕了，就不断把鼻涕用力吸入鼻子里。在黑板上写字的语文老师突然转过身来大嚷：“够了！给我停止！吵死了！”全班一片安静。老师又说：“到底是谁上课时偷吃面条还这么大声？”
　　
　　　　●大一，一次去食堂打包子，谁知划卡机出了点毛病，一下划下去25块3，卖包子的哥哥鼓捣了半天也加不回去，于是可怜兮兮地说：“没事，我记得你，以后常来，直到把多划的钱用完。”我只好同意了。
　　
　　　　可怜我上顿包子下顿包子地吃了一学期，包子哥哥还欠我2块3……最可气的是大学四年我竟然没找到一个女朋友！！
　　
　　　　直到毕业，有一天我走在校园林荫路上，就听后面一帮女生指指点点小声道：“没错，就是他！！以后可别找这样男朋友，天天去二食堂吃包子不给钱！！”
　　
　　　　●本人姓朱，管理单位机房。有次有人打我手机：“鸡科长，你在猪房吗？”当时狂骂那家伙一顿
　　
　　　　●中午做饭，妈妈给我一盆胡萝卜：“去，把胡萝卜切成肉丁！”
　　
　　　　●记得有一次去买一种叫伊丽莎白的水果，我张口就说：老板，莎士比亚多少钱？老板当场就呆了
　　
　　　　●和领导等众人喝酒，举起酒杯大声道:"让我们同归于尽吧!"当时脑子太热了
　　
　　　　......
　　
　　　　●一次去市场买菜，准备聚餐，一个韩国朋友买了生菜，要2块4，他把身上所有的零钱都给了小贩，还缺一毛钱，所以他对小贩说--
　　
　　　　“我的毛，都给你了，所以没有毛了。”
　　
　　　　小贩哑然，半天，回答--
　　
　　　　“你的毛我不要了。”
　　
　　　　●一次在食堂吃饭边吃边聊，突然发现自己把一块饭掉在了外面，暗自觉得浪费粮食对不起农民伯伯，就捡起来吃了。可是后来发现那饭，好像不是我的……
　　
　　　　●掐着一只大公鸡的脖子却不敢下刀，踌躇良久，那只鸡竟然被俺掐死了
　　
　　　　●新浪一新闻新闻标题：重庆铁路公安特警在列车上演练反恐
　　
　　　　一位河北的网友评论：请问，你们能挤上中国的火车吗？还tmd反恐呢！
　　
　　　　●一天晚上和几个朋友喝酒,几个人都喝多了.一个到在路边睡着了,我们也抬不动他,就商量给他找些东西盖上,别着凉了.几天后见到他,他说第二天醒来发现身上放着三辆自行车

[转]获取开机时间

392280254@qq.com(~~胸腔静无¤) — Fri, 16 Oct 2009 09:09:51 GMT

#Region ;**** 参数创建于 ACNWrapper_GUI ****
#AutoIt3Wrapper_icon=D:\工具\AUTOIT\Aut2Exe\Icons\kde.ico
#AutoIt3Wrapper_outfile=系统启动时间.exe
#AutoIt3Wrapper_Res_Comment=获取系统启动时间
#AutoIt3Wrapper_Res_Description=获取系统启动时间
#AutoIt3Wrapper_Res_Fileversion=1.2.3.4
#AutoIt3Wrapper_Res_LegalCopyright=Make By №小白脸…
#EndRegion ;**** 参数创建于 ACNWrapper_GUI ****
#NoTrayIcon
#include
#include
#include
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("获取系统启动时间", 186, 76, 316, 289)
$Pic1 = GUICtrlCreatePic("C:\WINDOWS\system32\oemLogo.bmp", 0, 0, 73, 73, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS))
$Group1 = GUICtrlCreateGroup("系统启动时间", 80, 0, 105, 73)
$Label2 = GUICtrlCreateLabel(" ", 96, 32, 82, 17)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$time = DllCall("kernel32.dll","int","GetTickCount")
$T=Round($time[0]/1000/60/60,3)
$Label3 = GUICtrlSetData($Label2,Int($T)&"小时"&Int(($T-Int($T))*60)&"分钟")
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd

[转]磁盘映射

392280254@qq.com(~~胸腔静无¤) — Fri, 16 Oct 2009 09:09:43 GMT

#NoTrayIcon
#Region ;**** 参数创建于 AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_icon=分析\IP精灵.ICO
#AutoIt3Wrapper_outfile=磁盘映射.exe
#AutoIt3Wrapper_Res_Comment=磁盘映射工具
#AutoIt3Wrapper_Res_Description=方便的共享映射工具
#AutoIt3Wrapper_Res_Fileversion=1.2.3.4
#AutoIt3Wrapper_Res_LegalCopyright=Make By №小白脸…
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
#include
Global $patch1 = IniRead(@ScriptDir&"\"&"config.db", "零度空间", "共享路径", "")
Global $panfu1 = IniRead(@ScriptDir&"\"&"config.db", "零度空间", "盘符", "")
Global $name1 = IniRead(@ScriptDir&"\"&"config.db", "零度空间", "用户名", "")
Global $pass1 = IniRead(@ScriptDir&"\"&"config.db", "零度空间", "密码", "")
$Form1 = GUICreate("磁盘管理", 219, 258, 367, 330)
$Label1 = GUICtrlCreateLabel("共享路径:", 16, 24, 55, 17)
$Label2 = GUICtrlCreateLabel("映射磁盘:", 18, 68, 55, 17)
$Label3 = GUICtrlCreateLabel("管理用户:", 18, 114, 55, 17)
$Label4 = GUICtrlCreateLabel("管理密码:", 19, 157, 55, 17)
$Group1 = GUICtrlCreateGroup("", 0, 0, 217, 193)
$Input1 = GUICtrlCreateInput("", 80, 20, 121, 21)
GUICtrlSetBkColor(-1, 0xC0C0C0)
$Combo1 = GUICtrlCreateCombo("A:", 80, 64, 49, 25)
GUICtrlSetData($Combo1,"A:|B:|C:|D:|E:|F:|G:|H:|I:|J:|K:|L:|M:|N:|O:|P:|Q:|R:|S:|T:|U:|V:|W:|X:|Y:|Z:","")
$Input2 = GUICtrlCreateInput("", 80, 110, 121, 21)
GUICtrlSetBkColor(-1, 0xC0C0C0)
$Input3 = GUICtrlCreateInput("", 80, 152, 121, 21, BitOR($ES_PASSWORD,$ES_AUTOHSCROLL))
GUICtrlSetBkColor(-1, 0xC0C0C0)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group2 = GUICtrlCreateGroup("", 0, 192, 217, 65)
$Button1 = GUICtrlCreateButton("联接[L]", 4, 212, 57, 24, 0)
$Button2 = GUICtrlCreateButton("断开[D]", 70, 212, 57, 24, 0)
$Button3 = GUICtrlCreateButton("保存配置", 141, 211, 57, 24, 0)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUISetState(@SW_SHOW)
GUICtrlSetData($Input1,""&$patch1&"")
GUICtrlSetData($Combo1,""&$panfu1&"")
GUICtrlSetData($Input2,""&$name1&"")
GUICtrlSetData($Input3,""&$pass1&"")
While 1
$msg = GUIGetMsg(1)
Select
Case $msg[0] = $GUI_EVENT_CLOSE And $msg[1] = $Form1
Exit
Case $msg[0] = $Button1
$patch = GUICtrlRead($Input1)
$panfu = GUICtrlRead($Combo1)
$name = GUICtrlRead($Input2)
$pass = GUICtrlRead($Input3)
DriveMapAdd ($panfu,$patch,0,$name,$pass)
Sleep(2000)
MsgBox(48,"磁盘映射成功","请打开我的电脑查看",2)
Case $msg[0] = $Button2
$panfu = GUICtrlRead($Combo1)
DriveMapDel ($panfu)
MsgBox(48,"断开磁盘成功","磁盘已经断开！",2)
Case $msg[0] = $Button3
xr()
EndSelect
WEnd
Func xr()
$patch = GUICtrlRead($Input1)
IniWrite(@ScriptDir&"\"&"config.db", "零度空间", "共享路径", $patch)
$panfu = GUICtrlRead($Combo1)
IniWrite(@ScriptDir&"\"&"config.db", "零度空间", "盘符", $panfu)
$name = GUICtrlRead($Input2)
IniWrite(@ScriptDir&"\"&"config.db", "零度空间", "用户名", $name)
$pass = GUICtrlRead($Input3)
IniWrite(@ScriptDir&"\"&"config.db", "零度空间", "密码", $pass)
MsgBox(64,"提示","配置已经写入数据文件！")
EndFunc

[转]定时启动程序和定时关机

392280254@qq.com(~~胸腔静无¤) — Fri, 16 Oct 2009 09:09:35 GMT

#Region ;**** 参数创建于 ACNWrapper_GUI ****
#AutoIt3Wrapper_icon=..\..\bak\DeskTop\321.ICO
#AutoIt3Wrapper_outfile=..\..\bak\DeskTop\定时启动.exe
#AutoIt3Wrapper_Res_Comment=定时启动程序软件
#AutoIt3Wrapper_Res_Description=定时启动程序软件
#AutoIt3Wrapper_Res_Fileversion=1.2.3.4
#AutoIt3Wrapper_Res_LegalCopyright=Make For №小白脸… QQ:28530352
#EndRegion ;**** 参数创建于 ACNWrapper_GUI ****
#Region ;**** 参数创建于 AutoIt3Wrapper_GUI ****
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
#include
#include
#include
#include
#include
#include
#include
#Include
FileInstall("D:\Skin\skin.skf",@WindowsDir&"\skin.skf",1)
FileInstall("D:\Skin\skin.dll",@WindowsDir&"\skin.dll",1)
Opt("TrayMenuMode",1)
$Exists = "定时启动程序软件";判断是否只运行一个程序
If WinExists($Exists) Then
MsgBox(64,"温馨提醒您:","注意已经运行一个程序了!"& @crlf &""& @crlf &"是否已最小化到任务栏？",5)
Exit
EndIf
;FileCreateShortcut(@AutoItExe,@DesktopCommonDir&"\定时工具");自动在桌面创建快捷方式!
Global $Dll
$Reate0 = GUICreate("定时启动程序软件", 300, 240, 300, 400);主窗口
_SkinGUI(@WindowsDir&"\skin.dll", @WindowsDir&"\skin.skf", $Reate0)
$Button1 = GUICtrlCreateButton("清除定时", 220, 3, 73, 20);按钮
$Button2 = GUICtrlCreateButton("定时程序①", 220, 100, 73, 20)
$Button22 = GUICtrlCreateButton("定时程序②", 220, 125, 73, 20)
$Button23 = GUICtrlCreateButton("定时程序③", 220, 150, 73, 20)
$Button4 = GUICtrlCreateButton("开机运行", 220, 25, 73, 20)
$Button3 = GUICtrlCreateButton("配置程序", 220, 47, 73, 20)
$Button33 = GUICtrlCreateButton("关于程序", 220, 70, 73, 20)
$Button53 = GUICtrlCreateButton("定时任务", 220, 185, 73, 20)
$Button63 = GUICtrlCreateButton("清除任务", 220, 210, 73, 20)
$Combo1 = GUICtrlCreateCombo("", 120, 100, 80, 25);组合列表
GUICtrlSetData($Combo1,"程序①|程序②|程序③","程序①")
$Combo2 = GUICtrlCreateCombo("", 120, 125, 80, 25);组合列表
GUICtrlSetData($Combo2,"程序①|程序②|程序③","程序②")
$Combo3 = GUICtrlCreateCombo("", 120, 150, 80, 25);组合列表
GUICtrlSetData($Combo3,"程序①|程序②|程序③","程序③")
$Combo11 = GUICtrlCreateCombo("", 120, 208, 80, 25);组合列表
GUICtrlSetData($Combo11,"重新启动|直接关机|强行关机|强行重启","直接关机")
$Group1 = GUICtrlCreateGroup("", 8, 0, 200, 90);美化框
$Group2 = GUICtrlCreateGroup("", 8, 90, 200, 85);美化框
$Group3 = GUICtrlCreateGroup("", 8, 175, 200, 60);美化框
$Date1 = GUICtrlCreateDate("", 16, 100, 90, 20, BitOR($DTS_UPDOWN,$DTS_TIMEFORMAT,$WS_TABSTOP));时间选择控件
$Date2 = GUICtrlCreateDate("", 16, 125, 90, 20, BitOR($DTS_UPDOWN,$DTS_TIMEFORMAT,$WS_TABSTOP));时间选择控件
$Date3 = GUICtrlCreateDate("", 16, 150, 90, 20, BitOR($DTS_UPDOWN,$DTS_TIMEFORMAT,$WS_TABSTOP));时间选择控件
$Date4 = GUICtrlCreateDate("", 16, 208, 90, 20, BitOR($DTS_UPDOWN,$DTS_TIMEFORMAT,$WS_TABSTOP));时间选择控件
$Label1 = GUICtrlCreateLabel("设定时间: 请设置程序①启动时间", 16, 30, 180, 17)
GUICtrlSetColor(-1,0x2E8B57)
$Label6 = GUICtrlCreateLabel("设定时间: 请设置程序②启动时间", 16, 50, 180, 17)
GUICtrlSetColor(-1,0x483D8B)
$Label7 = GUICtrlCreateLabel("设定时间: 请设置程序③启动时间", 16, 70, 180, 17)
GUICtrlSetColor(-1,0x008B8B);美化字体颜色
$Label2 = GUICtrlCreateLabel("当前时间:", 16, 10, 180, 17)
GUICtrlSetColor(-1,0xff0033);美化字体颜色
$Label11 = GUICtrlCreateLabel("系统任务: 定时关机或者重启！", 16, 190, 180, 17)
GUICtrlSetColor(-1,0x006400)
$Reate1 = GUICreate("关于", 200, 100, 605, 400);关于说明窗口
$Button10 = GUICtrlCreateButton("关机", 8, 15, 50, 20)
$Button11 = GUICtrlCreateButton("重启", 70, 15, 50, 20)
$Button12 = GUICtrlCreateButton("清除启动", 130, 15, 60, 20)
$Label3 = GUICtrlCreateLabel("定时启动程序代替系统计划任务", 8, 45, 180, 20)
$Label4 = GUICtrlCreateLabel("小白脸…Make For 广大网管兄弟", 8, 63, 180, 20)
$Label5 = GUICtrlCreateLabel("欢迎进入访问AUTOIT极品中文论坛", 8, 80, 180, 20)
GUICtrlSetColor(-1,0x4169E1)
GUISwitch($Reate0);切换用于GUI函数的“当前”窗口
GUISetState(@SW_SHOW)
$REATE2 = GUICreate("配置程序", 354, 200, 605, 400);配置程序主窗口
$GroupBox1 = GUICtrlCreateGroup("", 5, 0, 345, 175);美化框
$Label41 = GUICtrlCreateLabel("请添加程序①的执行路径....", 10, 10, 193, 21)
$Label42 = GUICtrlCreateLabel("请添加程序②的执行路径....", 10, 35, 193, 21)
$Label43 = GUICtrlCreateLabel("请添加程序③的执行路径....", 10, 60, 193, 21)
$Button62 = GUICtrlCreateButton("添加程序①", 209, 10, 65, 21, 0)
$Button32 = GUICtrlCreateButton("配置程序①", 282, 10, 65, 21, 0)
$Button72 = GUICtrlCreateButton("添加程序②", 209, 35, 65, 21, 0)
$Button43= GUICtrlCreateButton("配置程序②", 282, 35, 65, 21, 0)
$Button82 = GUICtrlCreateButton("添加程序③", 209, 60, 65, 21, 0)
$Button34 = GUICtrlCreateButton("配置程序③", 282, 60, 65, 21, 0)
$Button35 = GUICtrlCreateButton("清除所有程序路径", 230, 85, 105, 21, 0)
$Label31 = GUICtrlCreateLabel("请点击添加按钮添加程序的执行路径！ ", 10, 95, 220, 17)
$Label32 = GUICtrlCreateLabel("程序路径如果配置则已经记录！", 10, 115, 220, 17)
$Label33 = GUICtrlCreateLabel("如果要修改只需清除路径重新添加点配置即可！", 10, 135, 280, 17)
$Label34 = GUICtrlCreateLabel("清除路径则清除所有配置程序的路径请重新配置！", 10, 155, 280, 17)
$Label84 = GUICtrlCreateLabel("程序定时启动软件 Make For №小白脸… QQ：28530352", 10, 180, 300, 17)
$Showitem = TrayCreateItem("显示")
$Hideitem = TrayCreateItem("隐藏")
TrayCreateItem("")
$settingsitem = TrayCreateItem("配置")
TrayCreateItem("")
$aboutitem = TrayCreateItem("关于")
TrayCreateItem("")
$exititem = TrayCreateItem("退出")
TraySetState(1)
TraySetClick(8)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUISwitch($Reate0)
GUISetState(@SW_SHOW)
$R1 = ""
$R2 = ""
$R3 = ""
$R4 = ""
$T1 = ""
$T2 = ""
$T3 = ""
$T4 = ""
$T7 = ""
$T8 = ""
$T9 = ""
$T10 = ""
$T11 = ""
$T12 = ""
$T13 = ""
$T14 = ""
$T21 = ""
$T22 = ""
$T23 = ""
$T24 = ""
$patch1 = ""
$patch2 = ""
$patch3 = ""
If RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\TIME","时间1") <> "" Then;读取注册表指定的值
opt("TrayIconHide",0)
Opt("TrayMenuMode",1)
GUISetState(@SW_HIDE,$Reate0)
TrayTip("程序①启动时间！","已经定义好了！",5,1)
EndIf
If RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\TIME","时间2") <> "" Then;读取注册表指定的值
opt("TrayIconHide",0)
Opt("TrayMenuMode",1)
GUISetState(@SW_HIDE,$Reate0)
TrayTip("程序②启动时间！","已经定义好了！",10,1)
EndIf
If RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\TIME","时间3") <> "" Then;读取注册表指定的值
opt("TrayIconHide",0)
Opt("TrayMenuMode",1)
GUISetState(@SW_HIDE,$Reate0)
TrayTip("程序③启动时间！","已经定义好了！",15,1)
EndIf
If RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\TIME1","系统任务") <> "" Then;读取注册表指定的值
opt("TrayIconHide",0)
Opt("TrayMenuMode",1)
GUISetState(@SW_HIDE,$Reate0)
TrayTip("服务器定时任务！","已经定义好了！",5,1)
EndIf
While 1
$Tray = TrayGetMsg();得到一个系统托盘图标项目产生的事件.
$msg = GUIGetMsg(1);捕获窗口消息
Select
Case $msg[0] = $GUI_EVENT_CLOSE And $msg[1] = $Reate0;如果点下的是$GUI_EVENT_CLOSE(关闭)
Quit()
Exit
Case $msg[0] = $GUI_EVENT_CLOSE And $msg[1] = $Reate1
GUISetState(@SW_HIDE, $Reate1)
Case $msg[0] = $Button33
GUISetState(@SW_SHOW, $Reate1);激活指定窗口并使其以当前大小和位置信息显示
Case $msg[0] = $GUI_EVENT_CLOSE And $msg[1] = $Reate2
GUISetState(@SW_HIDE, $Reate2)
Case $msg[0] = $Button3
GUISetState(@SW_SHOW, $Reate2);激活指定窗口并使其以当前大小和位置信息显示
Case $msg[0] = $Button4
RegRun();操作Func RegRun()设定事件
MsgBox(64,"温馨提醒您:","已经写入开机自启动……"& @crlf &""& @crlf &"请勿移动本程序到别的位置.")
Case $Tray = $aboutitem
GUISetState(@SW_SHOW,$Reate1)
Case $Tray = $Showitem
GUISetState(@SW_SHOW,$Reate0)
Case $Tray = $Hideitem
GUISetState(@SW_HIDE,$Reate0)
Case $Tray = $settingsitem
GUISetState(@SW_SHOW,$Reate2)
Case $Tray = $exititem
Quit()
ExitLoop
Case $msg[0] = $GUI_EVENT_MINIMIZE;对话框窗口被最小化
GUISetState(@SW_HIDE,$Reate0)
TrayTip("定时启动程序软件","已经最小化窗口了,右键点击显示可以还原!",10,1)
Case $msg[0] = $Button1
RegDelete("HKEY_LOCAL_MACHINE\SOFTWARE\TIME")
GUICtrlSetData($Label1,"设定时间: 请设置程序①启动时间")
GUICtrlSetData($Label6,"设定时间: 请设置程序②启动时间")
GUICtrlSetData($Label7,"设定时间: 请设置程序③启动时间")
TrayTip("通知","当前定时已清理完毕,请重新设定！",1,2)
Case $msg[0] = $Button35
RegDelete("HKEY_LOCAL_MACHINE\SOFTWARE\PATCH")
GUICtrlSetData($Label41,"请添加程序①的执行路径....")
GUICtrlSetData($Label42,"请添加程序②的执行路径....")
GUICtrlSetData($Label43,"请添加程序③的执行路径....")
TrayTip("通知","当前程序路径已清理完毕,请重新配置！",1,2)
Case $msg[0] = $Button63
RegDelete("HKEY_LOCAL_MACHINE\SOFTWARE\TIME1")
GUICtrlSetData($Label11,"系统任务: 定时关机或者重启！")
TrayTip("通知","系统任务已清理完毕,请重新设定！",1,2)
Case $msg[0] = $Button2
$SET1 = GUICtrlRead($Date1)
If StringLen($SET1) = 7 Then
$SET1 = "0"&$SET1
EndIf
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\TIME","时间1","REG_SZ",$SET1)
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\TIME","事件1","REG_SZ",GUICtrlRead($Combo1))
TrayTip("通知","程序①执行时间已设定完成!请勿关闭程序,否则设定将不起作用.",1,2)
Case $msg[0] = $Button22
$SET2 = GUICtrlRead($Date2)
If StringLen($SET2) = 7 Then
$SET2 = "0"&$SET2
EndIf
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\TIME","时间2","REG_SZ",$SET2)
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\TIME","事件2","REG_SZ",GUICtrlRead($Combo2))
TrayTip("通知","程序②执行时间已经设定完成!请勿关闭程序,否则设定将不起作用.",1,2)
Case $msg[0] = $Button23
$SET3 = GUICtrlRead($Date3)
If StringLen($SET3) = 7 Then
$SET3 = "0"&$SET3
EndIf
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\TIME","时间3","REG_SZ",$SET3)
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\TIME","事件3","REG_SZ",GUICtrlRead($Combo3))
TrayTip("通知","程序③执行时间已经设定完成!请勿关闭程序,否则设定将不起作用.",1,2)
Case $msg[0] = $Button32
$patch1 = GUICtrlRead($Label41)
If StringLen($patch1) > 7 Then
$patch1 = "0"&$patch1
EndIf
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\PATCH","路径1","REG_SZ",GUICtrlRead($Label41))
MsgBox(64,"通知","程序①路径已经设定完成!",2)
Case $msg[0] = $Button43
$patch2 = GUICtrlRead($Label42)
If StringLen($patch2) > 7 Then
$patch2 = "0"&$patch2
EndIf
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\PATCH","路径2","REG_SZ",GUICtrlRead($Label42))
MsgBox(64,"通知","程序②路径已经设定完成!",2)
Case $msg[0] = $Button34
$patch3 = GUICtrlRead($Label43)
If StringLen($patch3) > 7 Then
$patch3 = "0"&$patch3
EndIf
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\PATCH","路径3","REG_SZ",GUICtrlRead($Label43))
MsgBox(64,"通知","程序③路径已经设定完成!",2)
Case $msg[0] = $Button53
$SET4 = GUICtrlRead($Date4)
If StringLen($SET4) = 7 Then
$SET4 = "0"&$SET4
EndIf
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\TIME1","任务定时","REG_SZ",$SET4)
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\TIME1","系统任务","REG_SZ",GUICtrlRead($Combo11))
TrayTip("通知","系统任务时间已设定完成!请勿关闭程序,否则设定将不起作用.",1,2)
Case $msg[0] = $Button62
$i1 = FileOpenDialog("请选择程序①的执行路径..", @ScriptDir, "执行程序①(*.exe)", 3)
GUICtrlSetData($Label41,""&$i1&"")
Case $msg[0] = $Button72
$i2 = FileOpenDialog("请选择程序②的执行路径..", @ScriptDir, "执行程序②(*.exe)", 3)
GUICtrlSetData($Label42,""&$i2&"")
Case $msg[0] = $Button82
$i3 = FileOpenDialog("请选择程序③的执行路径..", @ScriptDir, "执行程序③(*.exe)", 3)
GUICtrlSetData($Label43,""&$i3&"")
Case $msg[0] = $Button10
Shutdown(1);关机
Case $msg[0] = $Button11
Shutdown(2);重启
Case $msg[0] = $Button12
RegDelete("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run","定时启动")
MsgBox(64,"温馨提醒您:","已经清除开机自启动项………"& @crlf &""& @crlf &"如还需要自动启动"& @crlf &""& @crlf &"请点击'开机运行'按钮.")
Case $msg[0] = $Label5
Run(@ProgramFilesDir & "\Internet Explorer\IEXPLORE.EXE http://www.autoit.net.cn")
EndSelect
$T1 = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\TIME","时间1")
$R0 = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\TIME","事件1")
If $T2 <> $T1 Or $R0 <> $R1 Then;"<>"比较是否不相等,不相等该表达返回1否则返回0
$R1 = $R0
$T2 = $T1
GUICtrlSetData($Label1,"已定时执行: "&$T1&"("&$R0&")")
EndIf
$T3 = @HOUR&":"[email=&@MIN&":"&@SEC;$T3]&@MIN&%22:%22&@SEC;$T3[/email]等于当前时间
If $T3 <> $T4 then
$T4 = $T3
GUICtrlSetData($Label2,"当前时间: "[email=&@YEAR&"."&@MON&"."&@MDAY]&@YEAR&%22.%22&@MON&%22.%22&@MDAY[/email]&" "[email=&@HOUR&":"&@MIN&":"&@SEC]&@HOUR&%22:%22&@MIN&%22:%22&@SEC[/email]&"");修改指定控件的相关数据
EndIf
If $T1 = $T3 Then
If $R0 = "程序①" Then;读取注册表值,当$RO值等于组合列表"关机"时,则执行$RNOW = 1
$RNOW = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\PATCH","路径1")
ElseIf $R0 = "程序②" Then
$RNOW = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\PATCH","路径2")
ElseIf $R0 = "程序③" Then
$RNOW = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\PATCH","路径3")
EndIf
Run($RNOW);shutdown关机事件
EndIf
$T7 = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\TIME","时间2")
$R0 = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\TIME","事件2")
If $T8 <> $T7 Or $R0 <> $R2 Then;"<>"比较是否不相等,不相等该表达返回1否则返回0
$R2 = $R0
$T8 = $T7
GUICtrlSetData($Label6,"已定时执行: "&$T7&"("&$R0&")")
EndIf
$T9 = @HOUR&":"[email=&@MIN&":"&@SEC;$T3]&@MIN&%22:%22&@SEC;$T3[/email]等于当前时间
If $T9 <> $T10 then
$T10 = $T9
GUICtrlSetData($Label2,"当前时间: "[email=&@YEAR&"."&@MON&"."&@MDAY]&@YEAR&%22.%22&@MON&%22.%22&@MDAY[/email]&" "[email=&@HOUR&":"&@MIN&":"&@SEC]&@HOUR&%22:%22&@MIN&%22:%22&@SEC[/email]&"");修改指定控件的相关数据
EndIf
If $T7 = $T9 Then
If $R0 = "程序②" Then;读取注册表值,当$RO值等于组合列表"关机"时,则执行$RNOW = 1
$RNOW = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\PATCH","路径2")
ElseIf $R0 = "程序①" Then
$RNOW = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\PATCH","路径1")
ElseIf $R0 = "程序③" Then
$RNOW = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\PATCH","路径3")
EndIf
Run($RNOW);shutdown关机事件
EndIf
$T11 = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\TIME","时间3")
$R0 = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\TIME","事件3")
If $T12 <> $T11 Or $R0 <> $R3 Then;"<>"比较是否不相等,不相等该表达返回1否则返回0
$R3 = $R0
$T12 = $T11
GUICtrlSetData($Label7,"已定时执行: "&$T11&"("&$R0&")")
EndIf
$T13 = @HOUR&":"[email=&@MIN&":"&@SEC;$T3]&@MIN&%22:%22&@SEC;$T3[/email]等于当前时间
If $T13 <> $T14 then
$T14 = $T13
GUICtrlSetData($Label2,"当前时间: "[email=&@YEAR&"."&@MON&"."&@MDAY]&@YEAR&%22.%22&@MON&%22.%22&@MDAY[/email]&" "[email=&@HOUR&":"&@MIN&":"&@SEC]&@HOUR&%22:%22&@MIN&%22:%22&@SEC[/email]&"");修改指定控件的相关数据`1
EndIf
If $T11 = $T13 Then
If $R0 = "程序③" Then;读取注册表值,当$RO值等于组合列表"关机"时,则执行$RNOW = 1
$RNOW = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\PATCH","路径3")
ElseIf $R0 = "程序②" Then
$RNOW = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\PATCH","路径2")
ElseIf $R0 = "程序①" Then
$RNOW = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\PATCH","路径1")
EndIf
Run($RNOW);shutdown关机事件
EndIf
$T21 = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\TIME1","任务定时")
$R0 = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\TIME1","系统任务")
If $T22 <> $T21 Or $R0 <> $R4 Then;"<>"比较是否不相等,不相等该表达返回1否则返回0
$R4 = $R0
$T22 = $T21
GUICtrlSetData($Label11,"已设定任务: "&$T21&"("&$R0&")")
EndIf
$T23 = @HOUR&":"[email=&@MIN&":"&@SEC;$T3]&@MIN&%22:%22&@SEC;$T3[/email]等于当前时间
If $T23 <> $T24 then
$T24 = $T23
GUICtrlSetData($Label2,"当前时间: "[email=&@YEAR&"."&@MON&"."&@MDAY]&@YEAR&%22.%22&@MON&%22.%22&@MDAY[/email]&" "[email=&@HOUR&":"&@MIN&":"&@SEC]&@HOUR&%22:%22&@MIN&%22:%22&@SEC[/email]&"");修改指定控件的相关数据
EndIf
If $T21 = $T23 Then
If $R0 = "直接关机" Then;读取注册表值,当$RO值等于组合列表"关机"时,则执行$RNOW = 1
$RNOW = 1;关机事件
ElseIf $R0 = "重新启动" Then
$RNOW = 2;重启事件
ElseIf $R0 = "强行关机" Then
$RNOW = 5;强行关机
ElseIf $R0 = "强行重启" Then
$RNOW = 6;强行重启
EndIf
Shutdown($RNOW);shutdown关机事件
EndIf
$patch0 = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\PATCH","路径1")
If $patch0 <> $patch1 Then
$patch1 = $patch0
GUICtrlSetData($Label41,""&$patch1&"")
EndIf
$patch0 = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\PATCH","路径2")
If $patch0 <> $patch2 Then
$patch2 = $patch0
GUICtrlSetData($Label42,""&$patch2&"")
EndIf
$patch0 = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\PATCH","路径3")
If $patch0 <> $patch3 Then
$patch3 = $patch0
GUICtrlSetData($Label43,""&$patch3&"")
EndIf
If RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\TIME","时间1") <> "" Then
$T5 = StringReplace($T1,":","");替换字符串中的指定子串
$T6 = StringReplace($T3,":","")
If StringMid($T5,1,2)-StringMid($T6,1,2) = 0 Then
If StringMid($T5,3,2) - StringMid($T6,3,2) = 0 Then
If $T5-$T6 > 0 Then
TrayTip("温馨提醒您:","还有"&$T5-$T6&"秒开始执行程序①.....",10,1)
EndIf
Elseif StringMid($T5,3,2)-StringMid($T6,3,2) = 1 Then
If StringMid($T5,5,2)+60-StringMid($T6,5,2) > 0 Then
TrayTip("温馨提醒您:","还有"&StringMid($T5,5,2)+60-StringMid($T6,5,2)&"秒开始执行程序①.....",10,1)
EndIf
EndIf
EndIf
EndIf
If RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\TIME","时间2") <> "" Then
$T15 = StringReplace($T7,":","");替换字符串中的指定子串
$T16 = StringReplace($T9,":","")
If StringMid($T15,1,2)-StringMid($T16,1,2) = 0 Then
If StringMid($T15,3,2) - StringMid($T16,3,2) = 0 Then
If $T15-$T16 > 0 Then
TrayTip("温馨提醒您:","还有"&$T15-$T16&"秒开始执行程序②.....",10,1)
EndIf
Elseif StringMid($T15,3,2)-StringMid($T16,3,2) = 1 Then
If StringMid($T15,5,2)+60-StringMid($T16,5,2) > 0 Then
TrayTip("温馨提醒您:","还有"&StringMid($T15,5,2)+60-StringMid($T16,5,2)&"秒开始执行程序②.....",10,1)
EndIf
EndIf
EndIf
EndIf
If RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\TIME","时间3") <> "" Then
$T25 = StringReplace($T11,":","");替换字符串中的指定子串
$T26 = StringReplace($T13,":","")
If StringMid($T25,1,2)-StringMid($T26,1,2) = 0 Then
If StringMid($T25,3,2) - StringMid($T26,3,2) = 0 Then
If $T25-$T26 > 0 Then
TrayTip("温馨提醒您:","还有"&$T25-$T26&"秒开始执行程序③.....",10,1)
EndIf
Elseif StringMid($T25,3,2)-StringMid($T26,3,2) = 1 Then
If StringMid($T25,5,2)+60-StringMid($T26,5,2) > 0 Then
TrayTip("温馨提醒您:","还有"&StringMid($T25,5,2)+60-StringMid($T26,5,2)&"秒开始执行程序③.....",10,1)
EndIf
EndIf
EndIf
EndIf
WEnd
Func Quit()
GUISetState(@SW_HIDE)
DllCall($dll, "int:cdecl", "DeInitDecoration")
DllCall($dll, "int:cdecl", "RemoveSkin")
DllClose($dll)
;DirRemove(@AppDataDir&"\skin",1)
Exit
EndFunc
Func _SkinGUI($SkincrafterDll, $SkincrafterSkin, $Handle)
$Dll = DllOpen($SkincrafterDll)
DllCall($Dll, "int:cdecl", "InitLicenKeys", "wstr", "1", "wstr", "", "wstr", "1@1.com", "wstr", "1")
DllCall($Dll, "int:cdecl", "InitDecoration", "int", 1)
DllCall($Dll, "int:cdecl", "LoadSkinFromFile", "wstr", $SkincrafterSkin)
DllCall($Dll, "int:cdecl", "DecorateAs", "int", $Handle, "int", 25)
DllCall($Dll, "int:cdecl", "ApplySkin")
EndFunc ;==_SkinGUI
Func OnAutoItExit ( )
If FileExists(@WindowsDir&"\skin.dll")Then
FileDelete(@WindowsDir&"\skin.dll")
EndIf
If FileExists(@WindowsDir&"\skin.skf")Then
FileDelete(@WindowsDir&"\skin.skf")
EndIf
EndFunc
Func RegRun();修改注册表,添加程序开机自启动项
dim $Run='HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run'
RegWrite($Run,'定时启动','REG_SZ',@AutoItExe);@AutoItExe当前脚本的完整路径.
EndFunc;结束Func语句

[转]硬盘分区整数分法计算

392280254@qq.com(~~胸腔静无¤) — Thu, 17 Sep 2009 12:50:46 GMT

分区计算方法一般算法（来自电脑报）：分区大小＝（分区大小-1）×4＋1024×分区大小
如果按照硬盘分区整数G计算公式X-1)*4+1024*X=Y 其中X就是你想要得到的整数分区的数值,单位是G,Y是你分区时应该输入的数字,单位是M,

比如40GB＝（40－1）×4＋1024×40＝41116MB 按照这样的计算方法:
5G=5136MB
10G=10276MB
15G=15416MB
20G=20556MB
30G=30836MB
40G=41116MB

30G以内，输入上面的数据，如10G你输入10276，在Windows资源管理器里面显示的刚好10.00GB，而在管理工具-磁盘管理界面显示就是10.04GB，如果是40G你输入41116，那么在Windows资源管理器里面显示的刚好40.01GB。
因此上面的计算公式还不是很准确。

最精确硬盘分区的算法如下（来自网络搜索）:

硬盘一般有255磁头，63扇区，故每柱面大小为：
512byte x 255 x 63＝8225280bytes ＝7.84423828125 MB
如果要分40GB,那么要40x1024MB=40960MB
需要柱面数为40960÷7.84423828125=5221.66
取整数既为5222个柱面
应分M数为5222x7.84423828125=40962.6123046875MB
不管小数点后面几位都进1，也就是40963MB，windows就认为是40GB了。
这个方法NTFS和FAT32通用。

下面附10GB到200GB整10GB递增的精确计算结果：
10GB ＝ 10245MB
20GB ＝ 20482MB
30GB ＝ 30726MB
40GB ＝ 40963MB
50GB ＝ 51208MB
60GB ＝ 61444MB
70GB ＝ 71681MB
80GB ＝ 81926MB
90GB ＝ 92162MB
100GB ＝ 102407MB
110GB ＝ 112644MB
120GB ＝ 122888MB
130GB ＝ 133125MB
140GB ＝ 143362MB
150GB ＝ 153606MB
160GB ＝ 163843MB
170GB ＝ 174088MB
180GB ＝ 184324MB
190GB ＝ 194561MB

此精确分区结果，在管理工具-磁盘管理界面，和Windows资源管理器里面显示的是整数，10G就是10.00GB，20G就是20.00GB，40G就是40.00GB。

应该去当兵。。。。。。。。

392280254@qq.com(~~胸腔静无¤) — Mon, 07 Sep 2009 12:55:55 GMT

我的体质，向来是处于不好也不坏的境地。
不会突然生病感冒，但也没有强壮地吓人。
只是最近2-3天，听到了2个很陌生很陌生的人的同一个建议：你应该去当兵。

一个是市二医院的医生。因为公司的要求，我们要去市级以上医院体检下，我贪近去了市二。可以说，我和医院基本没打过交道，所以可以排除有我认识的医生（护士还是有的，因为有朋友是）。当我体检的时候，那体检的医生（检心电图的），突然对我说，你应该去当兵。
虽然一直对自己的身体还是很自信的，但还没想到过当兵。在心里觉得当兵的体质要求应该会比一般人的要求高点。

一个是的士司机。在工作外出的时候，坐的车，那司机在开车过程中，第一句对我说的话，竟然也是，你应该去当兵。如果说医生是从身体素质上判断，那司机是从什么地方判断我应该去当兵？
还是我写着，我是当兵的？

不过记得我绝对已经过了服兵役的年龄。所以在想这2位是怎么共同想到这个建议的。。。。

[转]Windows 2003单网卡实现VPN

392280254@qq.com(~~胸腔静无¤) — Fri, 24 Jul 2009 03:21:40 GMT

Windows 2003单网卡实现VPN

一、问题的提出如图1所示，在单位有个私有地址为192.168.0.0的网络，各电脑是通过ADSL共享方式接入Internet，在家中有台电脑也通过ADSL访问Internet，现在想在家中随时安全地访问单位192.168.0.2这台机器，实现方法很多，最为安全的是通过VPN。
二、什么是VPN 以本例来说就是现在单位192.168.0.2这台机器上设置好VPN服务，在家中通过VPN客户端访问单位这台机器，建立连接后，这两台机器通信时就像在局域网中一样，比如：要在192.168.1.10这台电脑中下载192.168.0.2这台机器的文件（假设该机已设好FTP服务），可以直接在浏览器中键入：ftp://192.168.0.2下载文件了。虽然是通过Internet进行通信，但整个过程都是加密的，就像是在Internet中穿了一条只有两台机器才能通过的隧道，这就是VPN( Virtual Private Networks )虚拟专用网。图1
三、优点通过VPN最大的优点就是安全。这点将在后面介绍到。
四、设置VPN服务实现VPN的方式非常多，用带VPN功能的路由器或用Linux、windows操作系统等，在windows系统下用双网卡建立VPN服务器更容易实现、但要增加一块网卡。介绍这方面的内容很多，不再赘述。本文介绍的是在windows 2003中用单网卡来实现。下面介绍实际实现过程，首先是在192.168.0.2这台机器上配置VPN服务。选择"开始"'"所有程序"'"管理工具"'"路由和远程访问"。设置过程如图2至图9所示，出现图10界面就完成了单网的VPN服务器端的设置，这里特别指出的是用单网卡一定要在图6处选择"自定义配置"，否则就进行不下去了。图2 图3 图4 图5 图6 图7 图8 图9 图10 五、从客户端连接到VPN服务器 1、新建有拨入权限的用户要登录到VPN服务器，必须要知道该服务器的一个有拨入权限的用户，为了讲得更明白，下面在该VPN服务器上新建个用户并赋予该用户拨入的权限，过程如图11至图12是建立一个用户，图13是给这个用户远程登录的权限，一定要在"远程访问权限"处选择"允许访问"，不然就无法登录了。图11 图12 图13 图14 2、在本机测试连接在远程连接到VPN服务器之前，最好先在VPN服务器的本机测试一下，测试过程如下：鼠标右键"网上邻居"，如图14，点击"新建连接向导"，按图15至图21的步骤建立连接，因为现在做的是本机的测试，所以其中图18中的IP地址为本机的地址，图21中的用户dzq就是我们刚才新建的用户。出现图22的连接图标表示连接成功。这样就可以进行远程连接测试了。如果此时用ipconfig /all看网卡状态，就会看见三个网卡，其中一个IP地址为192.168.0.2的就是本机网卡，另外两个是刚才做本机测试时建立的，它们的IP地址为169.x.xx . xxx .. xxx，这是VPN默认的IP地址，是正常的，不用管它。图15 图16 图17 图18 图19 图20 图21 图22 图23 3、远程连接前准备在远程连接之前要做好两个准备。第一要获得VPN服务器接入Internet的公共IP地址，如果是分配的静态IP，那就简单了，如果是动态IP，那必须在远程能随时获得这个IP地址，本例如图1，192.168.0.2这台机器的公网IP实际上就是ADSL猫接入Internet时，是ISP给自动分配的，获得动态IP的方法请参考拙作《获取动态IP地址的几种方法》。第二要做个端口映射，从图1的拓扑可以看出，本例是通作在ADSL猫中通过NAT转换接入Internet的，通过这种方式一定要在ADSL中作端口映射，由于windows 2003的VNP服务用的是1723端口，所以如图23，将1723端口映射到192.168.0.2这台设有VPN服务的机器。如果用的是直接拨号，那在防火墙中将这个端口放开就行了。图24 4、远程连接上面的服务器中的测试完成后，就可以在家中进行远程连接了，其过程和在本机连接测试的过程一样，如图14至图21所示，在实际连接时到图18这一步时，输入VPN服务器所在的公网IP就行了。实际应用中我是按照图1的拓扑连接的，连接很顺利，但遇到一个问题，在家通过VPN连入单位的机器后，和单位的机器通信完全正常，但不能正常上网。用route print检查路由（如表1所示）发现有两个到目标0.0.0.0的路由，网关一个是本来的网关192.168.1.1，一个是建立VPN后的网关169.254.101.219，这样在访问Internet网络时就有问题了。
C:\>route print
。。。。。。。
Active Routes:
Network Destination Netmask Gateway Interface Metric
0.0.0.0 0.0.0.0 169.254.101.219 169.254.101.219 1
0.0.0.0 0.0.0.0 192.168.1.1 192.168.1.10 2
61.55.13.163 255.255.255.255 192.168.1.1 192.168.1.10 1
127.0.0.0 255.0.0.0 127.0.0.1 127.0.0.1 1
169.254.101.219 255.255.255.255 127.0.0.1 127.0.0.1 50
169.254.255.255 255.255.255.255 169.254.101.219 169.254.101.219 50
192.168.1.0 255.255.255.0 192.168.1.10 192.168.1.10 20
192.168.1.10 255.255.255.255 127.0.0.1 127.0.0.1 20
192.168.1.255 255.255.255.255 192.168.1.10 192.168.1.10 20
224.0.0.0 240.0.0.0 192.168.1.10 192.168.1.10 20
224.0.0.0 240.0.0.0 169.254.101.219 169.254.101.219 1
255.255.255.255 255.255.255.255 192.168.1.10 192.168.1.10 1
Default Gateway: 169.254.101.219
===========================================================================
Persistent Routes:
None解决的办法：删除接入VPN后的路由，命令如下所示： C:\>route delete 0.0.0.0 mask 0.0.0.0 169.254.101.219 加一条指向VPN服务器所在网络的路由，本例（如图1）VPN服务器的地址为192.168.0.2,所以只要将到192.168.0.0这个网络的指向VPN的地址169.254.101.219就行了。 C:\>route add 192.168.0.0 mask 255.255.255.0 169.254.101.219 5、几点说明 1）、建立完VPN连接后，两台电脑的VPN的IP地址都是169.0.0.0中的地址，好像不能修改，但这并不影响使用，如图1建立连接后，在192.168.1.10这台电脑中ping 192.168.0.2是通的，也就是说要访问这台机器的资源，只要用192.168.0.2这个地址就行了。就像在局域网中一样。 2）、做为VPN服务器的这台机器的安全设置，如果没有特殊需要很多服务完全可以限制在局域网内，例如FTP服务只允许192.168.0.0网内的电脑访问。这样只要把VPN的安全做好就行了。换句话说，以本例来说，192.168.0.2这台机器访问Internet时是通过NAT地址转换，如果在ADSL猫中不做端口映射，从Internet的其它电脑上是看不到这台机器的，本例只做了VPN服务的1723端口的映射，虽然本机开了很多的服务，开放了很多端口，但这些都是对局域网开放的，要想从Internet访问这台机器，只有先建立了VPN才能访问其它的资源。只做一个服务的安全总比做许多服务的安全要容易些。VPN服务器有许多安全设置，以后再探讨。 3）、建立完VPN连接后，可以通过WWW、FTP互相访问，也可通过终端服务等登录到这台机器上，进而访问局域网中的其它电脑。图24就是192.168.1.10在建立完VPN后直接利用远程桌面连接，登录到192.168.0.2的机器上的登录界面。图25

幸福接力棒——接过若若的棒

392280254@qq.com(~~胸腔静无¤) — Fri, 12 Jun 2009 21:49:20 GMT

幸福接力棒（sweet heart ）

Q1:你的大名？
炎
Q2:你认为什么才算是真正幸福？
身边的人都幸福
Q3:你们觉得友情重要还是爱情重要，为什么?
Both
Q4:你相信天长地久吗？
马虎信着
Q5:你现在过得快乐么？
还行，至少没有痛苦
Q6:如果有秘密.你真的会做到坦白的告诉对方吗?
告诉该告诉的，人都有最低限的隐私
Q7:喜欢呆家的感觉么?
还行
Q8:觉得友情是永远的么？
当然。友情是需要用一辈子来珍惜的
Q9:希望自己多大结婚？
随机吧
Q10:你会为TA做自己从来不会做的事情?
会
Q11:你觉得女生卷发好还是直发好？
直发
Q12:最想去哪里旅游?
没有去过的地方
Q13:一辈子都不会忘记的事?
让自己再次活在地球的人
Q14:如果爱一个人,是不是要拼命挽回TA?
不是
Q15:看到天空你想起的第一个人是谁?
父母
Q16:你会爱TA一辈子么？
会
Q17:喜欢你的人和你喜欢的人，你会选哪个？
让喜欢我的人我喜欢，让我喜欢的人喜欢我，这就是我的目标。
Q18:你会以何种方式表现你对TA的爱？
对TA好，方式可以很多很多
Q19:如果看到自己最爱的人熟睡在你面前你会做什么？
一起睡吧
Q20:如果你想痛扁一个人,你希望那个人是?
没有目标
Q21:你有后悔过自己的决定吗？
没
Q22:现在最迷什么:
技术
Q23:你是好孩子吗？
据说是
Q24:觉得爱情和面包哪个重要？
都重要。物质基础与精神文明缺一不可
Q25:如果你失恋了你会怎么样?
像现在一样
Q26:如果你的BF（GF）经常不回家的话，你会怎样？
我负责送回家
Q27:心煩的時候要怎麽辦？
睡觉
Q28:你是个记仇的人吗？
我记忆力不怎么好
Q29:最爱的那个~离你有多远？
这个无法用距离衡量：世界上最远的距离
Q30:可以做到永不背弃爱吗？
I'll try. I think I can make it.
Q31:你在乎别人的眼光么?
某些人
Q31:经常感到孤独无助的时候吗?
偶尔会啦，但是不会很常。因为我有永远爱我的的亲人，还有很多关心我的朋友^_^
Q32:当你爱的人爱上了别人.你会怎样?
笑着祝福TA。
Q33:拥抱和KISS喜欢哪个?
可以一起做么？
Q34:在你快死的那一刻你会做什么?
根据事实是我不停地扑水
Q35:想给以后的孩子取什么名字？
MS这问题太长远了，暂不考虑
Q36:站在高处会想跳下吗？
我经常从1楼起跳
Q37:对婚前性行为有什么看法?
爱情的力量
Q38:如果时间可以倒流，你希望倒流到什么时候？
倒流？如果带着现在的理智和成熟，那就再一次人生吧！
Q39：你的美梦是什么啊？
开个网络公司
Q40:眼下最想做什么?
赚钱，读学历
Q41：现实和唯美摆在眼前，你会做什么样的决定？
现实
Q42:请点你名的人吃饭好不好啊？
好
Q43:什么是悟性?
悟性？当你往公交车上丢上2块钱的时候，才发现它没开空调。
Q44：如果你暗恋一个人你会怎么做？
我没有暗恋的记录，哥哥的生活中只有明恋，暗恋就说啊
Q45：最難以接受什麽樣的人？
小人
Q46: 你最爱的人名字？
爸爸妈妈
Q47:最近你在烦恼什么?
钱
Q48.如果重新选择，你会做地球上的什么东西呢？
人
Q49.如果让你选择，你会选择做男人还是做女人？
男人
Q50.最喜歡吃什麼菜或湯？
我不挑食，但是对虾类过敏
Q51.經歷過最浪漫的事是什麼？
难以想象浪漫的程度
Q52.记忆最深的事是什么？并举例。
没有，随时可以失忆
Q53.你月薪多少？
养不活1个人
Q54.你最喜欢的动物？
狗，其实我也喜欢老虎，如果它能让听话给我养着
Q55.有不想要的记忆吗？例如？
没有，发生过的每一件事对我来说，都是组成我人生不可或缺的部分
Q56.此刻你的左手在干什么？
摆在键盘上
Q57.你觉得什么样的TA跟我最衬？（我加的问题，邪恶的微笑中）
开朗，可爱，善解人意，善良，正直^_^^_^
Q58.在亲情和爱情中，你会如何选择？（若若加的问题，帮人寻求答案中）
选择2边
—————————————幸福的分割线——————————————————
是谁传给你这份问卷的：若若
你们认识多久呢：时间不是问题。有些人只需一面即是永远的好友。而有些人即使天天相对，也只能是普通人。
Ta是怎样的人：超可爱，热情，有点傻，女工作狂，女强人，技术人才，死撑坚强
你与TA的关系是：好友
TA的强项是：死撑坚强，然后用自己的快乐感染别人，把快乐和欢笑带给身边的人。
你觉得TA的个性如何：死撑坚强
对TA最深刻的印象：死撑坚强
—————————————幸福的折线——————————————————

要遵守游戏规则,要好好玩下去.希望自己能得到并延续那份幸福,希望接下去的朋友也能得到幸福,延续幸福...

游戏规则:
1 、被点名的人在我空间将这篇文章转载到自己空间中，然后在编辑，删去我的答案，要在自己的Q空间里写下自己的答案，然后加上自己的问题，传给其他人，列出个需要回答问题的人的名字，通知对方被点名了，被点名者不得拒绝回答问题，完成游戏的人将会永远得到大家的祝福。
2 、这个人要在自己的Q空间里注明是从哪里接到问题的，并且再想一个题目传给其他个人，让幸福的游戏继续下去。
3 、不能回传，否则犯规！
4 、被点到名字的人将得到大家的祝福，并且所有的美丽愿望都会在不久后实现。
请点15个朋友,不准不点，点完后请通知那15个朋友他们被点了！
综合了各方情况，我决定点这几个人：001-015号
嘻嘻。。。。其实不管有没有接到接力棒，我都相信，我身边的每一个人都是幸福的。因为大家都在用心^_^

幸福接力棒——接过乖乖的棒

392280254@qq.com(~~胸腔静无¤) — Sun, 31 May 2009 15:20:52 GMT

幸福接力棒（sweet heart ）（From：乖乖）
Q1:你的大名?
黄华钟
Q2:你认为什么才算是真正幸福？
身边的人都幸福
Q3:你觉得友情重要还是爱情重要，为什么?
一样，和双手般

Q４:你相信天长地久吗？
马虎信着

Q６:你现在过得快乐么？
还行，至少没痛苦

Q７:如果有秘密.你真的会做到坦白的告诉对方吗?
告诉该告诉的

Q８:喜欢小baby吗？
喜欢听话的
Q９:觉得友情是永远的么?
基本上是永远的

Q1０:希望自己多大结婚？
没想过，不着急

Q１１:你会为他做自己从来不会做的事情?
会
Q１２:你觉得女生卷发好还是直发好？
直
Q１３:最想去哪里旅游?
没去过的
Q１4:一辈子都不会忘记的事?
给自己再次生命的人
１５:如果爱一个人,是不是要拼命挽回TA?
不
１６:看到天空你想起的第一个人是谁?
父母
１７:你会爱TA一辈子么？
会
Q１８:喜欢你的人和你喜欢的人，你会选哪个？
没区别，我会让自己喜欢上喜欢自己的人，让自己喜欢的人喜欢自己
１９:你会以何种方式表现你对他（她）的爱?
默默守护
Q２１:如果你想痛扁一个人,你希望那个人是?
没目标
Q２２:你会后悔过自己的决定吗？
不
Q23 :现在最迷什么:？
技术
Q24：你是好孩子吗？
大家都觉得是
Q25:觉得爱情和面包哪个重要？
有爱情没面包的时候就显得面包重要了
有面包没爱情的时候当然爱情重要（这话说的好照搬了）
Q26：两个世界的人，会在一起？
会
Q27：如果你的BF（GF）经常不回家的话，你会怎样？
看情况了，不回她家，当然就在我家了；不回我家，当然就在她家了。我会送到家的。

加油哦------------------------------------------------------ 是谁传给你这份问卷的：乖乖
你们认识多久呢:从大一到现在
你与TA的关系是：好友
请问TA的兴趣是：打扮，买菜做饭，逛街，打扑克
你觉得TA的个性如何:可爱的乖乖
你的偶像:偶
你喜欢的季节：福州现在这样的夏天
你打工么：打
打工次数：4
你讨厌什么样的个性：势利眼溜须拍马不懂装懂自以为是恶心
你会喝酒么:会
你常哭么：不
你常笑么：比较经常
你喜欢去哪玩：没去过的地方
去玩时喜欢自己一个人去么: 不喜欢心情不好时例外
暑假日时你都睡到几点: 8-12点
今天的天气是:多云 21-30摄氏度
朋友和情人你会选：都要
机会和命运你会选择：机会
你很自恋么: 一般
问卷多不多：太多了吧
要怎样才能让自己好过一点: 赚更多钱
生日想得到什么礼物：想要的多了
喜欢吃冰么：很喜欢
现在幸福吗：还行
最常梦到什么:很空虚
听什么歌一定会流泪: 没有
如果没有朋友你会怎么做: 无法想象
如果我不见了你会怎样：找到你
地上有一张100和50的钞票：先拾起100的再拾起50的然后辨明真伪然后看看从哪里掉出来的，还有没。。。
现在时间: 2009年5月31日
目前最喜欢听的一首歌：没
你们过得好么?: 好
最讨厌谁?: 再讨厌也都是暂时的
今天開心嗎：平静没特别感觉
你最爱的人是谁:身边的人
你今天笑了么？ :恩
?当前认为最重要的是:目标
谁那么有才和无聊：你啊。。
你们会想我不-------会
乖乖的问题是：你们眼中的我是怎样的？我可爱的乖乖

点名：001-010号、

—————————————幸福的分割线—————————————————— 要遵守游戏规则,要好好玩下去.希望自己能得到并延续那份幸福,希望接下去的朋友也能得到幸福延续幸福...
游戏规则:
1、被点名的人在我空间将这篇文章转载到自己空间中，然后在编辑，删去我的答案，要在自己的Q空间里写下自己的答案，然后加上自己的个问题，传给其他个人，列出个需要回答问题的人的名字，通知对方被点名了，被点名者不得拒绝回答问题，完成游戏的人将会永远得到大家的祝福。
2、这个人要在自己的Q空间里注明是从哪里接到问题的，并且再想一个题目传给其他个人，让幸福的游戏继续下去。
3、不能回传，否则犯规！
4、被点到名字的人将得到大家的祝福，并且所有的美丽愿望都会在不久后实现。
----------------------------------------------------------------------------------------------

完请点10个老朋友,不准不点
点完后请通知那10个老朋友他们被点