To understand the following code, you need to understand the following function
VBScript StrReverse function
Returns a string that is the opposite of the specified string order.
StrReverse (string1)
The string1 parameter is the string to be reversed by the character . If string1 is a 0-length string (""), a 0-length string is returned. If string1 is null, an error occurs.
Description
The following example uses the StrReverse function to return a string in reverse order:
Dim mystr
MyStr = StrReverse ("VBScript") ' MyStr contains ' TPIRCSBV '.
Copy Code code as follows:
<script language=vbs>
Function Pass ()
Input=inputbox ("Please enter password:", "Hello",, 300,300)
If Input=strreverse ("Why?") Then
Location.href=strreverse ("tpircsbvym/moc.udiab.ih//:p TTH")
Else
MsgBox "Error"
Location.href=window.location.href
End If
End Function
</script>
Below we analyze the above VBS code, the master floated over bar
If Input=strreverse ("Why?") then password is the inversion of the why character, that is, the password is: "
? YHW"