为什么SQL与ASP编程 rs.addnew 加不进数据到数据库

'添加
Public Sub SendNews()
On Error Resume Next
Dim CanNext
CanNext = True
'检查该版块是否设置开放
If LCase(NewsOption) <> "open" Then
CanNext = False
TkMsg "对不起，该版块已设置为关闭状态，若要开放，请联系管理员！", ""
End If
Dim Title, EnTitle, Content, EnContent, SqlStr, Sql, Rs, rStr, SpSqlStr, SpRstr, ri,zn
Title = Trim(Request.Form("Title"))
zn = Trim(Request.Form("zn"))
Content = Replace(Trim(Request.Form("Content")), "../UpLoadFile/", "UpLoadFile/")

Sql = "select * from [News]"
Set Rs = Server.CreateObject("adodb.recordset")
Rs.Open Sql, Conn, 1, 3
Rs.Addnew
Rs("Title") = Title
Rs("Content") = Content
Rs("zn") = zn
Rs("AddDate") =date()
Rs.Update
Rs.Close
Set Rs = Nothing
TkMsg &q

asp编程遇到麻烦.rs SQl asp 编程 asp 与sql 接结 asp与sql ASP与SQL数据库 asp与sql问题 ASP与SQL 请问rs-232串口编程与rs-485编程有何区别？ 关于asp编程中sql的入侵 权限问题(ASP+SQL网络编程)