UG GRIP中几种加密写法

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

7 o9 F: h* c+ y9 L' F8 Q; u

0 d' @8 O6 U6 ?% \: u6 z

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

0 i/ @0 T1 _8 k8 N& l

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

+ B3 ]" K5 Y9 j# K. z, }2 d

proc/n_cmp,n_usd,n_dat,n_dom

. i: j( y0 x& J0 ^4 Qstring/r_dir(132),l_con(50,132),l_add(132)
2 `$ W0 L) d) }# Y ^' Wstring/user(132),c_name(132),comp(132)% }7 i: {0 u* l8 ^$ g9 g1 h
number/n_usd,n_dat,n_cmp,n_dom

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

n_cmp=04 z: b4 h! b" _4 W( T3 u
n_usd=0 o$ i, S6 w( ?+ A8 @9 F. x+ E" \2 w
n_dat=0
/ y' L$ J2 }5 z/ Mn_dom=0

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

comp=envvar/'computername',ask: F; B9 O- Z6 R7 X% u, j
ifthen/cmpstr(comp,'XXX')==0& a. ^6 ?: a R, b4 Y7 S: u
n_cmp=1
2 r: o! B) K4 ^+ wendif

$$=========================================================  c$ ^. _2 f% V+ f1 s$ P9 ?3 K
n_dom:& M  t$ ^" P% H3 Y' u4 D+ D6 L% q
comp=envvar/'userdomain',ask+ |  g8 t/ S, n  H- `
ifthen/cmpstr(comp,'yue-SUZHOU')==0
n_dom=12 p6 x& P6 e/ T1 @# n
endif

$$=========================================================/ t4 @; l: a# O- W) M d
n_usr:

ifthen/&userid=='tagore'* W: o" i0 t9 Y% v# T7 a4 c+ |
n_usd=12 W1 r' o4 X; V1 [+ c* X( z Q
endif

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

n_dat:+ ~0 H8 H5 o$ h4 L. ~, |
&fulldt=2$ C/ c3 ?3 z8 x. p
ifthen/date<='10-01-2014'
! C8 e. b7 v. q# O* {, \' Un_dat=1( X Q5 C0 G7 n/ n
endif

$$=========================================================5 I$ }" r: _+ M
hal:
# G- E; B! s. ] y" jreturn
% B1 @& v* d( M! Z d I5 }$$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中几种加密写法