UG GRIP中几种加密写法

xcb

2 G, S' z/ u& O8 q) X. z1 E

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

5 t) f" }7 U7 ^$ W

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

1 e* q2 G2 D: T  X3 ]* H5 u9 z

proc/n_cmp,n_usd,n_dat,n_dom

) u! J. h7 H$ b2 k; Lstring/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
, r# d8 m# o* w, Q+ Rn_dat=0
n_dom=0

$$=========================================================

comp=envvar/'computername',ask
! k1 g) h2 u% S* oifthen/cmpstr(comp,'XXX')==0
7 e( N$ Z9 V" X; b$ q. xn_cmp=1
endif

$$=========================================================
n_dom:
. Z; J- v7 {' V9 ~9 O" @$ Hcomp=envvar/'userdomain',ask
- W1 m" A1 j4 Hifthen/cmpstr(comp,'yue-SUZHOU')==0
n_dom=1
3 M; A7 E( ?+ j9 E; n2 zendif

$$=========================================================
" S- ~! y8 ^4 Qn_usr:

ifthen/&userid=='tagore'
( j. `: t/ z- Q3 b4 M  ?& Fn_usd=1
endif

$$=========================================================

n_dat:
4 B# e! F5 m( I$ {6 i1 f% R; W&fulldt=2
ifthen/date<='10-01-2014'
n_dat=1
endif

$$=========================================================
; k, s2 w1 e* O; Uhal:
4 a8 |) c8 n# e) b4 oreturn
$$halt

baton520

是挺不错的，根据用户名和日期还有电脑名来加密了，不过这样可以通过修改还可以继续使用，最近在研究通过提取网卡的MAC地址来加密，这个改了也没用

magoo123456

楼主，不论什么情况你一定要hold住！hold住就是胜利！hold就是对UG网最大的支持！

XIAObo595219317

敢问楼主此段代码如何插入其他GRS文件？

zmjacky

厉害，谢谢分享

UG-GRIP

以前看帖常常忘了回帖，感动于作者的悲情史，每每回首未尝不感慨涕淋，痛哭流涕，于是哀余生之短暂，诲曾经之过失，然时不可逆，天不可违，隧抒以感慨以兹慰藉，以求无愧于心