在客户端的JAVASCRIPT中如何给服务器端的VBSCRIPT传参数？

[mzqzwh]

<script language = javascript>
function ChangeData()
{
var strDm;
strDm=document.form1.dm.value;
<%
dim rsData
dim strCommand
dim strDm

strCommand="select bb,cc from a" 在这我需要把前边的strDm传给它
set rsData=myConn.execute(strCommand)

%>
for (j = document.form1.Data.length;j>=0;j--)
document.frmFrxxcx.Data.remove(j);
<%
rsData.MoveFirst
while not rsData.eof
%>
document.form1.Data.options[document.form1.Data.length] = new Option("<% =rsData("aa") %>", "<% =rsData("bb") %>");
<%
rsData.moveNext
wend
%>
}
</script>

[mzqzwh]

难道没有人会吗？

[xuya]

<%
response.write "<script language = javascript>"
response.write "function ChangeData()"
response.write "{"
response.write "var strDm;"
response.write "strDm=document.form1.dm.value;"
%>
<%
dim rsData
dim strCommand
dim strDm

strCommand="select bb,cc from a" 在这我需要把前边的strDm传给它
set rsData=myConn.execute(strCommand)

%>
<%
response.write "for (j = document.form1.Data.length;j>=0;j--) "
document.frmFrxxcx.Data.remove(j);%>
<%
rsData.MoveFirst
while not rsData.eof
%>
<%
response.write "document.form1.Data.options[document.form1.Data.length] = new Option(""&rsData("aa")&"", ""&rsData("bb")&"");"
%>
<%
rsData.moveNext
wend
%>
}
response.write "</script>"

[xuya]

sorry!
最后二行应该为：
<%
response.write "}"
response.write "</script>"
%>

[mzqzwh]

我试了不行

[jzywh]

不要把客户端和服务器段混在一起

[jzywh]

用XMLhttp实施

或RemmoteScrpting

[mzqzwh]

能否给个例子

[binbinp]

如果参数不是很多的话，可以运用隐藏表单，在页面提交时，用JavaScript函数赋值给这些隐藏表单（value），然后在服务器端像其他普通表单元素一样读值就可以了。
隐藏表单为<type=hidden name=..... value=......>

[超级大笨狼]

提交
服务器端脚本先于客户端脚本执行，你放在中间他也是先执行的。

[adonis2222]

不行，跟本就传不了

[gga7959]

试试用控件来中转吧。。

[nchen123]

用 xmlhttp 是最好的方法，何必想的如此复杂。
服务器端写一个接口， 客户端 javascript 调用他就是了。