[灌水]如此出错提示产生意想不到效果。

xstlf

在明经老师的指点下，本人自编了一些小程序。我的同事试用后，有几个觉得不错，放弃了天正。其中有一些程序因为我闲来无聊，把出错提示，改成



（princ "\n你的电脑中了割鸡鸡病毒，此病毒专门割你的小鸡鸡")


(princ "若你不想小鸡鸡被割，请速与不戒烟31联系")


哎，结果我的男同事都没出错，反而一个女同事大叫“我中了割鸡鸡病毒了”晕呀，害得我不好意思说出原因就把这个提示删掉了。哎，本来想把这提示用在4月一日遇人节的，但我水平不好，编不出来呀，主要是不知道怎么找出当前系统的日期和月份。


老师们怎么找出当前系统的日期和月份呀，四月一日马上就快到了，我想学呀。

xstlf

我已经知道怎么提取日期了，用。cdate，哈哈，这下，又可以在遇人节捉弄他们一下了。希望那天不要是休息日。呵榀。

peng197806

读取日期时间:


(getvar         "CDATE")

peng197806

在飞哥的贴子"[公告]提问先看这里，——一些典型及实用问题及其回答！ [ 1 2 3 ] "里面有更详细的回答!! http://bbs.mjtd.com/forum.php?mod=viewthread&tid=7452