看看下边代码

来源:百度知道 编辑:UC知道 时间:2024/07/07 11:15:50
第一个<input type="text" name="name" onload="this.value=window.opener.document.form1.name.value">
这句有问题,怎么改啊!!
第二个<%
dim AA
AA=request("value")
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq="&Server.MapPath("sjk.mdb")
Set rs = Server.CreateObject("ADODB.RecordSet")
sql = "select * from table1 where yname='"&AA&"'"
rs.open sql,conn,1,1
form1.QQ.value="&rs("yqq")&" 这句出的问题??
rs.Close
Set rs = Nothing
conn.Close
Set conn = Nothing
%>
意思就是让这个网页内的form1的文本框名为QQ的值为上边变量AA的值
我没积分了,希望高手们,指点一二,给我说说啊!!!!

<input type="text" name="name" onload="this.value=window.opener.document.form1.name.value">

改为
<input type="text" name="name" onload="this.value=document.form1.name.value">

第二个

<%
dim AA
AA=request("value")
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq="&Server.MapPath("sjk.mdb")
Set rs = Server.CreateObject("ADODB.RecordSet")
sql = "select * from table1 where yname='"&AA&"'"
rs.open sql,conn,1,1
form1.QQ.value="&rs("yqq")&" 这句出的问题??
rs.Close
Set rs = Nothing
conn.Close
Set conn = Nothing
%>

改为------------------------------

<%
dim AA,bb;
AA=request("value")
Set conn = Server.CreateObject("ADOD