神奇的加密 谢谢版主 |
谢谢啦,学习学习 |
謝謝分享.......... |
好用吗 下载试试 |
谢谢分享----- |
这么多人下载了,唯独只有我厚着脸皮说不会用![]() ![]() ![]() |
328612167 发表于 2019-5-20 20:40 能不能出个使用教程啊? 不会用啊! |
我把要加密的代码替换成生成出来的set cam_post_dir [MOM_ask_env_var UGII_CAM_POST_DIR] set this_post_dir "[file dirname [info script]]"; ? G" T1 h3 Q/ U/ W8 D set encrypted_post_file "[file rootname [info script]]ab_crypt.txt"- E- ]9 ]# T, f6 S; | if { ![file exists $encrypted_post_file] } { set __msg "ERROR in[info script] :"$encrypted_post_file" is not found."' K, G6 S1 N( b: S8 B MOM_abort $__msg$ T, b9 t) f- @8 u } + V. J. _1 E. `, `6 z$ d: g ########################################################################" H1 j1 X f" B2 J4 g set x64 0 ; set path "" ;2 ~0 ?1 @3 |( a2 d& b& s set root_dir [MOM_ask_env_var UGII_ROOT_DIR] ;8 n. A$ F" j0 n+ c set os_64 ${root_dir}ugtcl.dll! d6 u8 s/ p5 \ if { [file exists $os_64] } { set sz [ file size $os_64 ] ; set sz [ expr double($sz) ]8 P5 p }; o" H if {$sz>600000.} { set x64 1 ; } else { set x64 0 ; }6 G: G2 X/ A/ T! Z } else { set x64 1 ; }! q) F/ W8 E! H2 |) Z+ M7 j& W! U if {$x64} { set encload_dll ${path}encload_x64.dll ; } else { set encload_dll ${path}encload_x32.dll ; } if { ![file exists ${cam_post_dir}$encload_dll] } {' {9 Z& C# s7 P- I. A set __msg "ERROR in[info script] :Shared library "Encload" is not found in ${cam_post_dir}." MOM_abort $__msg8 N( E- z1 ~( @9 P6 [4 \/ y }$ E- o9 a' I8 C ######################################################################## catch { _1 C# l0 M! s# o2 S MOM_run_user_function ${cam_post_dir}$encload_dll ufusr4 K2 @7 I' ~2 X( _3 P6 D/ J encload [file nativename $encrypted_post_file] } 但是不成功! 还请大佬教一下 |
不错,不错![]() |
下来看看,好不好用 |
|Archiver|手机版|小黑屋|若枫后处理论坛
( 苏ICP备11015087号-1|
苏公网安备32059002001368号 )
GMT+8, 2024-6-20 23:02 , Processed in 0.265201 second(s), 19 queries .
Powered by Discuz! X3.5
© 2001-2024 Discuz! Team.