看看这个程序怎么回事（在线等……）

修改这一句：
sSQL1="insert into bmc_cet(xymc)  values('"+document.form1.select1[i].value+"')";
为：
sSQL1="insert into bmc_cet(xymc)  values('"+document.form1.select1[i].text+"')";

解决方案 »

  1.   

    try...<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"
    "http://www.w3.org/TR/html4/loose.dtd">
    <html>
    <head>
    <meta http-equiv="Content-Type" content="text/html; charset=gb2312">
    <title>无标题文档</title>
    </head>
    <body>
    <form name="form1" method="post" action="">
    <script>
      var rsXML=new ActiveXObject("ADODB.Recordset");
      var xDOM= new ActiveXObject("MSXML.DOMDocument");
      var sSQL,i=1;
      sConn= "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=d:\\bs.mdb";
      sSQL="select xymc from xsxx";
      rsXML.Open(sSQL, sConn);
      document.write("<select name=\"select1\" onchange='insert(this.options[this.options.selectedIndex].value)'>");
      while(!rsXML.eof)
      {
       document.write("<option>"+rsXML.fields(0).value+"</option>") ;
       rsXML.Movenext
       i++
      }
      document.write("</select></form>");
     function insert(s)
     {
      alert(s);
      var rsXML1=new ActiveXObject("ADODB.Recordset");
      var xDOM1= new ActiveXObject("MSXML.DOMDocument");
      var sSQL1
      sConn= "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=d:\\bs.mdb";
      sSQL1="insert into bmc_cet(xymc)  values('"+s+"')";
      rsXML1.Open(sSQL1, sConn);
    }
    </script> 
    </body>
    </html>