Set rsUpdate=Server.CreateObject("ADODB.RecordSet")
sqlUpdate="select * from Posts Where PostID=74"
rsUpdate.open sqlUpdate,conn,1,3
rsUpdate.MoveFirst
rsUpdate("ReplyCount")=rsUpdate("ReplyCount")+1
rsUpdate("LastAnswerUser")="suif"
rsUpdate("LastAnswerTime")=now()
rsUpdate.Close
Set rsUpdate=Nothing

Set rsUpdate=Server.CreateObject("ADODB.RecordSet")
sqlUpdate="select * from Posts Where PostID=74"
rsUpdate.open sqlUpdate,conn,1,3
rsUpdate.MoveFirst
rsUpdate("ReplyCount")=rsUpdate("ReplyCount")+1
rsUpdate("LastAnswerUser")="suif"
rsUpdate("LastAnswerTime")=now()
rsupdate.update
rsUpdate.Close
Set rsUpdate=Nothing

好，谢谢　
还有一个问题
conn.execute("Update Posts Set LastAnswerTime=getdate() Where PostID=1")

我直接用这样的方式，为何老是改不掉LastAnswerTime里面的时间呢，
这段代码Update Posts Set LastAnswerTime=getdate() Where PostID=1
我在sql查询分析器里运行都是正常的。

conn.execute("Update Posts Set LastAnswerTime='"&getdate()&"' Where PostID=1")
这样试试

conn.execute("Update Posts Set ReplyCount=ReplyCount+1,LastAnswerUser='dasfa',LastAnswerTime='"&getdate()&"' Where PostID=1")

一个数据都改不了

conn.execute("Update Posts Set ReplyCount=ReplyCount+1,LastAnswerUser='dasfa',LastAnswerTime="&getdate()&" Where PostID=1")
这样就行了