在本地主机上托管HTTP-Kit时进行AJAX调用

Question

我正在尝试创建一个前端和HTTP-Kit后端网站。在Web浏览器中从HTTP-Kit获取响应时遇到了很多麻烦。当我使用HTTP-Kit网络服务器从我们的浏览器访问“ http://localhost:8080”时，它运行良好，并显示“ hello HTTP！”。

(defn app [req]
  {:ip "127.0.0.1"
   :status  200
   :headers {"Content-Type" "text/html"}
   :body    "hello HTTP!"})
(run-server app {:port 8080})

但是，当我尝试使用Post或Get对其同一服务器进行AJAX调用时，它不再起作用，而是显示为0。

我读到它可能与CORS的兼容性有关，但是我真的对如何配置它起作用感到茫然。

干杯

Answer 1

在服务器端代码的标头部分，我不得不放置允许跨域共享文件的地方。

:headers {"Content-Type" "text/html" "Access-Control-Allow-Origin" "http://localhost:8000"}

然后这允许我使用cljs-http和

来发出AJAX请求

(http/post "http://localhost:8080/" {:with-credentials? false})

允许AJAX请求。