28,391
社区成员
发帖
与我相关
我的任务
分享怎样用RESPONSE.WRITE输出文本框值？
例如：Response.Write "+radio.clbz.value"
可是我这样写的不管用阿
可是我这样写的不管用阿
...全文
请发表友善的回复…
发表回复
aocool 2002-05-08
- 打赏
- 举报
乱，看不懂！
把你的代码先精简一下吧。
有事找我。QQ：20552480
把你的代码先精简一下吧。
有事找我。QQ：20552480
ybcheng 2002-05-08
- 打赏
- 举报
不管用吗？
这是我的源程序：
<%
set conn=server.CreateObject ("adodb.connection")
set rs=server.CreateObject ("adodb.recordset")
usercode=Request.Cookies ("usercode")
gwdm=Request.Cookies ("gwdm")
dm=Request.Cookies ("dm")
conn.Open "LCWZDB","cpu","3397261"
if trim(dm)<>"0001" then
str="select a.dzywmc,a.dzywbh from "+dm+"wz@dzywlx a, "+dm+"wz@ywlzgw b where a.dzywbh=b.dzywbh and b.gwbh='"+gwdm+"'"
else
str="select a.dzywmc,a.dzywbh from wz@dzywlx a , wz@ywlzgw b where a.dzywbh=b.dzywbh and b.gwbh='"+gwdm+"'"
end if
rs.Open str,conn,1,3
Response.Write ("<SCRIPT LANGUAGE=javascript>")
Response.Write("function radio2_onclick(){")
Response.Write("radio.radio1.checked=false;radio.clbz.value=0;")
Response.Write(" }")
Response.Write("function radio1_onclick(){")
Response.Write("radio.radio2.checked=false;radio.clbz.value=1;}")
Response.Write ("function direct(){")
Response.Write ("location.href='DjList.asp?dzywbh=")
Response.Write rs.Fields ("dzywbh")
Response.Write ("&clbz='")
Response.Write Request("radio.clbz.value")
Response.Write("}</SCRIPT>")
Response.Write (Request.Cookies ("username")+"你现在的位置：<p>--------<br> 业务处理中心</br></p>")
Response.Write ("<form name=radio action='YwLxList.asp'><INPUT type=radio id=radio1 name=unfinish checked=true onclick=javascript:radio1_onclick()>未处理")
Response.Write ("<INPUT type=radio id=radio2 name=finish onclick=javascript:radio2_onclick()>已处理")
Response.Write ("<input type=hidden name=clbz>")
do while not rs.EOF
Response.Write ("<p><a href=javascript:direct() target='main'>")
Response.Write rs.Fields ("dzywmc")+("</p></a>")
rs.MoveNext
loop
Response.Write ("</form>")
Response.Write "<head>"
Response.Write "<base target='main'>"
Response.Write "</head>"
%>
这是我的源程序：
<%
set conn=server.CreateObject ("adodb.connection")
set rs=server.CreateObject ("adodb.recordset")
usercode=Request.Cookies ("usercode")
gwdm=Request.Cookies ("gwdm")
dm=Request.Cookies ("dm")
conn.Open "LCWZDB","cpu","3397261"
if trim(dm)<>"0001" then
str="select a.dzywmc,a.dzywbh from "+dm+"wz@dzywlx a, "+dm+"wz@ywlzgw b where a.dzywbh=b.dzywbh and b.gwbh='"+gwdm+"'"
else
str="select a.dzywmc,a.dzywbh from wz@dzywlx a , wz@ywlzgw b where a.dzywbh=b.dzywbh and b.gwbh='"+gwdm+"'"
end if
rs.Open str,conn,1,3
Response.Write ("<SCRIPT LANGUAGE=javascript>")
Response.Write("function radio2_onclick(){")
Response.Write("radio.radio1.checked=false;radio.clbz.value=0;")
Response.Write(" }")
Response.Write("function radio1_onclick(){")
Response.Write("radio.radio2.checked=false;radio.clbz.value=1;}")
Response.Write ("function direct(){")
Response.Write ("location.href='DjList.asp?dzywbh=")
Response.Write rs.Fields ("dzywbh")
Response.Write ("&clbz='")
Response.Write Request("radio.clbz.value")
Response.Write("}</SCRIPT>")
Response.Write (Request.Cookies ("username")+"你现在的位置：<p>--------<br> 业务处理中心</br></p>")
Response.Write ("<form name=radio action='YwLxList.asp'><INPUT type=radio id=radio1 name=unfinish checked=true onclick=javascript:radio1_onclick()>未处理")
Response.Write ("<INPUT type=radio id=radio2 name=finish onclick=javascript:radio2_onclick()>已处理")
Response.Write ("<input type=hidden name=clbz>")
do while not rs.EOF
Response.Write ("<p><a href=javascript:direct() target='main'>")
Response.Write rs.Fields ("dzywmc")+("</p></a>")
rs.MoveNext
loop
Response.Write ("</form>")
Response.Write "<head>"
Response.Write "<base target='main'>"
Response.Write "</head>"
%>
ChinaOk 2002-05-08
- 打赏
- 举报
Response.Write Request("RadioName")
