应当还是锁类型不对,你用
rs.open sql,conn,1,2  试试

解决方案 »

  1.   

    rs.open sql,conn,1,3
    锁类型不对
      

  2.   

    set rs1 = Server.CreateObject("ADODB.Recordset")
    rs1.ActiveConnection = MM_conn_STRING
    rs1.Source = "SELECT USERNAMENO, USERNAME, PASSWORD  FROM ZDWY.MEMBERRG  WHERE USERNAME = '"&Request("username")&"' AND PASSWORD='"&Request("password")&"'"
    rs1.CursorType = 0
    rs1.CursorLocation = 2
    rs1.LockType = 3
    rs1.Open()rs1.addnew array("TITLE","CONTENT","USERNAMENO","USERNAME","FORUMNO"),_
                 //array(title,content,rs2("USERNAMENO"),username,forumno)
     rs1.update()已通过测试,你可以参照例子
    还有问题请和我联系
      

  3.   

    set rs1 = Server.CreateObject("ADODB.Recordset")
    rs1.ActiveConnection = MM_conn_STRING
    rs1.Source = "SELECT USERNAMENO, USERNAME, PASSWORD  FROM ZDWY.MEMBERRG  WHERE USERNAME = '"&Request("username")&"' AND PASSWORD='"&Request("password")&"'"
    rs1.CursorType = 0
    rs1.CursorLocation = 2
    rs1.LockType = 3
    rs1.Open()rs1.addnew array("TITLE","CONTENT","USERNAMENO","USERNAME","FORUMNO"),_
     array(title,content,rs2("USERNAMENO"),username,forumno)
    rs1.update()修改后无问题
      

  4.   

    也可以用另一种方法:
    set cm1 = Server.CreateObject("ADODB.Command")
    cm1.ActiveConnection = MM_conn_STRING
    cm1.CommandType = 1
    cm1.CommandTimeout = 0
    cm1.Prepared = truecm1.CommandText="insert into ZDWY.MESSAGE (TITLE,CONTENT,USERNAMENO,USERNAME,FORUMNO)"&_
    "values ('"&title&"','"&content&"','"&rs1("USERNAMENO")&"','"&username&"','"&forumno&"')"
    cm1.Execute()
    set cm1.activeconnection=nothing
      

  5.   

    谢谢beckhambobo,照你的方法已解决问题.