Javascript 获取文件中的响应头变量
My apache将LDAP登录传递到标头中的变量X-Remote-User:Javascript 获取文件中的响应头变量,javascript,apache,ldap,shiny,shiny-server,Javascript,Apache,Ldap,Shiny,Shiny Server,My apache将LDAP登录传递到标头中的变量X-Remote-User: 但我不知道如何在闪亮的应用程序中获得它。有什么想法吗?也许解决方案可以是一些java脚本?好的,我解决了。首先在ui.Rjs函数中包括: function requestLogin() { var client = new XMLHttpRequest(); client.open("GET", "yourshinyhostname", true); client.send(); client.onreadysta
但我不知道如何在闪亮的应用程序中获得它。有什么想法吗?也许解决方案可以是一些java脚本?好的,我解决了。首先在
ui.R
js函数中包括:
function requestLogin() {
var client = new XMLHttpRequest();
client.open("GET", "yourshinyhostname", true);
client.send();
client.onreadystatechange = function() {
var resposne = client.getResponseHeader("X-Remote-User");
Shiny.onInputChange("getLogin", resposne);
}; }
然后,您可以通过单击按钮获得X-Remote-User值:
ui.R
:
includeScript("www/js/getLogin.js"),
uiOutput("login_btn"),
verbatimTextOutput("text")
server.R
:
output$login_btn <- renderUI({
HREF <- sprintf('
<button id="get_login_btn" value="test" onclick="requestLogin();" >
<font color="black">
<i class="fa fa-user"></i> Get login
</font>
</button>
')
HTML(HREF)
})
jsOutput <- reactive({
input$getLogin
})
output$text <- renderPrint({
jsOutput()
})
output$login\u btn在server.R中添加对js函数的调用。这将在不单击按钮的情况下获取标题。例如:
output$text <- renderPrint({
js$requestLogin()
jsOutput()
})
output$text有没有一种方法可以做同样的事情,但不需要用户点击?@wdkrnls您可以尝试类似的方法,但我不确定它是否有效。谢谢,但目前为止运气不好。我甚至尝试添加一个闪亮的.setInputValue(“getUsername”,响应);没有成功。