标题:研究一个程序的时候发现了这个问题,请高手指教。
只看楼主
我爱VFP
Rank: 1
等 级:新手上路
帖 子:1
专家分:0
注 册:2004-7-17
 问题点数:0 回复次数:1 
研究一个程序的时候发现了这个问题,请高手指教。

PROCEDURE chrsed PARAMETER AAA LOCAL C , I , J C = '' J = 1 FOR I = 1 TO LEN(AAA) C = C + CHR(BITXOR(ASC(SUBSTR(AAA,I,1)),J ** 2)) J = J + 1 J = IIF(J > 8,1,J) ENDFOR RETURN C ENDPROC *------ PROCEDURE getdiskno PARAMETER _SROOT DECLARE INTEGER GetVolumeInformationA IN kernel32.dll STRING , STRING , INTEGER , ; INTEGER @ , INTEGER , INTEGER , STRING , INTEGER LSERIALNUM = 0 STORE REPLICATE(CHR(0),255) TO STRLABEL , STRTYPE = GETVOLUMEINFORMATIONA(_SROOT,@STRLABEL,255,@LSERIALNUM,0,0,@STRTYPE,255) LSERIALNUM = IIF(LSERIALNUM < 0,4294967295 + LSERIALNUM + 1,LSERIALNUM) + 1024 CLEAR DLLS RETURN LSERIALNUM ENDPROC

*****上面的这段程序不太明白是什么意思,有没有高手能给小弟讲一讲,跪谢了。

搜索更多相关主题的帖子: 指教 研究 
2004-07-17 11:01
tzhtang
Rank: 1
等 级:新手上路
帖 子:888
专家分:0
注 册:2004-8-30
得分:0 
上面一段程序是变码程序,将由主程序传来的变量AAA变码成C的值回传回主程序。

2004-08-30 15:24



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-3405-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 1.778275 second(s), 8 queries.
Copyright©2004-2025, BCCN.NET, All Rights Reserved