我希望在闪亮的应用中捕获iframe中的链接。我想知道点击了哪个链接。
外面有光泽,这很好用。我为相关问题添加了一个完全可重现的示例:
https://stackoverflow.com/a/46093537/3502164
(它必须在(本地)服务器上运行,例如xaamp
)。
我的尝试:
1)要保存在Path/To/App
。
2)在www
文件夹中存储应在iframe中显示的html文件。
fileWithLink.html
<html>
<body>
<a href="https://stackoverflow.com/">SOreadytohelp</a>
</body>
</html>
3)应用程序必须以runApp("Path/To/App", launch.browser = TRUE)
启动
(这样就启动了本地服务器。)
library(shiny)
library(shinyjs)
ui <- fluidPage(
useShinyjs(),
htmlOutput("filecontainer")
)
server <- function(input, output, session){
session$onFlushed(once = T, function(){
runjs("
console.log('I arrive here')
$('#filecontainer').load(function(){
console.log('But not here')
var iframe = $('#filecontainer').contents();
iframe.find('#a').click(function(){
alert('I want to arrive here');
});
});
")
})
output$filecontainer <- renderUI({
tags$iframe(src = "fileWithLink.html", height = 600, width = 1200)
})
}
shinyApp(ui, server)
答案 0 :(得分:5)
iframe包含在具有相关ID($('#filecontainer iframe')
)的div中。有一个拼写错误调用锚标签。我更改了目标以避免交叉脚本问题:
library(shiny)
library(shinyjs)
ui <- fluidPage(
useShinyjs(),
htmlOutput("filecontainer")
)
server <- function(input, output, session){
session$onFlushed(once = T, function(){
runjs("
console.log('I arrive here')
$('#filecontainer iframe').load(function(){
console.log('But not here')
var iframe = $('#filecontainer iframe').contents();
iframe.find('a').click(function(){
console.log('am i here')
alert('I want to arrive here');
});
});
")
})
output$filecontainer <- renderUI({
tags$iframe(src = "fileWithLink.html", height = 600, width = 1200)
})
}
shinyApp(ui, server)
fileWithLink.html
<html>
<body>
<a href="anotherpage.html">SOreadytohelp</a>
</body>
</html>
anotherpage.html
<html>
<body>
Another page
</body>
</html>