API 没有回应
No response from API
我在 excel 中创建了一个 API 调用以从 Wix 数据库获取数据。
来电:
Dim http As Object, JSON As Object
Set http = CreateObject("MSXML2.XMLHTTP")
http.Open "GET", "https://username.wixsite.com/mysite/_functions/Functionname", False
http.setRequestHeader "Authorization", "myauthkey"
http.Send
MsgBox (http.responseText)
Wix 上的javascript http 后端文件:
import { ok, notFound, serverError } from 'wix-http-functions';
import wixData from 'wixdata';
export function get_Wixdata() {
let options = {
"headers": {
"content-type": "application/json"
}
};
return wixData.query("wix data collection name")
.find()
.then(results => {
if (results.items.length > 0) {
options.body ={
"items": results.items
}
return ok(options);
}
})
}
我在 JSON 占位符上测试了调用(未经授权),它工作正常。
只是尝试调试正在发生的事情,因为我收到“”作为响应。
即使我输入错误的 API 键,我仍然得到“”,即使是错误的 url 它仍然是一个“”响应。
我认为我想做的事情显然偏离了目标..
您是否试过将两个 headers 都放入您的请求中,如下所示:
let headers = new Headers({
'Content-Type': 'application/json',
'Authorization': '....'
});
问题出在 VBA 调用上,不需要 header。
Dim https As Object, JSON As Object
Set https = CreateObject("MSXML2.XMLHTTP")
With CreateObject("Microsoft.XMLHTTP")
.Open "GET", "end point url", False
.send
response = .responseText
End With
我在 excel 中创建了一个 API 调用以从 Wix 数据库获取数据。
来电:
Dim http As Object, JSON As Object
Set http = CreateObject("MSXML2.XMLHTTP")
http.Open "GET", "https://username.wixsite.com/mysite/_functions/Functionname", False
http.setRequestHeader "Authorization", "myauthkey"
http.Send
MsgBox (http.responseText)
Wix 上的javascript http 后端文件:
import { ok, notFound, serverError } from 'wix-http-functions';
import wixData from 'wixdata';
export function get_Wixdata() {
let options = {
"headers": {
"content-type": "application/json"
}
};
return wixData.query("wix data collection name")
.find()
.then(results => {
if (results.items.length > 0) {
options.body ={
"items": results.items
}
return ok(options);
}
})
}
我在 JSON 占位符上测试了调用(未经授权),它工作正常。
只是尝试调试正在发生的事情,因为我收到“”作为响应。 即使我输入错误的 API 键,我仍然得到“”,即使是错误的 url 它仍然是一个“”响应。
我认为我想做的事情显然偏离了目标..
您是否试过将两个 headers 都放入您的请求中,如下所示:
let headers = new Headers({
'Content-Type': 'application/json',
'Authorization': '....'
});
问题出在 VBA 调用上,不需要 header。
Dim https As Object, JSON As Object
Set https = CreateObject("MSXML2.XMLHTTP")
With CreateObject("Microsoft.XMLHTTP")
.Open "GET", "end point url", False
.send
response = .responseText
End With