代码有有关问题吗？如何会无法向数据库添加数据？

代码有问题吗？怎么会无法向数据库添加数据？！！！
数据库操作代码如下：

HTML code

<%dim htmldata,rs,sqlhtmlData = Request.Form("content1")if Request.QueryString("mark")="southidc" thenIf request.form("title")="" ThenResponse.Write("<script language=""JavaScript"">alert(""错误：您没输入标题，请返回检查！！"");history.go(-1);</script>")response.endend ifIf htmlData="" ThenResponse.Write("<script language=""JavaScript"">alert(""错误：您没输入内容，请返回检查！！"");history.go(-1);</script>")response.endend ifSet rs = Server.CreateObject("ADODB.Recordset")sql="select * from news"rs.open sql,conn,1,3rs.addnew rs("BigClassName")=trim(request.Form("BigClassName"))rs("SmallClassName")=trim(request.Form("SmallClassName"))rs("Title")=trim(request.Form("title"))rs("Content")=trim(htmlData)rs("User")=trim(request.Form("user"))rs("AddDate")=date()rs("showorder")=trim(request.Form("showorder"))rs.updaters.closeset rs=nothing'response.Write("<script language=javascript>location.href='News_Manage.asp';<//script>")end if%>

HTML code

<%StrSQL="DBQ="+server.mappath("db1.mdb")+";DRIVER={Microsoft Access Driver (*.mdb)};"'StrSQL="DSN=news;"set conn=server.createobject("ADODB.CONNECTION")conn.open StrSQL%>
[解决办法]
你有没有连接数据库的语句？错误代码是什么？
[解决办法]
既然有连接数据,看这情况没错，你写不进去，提示的什么呢
[解决办法]
具体错误提示是什么？