所以我想进入加密。所以我学会了vbscript。我看到一段代码,我可以阅读其中的一半,但另一半我可以阅读。并且没有在互联网上那里有一个地方,它解释了这些代码行的含义。任何人都可以告诉我这些代码行:
function encode(s)
For i = 1 To Len(s)
newtxt = Mid(s, i, 1)
newtxt = Chr(Asc(newtxt)+5)
coded = coded & newtxt
Next
encode = coded
End Function
这是代码的全部内容:
set x = WScript.CreateObject("WScript.shell")
mySecret = inputbox("enter text to be encoded")
mySecret = StrReverse(mySecret)
x.Run "%windir%\notepad"
wscript.sleep 1000
x.sendkeys encode(mySecret)
function encode(s)
For i = 1 To Len(s)
newtxt = Mid(s, i, 1)
newtxt = Chr(Asc(newtxt)+5)
coded = coded & newtxt
Next
encode = coded
End Function
答案 0 :(得分:0)
这不是加密,因为它是混淆。
s
中的每个字符。它需要一个字母的字符,并向右移动5个字符,以便' A'成为' F'。
检查出来:ROT13