Javascript reCAPTCHA v3 vb.net未捕获(承诺中)null
我正在尝试向VB.net页面添加验证码。唯一的解释是无结果(承诺)无效?我在脚本中添加了一个标签,但它不在页面上,错误消失了,但仍然不起作用?顺便说一句,如果我不检查,我确实会收到“你是机器人吗”消息,但如果我检查,它只会重新加载页面,而不会继续按钮单击事件中的代码 我的代码:Javascript reCAPTCHA v3 vb.net未捕获(承诺中)null,javascript,vb.net,recaptcha-v3,Javascript,Vb.net,Recaptcha V3,我正在尝试向VB.net页面添加验证码。唯一的解释是无结果(承诺)无效?我在脚本中添加了一个标签,但它不在页面上,错误消失了,但仍然不起作用?顺便说一句,如果我不检查,我确实会收到“你是机器人吗”消息,但如果我检查,它只会重新加载页面,而不会继续按钮单击事件中的代码 我的代码: 脚本: var your_site_key = 'xxxxxxxxxxxxxxxxxx'; var renderRecaptcha = function () { grecaptcha.rende
脚本:
var your_site_key = 'xxxxxxxxxxxxxxxxxx';
var renderRecaptcha = function () {
grecaptcha.render('ReCaptchContainer', {
'sitekey': 'xxxxxxxxxxxxxxxxxx',
'callback': reCaptchaCallback,
theme: 'light', //light or dark
type: 'image',// image or audio
size: 'normal'//normal or compact
});
};
var reCaptchaCallback = function (response) {
if (response !== '') {
document.getElementById('lblMessage1').innerHTML = "";
}
};
设计视图:
<div id="ReCaptchContainer"></div>
<br/><asp:Label ID="lblMessage1" runat="server" />
功能:
Public Function IsReCaptchValid() As Boolean
Dim result = False
Dim captchaResponse = "g-recaptcha-response"
Dim secretKey = "xxxxxxxxxxxxxxxxxxx"
Dim apiUrl = "https://www.google.com/recaptcha/api/siteverify?secret={0}&response={1}"
Dim requestUri = String.Format(apiUrl, secretKey, captchaResponse)
Dim request = CType(WebRequest.Create(requestUri), HttpWebRequest)
Using response As WebResponse = request.GetResponse()
Using stream As StreamReader = New StreamReader(response.GetResponseStream())
Dim jResponse As JObject = JObject.Parse(stream.ReadToEnd())
Dim isSuccess = jResponse.Value(Of Boolean)("success")
result = If((isSuccess), True, False)
End Using
End Using
Return result
End Function
Public Function IsReCaptchValid() As Boolean
Dim result = False
Dim captchaResponse = "g-recaptcha-response"
Dim secretKey = "xxxxxxxxxxxxxxxxxxx"
Dim apiUrl = "https://www.google.com/recaptcha/api/siteverify?secret={0}&response={1}"
Dim requestUri = String.Format(apiUrl, secretKey, captchaResponse)
Dim request = CType(WebRequest.Create(requestUri), HttpWebRequest)
Using response As WebResponse = request.GetResponse()
Using stream As StreamReader = New StreamReader(response.GetResponseStream())
Dim jResponse As JObject = JObject.Parse(stream.ReadToEnd())
Dim isSuccess = jResponse.Value(Of Boolean)("success")
result = If((isSuccess), True, False)
End Using
End Using
Return result
End Function