UG GRIP中几种加密写法

xcb · 发表于 2014-3-3 21:25

4 z* x/ ?' U. E w# z% t

1 s# }0 R6 L5 s/ _! {- }

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

2 u7 M1 k7 L+ R. O: U+ ^& n

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

) z# q- i C' Y4 U7 }8 e3 N

proc/n_cmp,n_usd,n_dat,n_dom

+ j$ k/ g9 Q6 H: s1 o y0 B' D
string/r_dir(132),l_con(50,132),l_add(132)
4 O7 H/ n: A+ x$ I Bstring/user(132),c_name(132),comp(132)# ~" b$ M' M# \' A% L
number/n_usd,n_dat,n_cmp,n_dom

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

n_cmp=0, q2 k; e% d3 I" O0 {
n_usd=0
1 g3 k4 j* J; K0 zn_dat=0
( w6 j( Q6 n" v' dn_dom=0

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

comp=envvar/'computername',ask
& U- G: l8 c: g( `ifthen/cmpstr(comp,'XXX')==0
& ?9 ~! Q% Z1 N7 f' m8 z" Yn_cmp=1# Y, e' w" I8 i$ T
endif

$$=========================================================
; b. L; W! e! j! Y% Mn_dom:
7 h7 ?1 S: H; X) s) j: ]comp=envvar/'userdomain',ask; e. X$ a9 d' V
ifthen/cmpstr(comp,'yue-SUZHOU')==0
. I' X1 Z8 t5 Xn_dom=1
) L# c, d- a2 lendif

$$=========================================================: a3 X0 |# S0 O9 G, @" z
n_usr:

ifthen/&userid=='tagore'
9 u1 q- b" T1 t. d% p) D1 cn_usd=1* [1 Y- H, u' P0 W. q5 t
endif

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

n_dat:
?7 i( l2 S6 [&fulldt=2! C5 ]8 n3 w, A- S& O y4 ?
ifthen/date<='10-01-2014'
- i. R0 e3 o) |7 G) B" K1 u8 P0 n8 Jn_dat=1
9 N% R* R6 M, I& Y! d) ^! ~& w8 iendif

$$=========================================================) h; s3 |' a( s7 L' H; X
hal:
7 Q) I# U2 D- f Qreturn
* P0 I2 `9 v8 H& U/ K0 n: j$$halt

baton520 · 发表于 2014-3-16 21:08

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

magoo123456 · 发表于 2014-3-21 08:39

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

XIAObo595219317 · 发表于 2014-4-16 10:09

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

zmjacky · 发表于 2014-8-31 15:56

厉害，谢谢分享

UG-GRIP · 发表于 2019-7-14 17:09

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

		自动登录	找回密码
密码			注册

[教程] UG GRIP中几种加密写法