Question

问题 - Re：带有HTML的R brew包（使用Rook）

使用表单检索查询时，通常在屏幕刷新时，用户的预选选项在表单中保持选中状态。例如，如果有一个名字字段，我输入John，...输入其他表格数据，点击提交，当页面刷新时，表格仍会显示＆＃34; John＆＃34;在名称字段中而不是空框。

我可以使用像

这样的东西在文本类型输入字段中预填充条目

    ...
    <input class="someclass" type="text" name="Name" value="<%=Name%>" />
    ... (other form data)

当用户点击提交并且页面刷新时，R会使用＆lt;％= Name％＆gt;

中的值预填充名称字段

使用下拉菜单时，我很难复制相同的内容。我们的想法是，当页面刷新时，用户在上一个查询中选择的选项将处于活动状态。

    <select class="someclass" name="group3" style="width:200px;">
    <option value="," selected>None</option>
    <option value="Name,">Name)</option>
    <option value="Phone">Phone</option>
    </select>

我认为一种方法可能是输入类似的内容，

对于各行中的每个选项，

<%if (group3=="Name"){ print("selected") } ...等，但这有点麻烦。请你分享一下你的想法，

Answer 1

最终使用jQuery工作了。标签内的＆lt;％= if（..）print（“selected”）...无效。

添加id = something标签以选择 -

<select class="someclass" name="group3" id="myselect" style="width:200px;">
<option value=",">None</option>
<option value="Name">Name)</option>
<option value="Phone">Phone</option>
</select>

将jquery.js添加到标题中的html文件 -

<script src="http://ajax.googleapis.com/ajax/libs/jquery/1.5/jquery.min.js"></script>

在我的Rook brew文件中，我有类似的东西，

forminput <- req$GET()
userselection <- forminput$group3 #group3 is the class name for the select statement

并在HTML文档中，在结束表单标记之前，输入以下内容 -

<script>
$("#myselect").val("<%=userselection%>").attr("selected", "selected");
</script>

R brew选择声明

1 个答案: