PROGRESS编程其实很简单（一） 一、变量定义。 变量必须在第一次被使用之前定义，可以定义在程序的任何地方！但是通常为了增加程序的可读性，变量定义都放在程序的开始处！以下是变量定义的几个实例： define variable str01 as string label "DemoString" initial "hello".def var str02 like str01.def var dt01 as date extent 5.def var inte01 as inte format ">>>9". 说明，第一行：str01 是变量名， 变量名不要与系统关键字重复，字符或...

    插上网线，电脑就会发生60秒自动关机重启的故障，这个问题困扰了我一年多，一年中，凡遇有这种情况发生，均耗费大量的精力在网路上查找应对方案，因为实在不想重灌系统。    网路上的传言很多，有说是一种病毒，需要下载专杀工具，有说需要打全补丁，有说需要修正注册表的，凡此种种不一而足，不能说没有道理，想来这些方法也确然解决了一部分电脑的问题。    但我在这里需要强调的是，电脑未曾发现任何病毒，...

    世界上最无聊的事情是与病毒做斗争了，白白地浪费了生命。病毒是层出不穷的，人的生命却是有限的。    不敢苟同编写和发布病毒是展示技术，探讨漏洞，如果是这样的话，还不如形成学术报告提交相关组织和机构来的直接。无聊的人太多，仿佛并不怎么看重人本身这短暂的生命，浪费在心灵层次的钩心斗角上，何苦呢？！    从昨天开始抓到威金的最新变种，到今天，已经很晚了，还在为杀除这种病毒忙碌，想想，病毒哦，...

互联网真是个奇怪的东东，盗版的破解的，五花八门无所不有，总之一句话，免费的才是最好的。我个人一直不赞成什么知识版权的东东，国人是没有这个意识和觉悟，很大程度上取决于民众太穷了，知识版权即使在现在，也多半是西方列强的另外一种经济文化入侵而已，所以，至少现在，我还是赞成免费。一直在寻找OE-Mail Recovery这个东东，去年就在找了，可是心血白费，就是没找到可用的注册版，今天又被工作逼迫，上来瞎忙活半天，竟然被我找到了注册的方法。OE-Mail Recove...

5月22日傍晚，发现公司内所有服务器均出现故障，敏感地意识到又被病毒攻击了，半个小时抓到病毒，5月17号的瑞星病毒库无法查到该病毒，也因此瑞星服务器被病毒cut掉，只好手动清除病毒，然后下载21号瑞星最新的病毒库，终于发现tc变种的病毒。其实，威金tc变种在刚侵入电脑，尚未来得及大规模爆发时，使用手工清除的方法是完全可行的，它无非就是隐藏在windows目录，system32目录，个人用户目录，program files目录内，并且在注册表中将自身注册而已，只要下到安全模...

現在的電腦給人有一種弱不禁風的感覺，不是今天受到這個病毒突襲，就是明天受到那個黑客的攻擊，出錯、死機變得象家常便飯一樣了。為了讓計算機“堅強”起來，不少人找來了殺毒軟件、防火牆，希望通過這些軟件來增強計算機的免役力。的確，這些軟件在一定程度上增強了計算機抵抗外來攻擊的能力，但對于計算機內部系統存在的漏洞就無能為力了。本文的目的主要是向大家介紹一下通過修改注冊表的方法，來提高系統的安全。 　　一、隱藏一個服務器 　...

条件转移指令Jcc根据指定的条件确定程序是否发生转移。如果满足条件则程序转移到目标地址去执行程序；不满足条件，则程序将顺序执行下一条指令。 其通用格式为：Jcc LABEL         ;条件满足，发生转移：IP←IP+8位位移量                  ；否则，顺序执行:IP←IP+2其中，LABEL表示目标地址（8位位移量）。因为Jcc...

对许多IT管理员来说，公司电子邮件长达一个星期的失控，可能比离婚还要痛苦。 由数据储存软件公司Veritas所赞助的一份研究报告还发现到，电子邮件系统里的管理，备份，以及复原系统都有相当惊人的缺陷。 根据研究报告内容指出，4%的IT管理员表示，当电子邮件系统发生意外的当机（downtime）时，修复时间在一个小时内。15%表示，要花一个小时，41%要花一个小时以上的时间才能够让整个系统恢复运作──其中包括有9%说要花一天以上。39%表示，不知道要花多少时间...

select *from glvocbook a, glacct b, glvocproj c, bstcus d, glvocproj e, bstdept f, bstcurr gwhere a.acct_id = b.acct_idand b.acct_no = '2121-01'and a.state = 1and a.dc = 1and a.vocproj_id = c.vocproj_idand c.cus_id = d.cus_idand a.vocproj_id = e.vocproj_idand e.dept_id = f.dept_idand a.curr_id = g.curr_idand a.vocb_id not in (select tran1_id from glvoccross)