UG GRIP中几种加密写法

2847657989 · 发表于 2014-3-3 21:28:14

UG GRIP中几种加密写法，可以做成子程序。

proc/n_cmp,n_usd,n_dat,n_dom
string/r_dir(132),l_con(50,132),l_add(132)
string/user(132),c_name(132),comp(132)
number/n_usd,n_dat,n_cmp,n_dom$=========================================================n_cmp=0
n_usd=0
n_dat=0
n_dom=0$=========================================================comp=envvar/'computername',ask
ifthen/cmpstr(comp,'XXX')==0
n_cmp=1
endif$=========================================================
n_dom:
comp=envvar/'userdomain',ask
ifthen/cmpstr(comp,'yue-SUZHOU')==0
n_dom=1
endif$=========================================================
n_usr:ifthen/&userid=='tagore'
n_usd=1
endif$=========================================================n_dat:
&fulldt=2
ifthen/date<='10-01-2014'
n_dat=1
endif$=========================================================
hal:
return
$halt

复制代码

原帖地址：http://www.ugufun.com/?p=83

qqq19303 · 发表于 2024-3-5 22:52:17

很好很好很好

老年人， · 发表于 2019-6-3 16:08:56

学习学习学习

ZhuaiGG · 发表于 2019-6-3 14:47:17

提示: 作者被禁止或删除内容自动屏蔽

liuyanwu09 · 发表于 2019-5-31 18:06:12

需要所以看一看下载下来学习

LXKKK · 发表于 2019-5-16 23:43:08

好好学习，天天向上

一叶之秋-叶神 · 发表于 2019-4-13 23:03:37

有没有弧齿锥齿轮的

slk · 发表于 2019-4-6 00:09:33

66666666666666666666666

jayjiangyulx · 发表于 2019-2-25 21:51:02

真的没看的太明白！！

zhanzhangzhang · 发表于 2018-12-10 17:58:03

6666666666666666666

[原创] UG GRIP中几种加密写法