动网的论坛保存帖子上有这样一段：

    sub saveAnnounce()
DateTimeStr=CSTR(NOW()+TIMEADJUST/24)
dim cmdTemp
    dim InsertCursor
dim dataconn
Set DataConn = Server.CreateObject("ADODB.Connection")
dataconn.open connstr
Set cmdTemp = Server.CreateObject("ADODB.Command")
    Set InsertCursor = Server.CreateObject("ADODB.Recordset")
cmdTemp.CommandText="SELECT * FROM bbs1 WHERE (UserName IS NULL)"
cmdTemp.CommandType = 1
Set cmdTemp.ActiveConnection = dataconn
         InsertCursor.Open cmdTemp, , 1, 3
         InsertCursor.AddNew
        InsertCursor("BoardID")=boardID
         InsertCursor("ParentID")=0
    InsertCursor("Child")=0
         InsertCursor("UserName")=UserName
         InsertCursor("Topic")=Topic
         InsertCursor("Body")=Body
         InsertCursor("DateAndTime")=DateTimeStr
         InsertCursor("hits")=0
         InsertCursor("length")=strlength(body)
         InsertCursor("rootID")=0
         InsertCursor("layer")=1
         InsertCursor("orders")=0
    InsertCursor("ip")=ip
    InsertCursor("Expression")=Expression
    InsertCursor("locktopic")=0
    InsertCursor("istop")=0
    InsertCursor("signflag")=signflag
    InsertCursor("emailflag")=mailflag
         InsertCursor.Update
     InsertCursor.MoveLast
    announceid=InsertCursor("AnnounceID")
    InsertCursor("RootID")= announceid
         InsertCursor("Times")= announceid
         InsertCursor.Update
         InsertCursor.close

不知道是不是SQL不支持 movelast 还是怎么的，就在这句话里报错，因为他的rootid和times要数据添加以后再读 announceid（自动编号）的值附给rootid、times的，我在第一个update后重建了记录集，从数据库中读出最新的记录的announceid的值传给rootid和times，然后update这两个值，系统就不报错了，但是有时候，能得到这两个值，有时候，却不能，我该怎么做？烦头儿们指教。