本帖最后由 aqiang566971 于 2013-05-27 11:53:20 编辑

解决方案 »

  1.   

    问题就在你的获取的那些数据能不能先组合成一个结果集,如果可以,那么:
    insert into tb(xxxx)
    select xxxx
    from 结果集
      

  2.   


    在网上看到一个方法但是没看太懂'申明变量 
    Dim valName 
    Dim arrName 
    Dim objConn 
    Dim connStr '取得值 
    valName = Cstr(Request.Form("myName")) 
    '插入数据库 
    arrName = split(valName,",") 
    arrPassword = split(valPassword,",") 
    '执行插入数据库的过程 
    For i = 0 to Ubound(arrName) 
    '请自行更改SQL语句 
    objConn.execute("insert into mytable(sname) values('"&Trim(arrName(i))&"')") 
    Next 
    Response.write("数据插入成功") 
      

  3.   

    这拼接SQL..还不如在程序里写好一个对象 统一传呢