大家帮帮忙啊~~为什么我象数据库插入不进数据啊~!!
代码如下:
<%
dim Action,bx_name,bx_title,bx_img,rs,FoundErr,ErrMsg
Action=trim(Request( "Action "))
bx_name=trim(Request( "bx_name "))
bx_title=trim(Request( "bx_title "))
bx_img=trim(Request( "bx_img "))
if Action= "Add " then
if bx_name= " " then
FoundErr=True
ErrMsg=ErrMsg & " <br> <li> 产品大类名不能为空! </li> "
end if
if FoundErr <> True then
Set rs=Server.CreateObject( "Adodb.RecordSet ")
rs.open "Select * From bx_bc Where bx_name= ' " & bx_name & " ' ",conn,1,3
if not (rs.bof and rs.EOF) then
FoundErr=True
ErrMsg=ErrMsg & " <br> <li> 产品大类“ " & bx_name & "”已经存在! </li> "
else
rs( "bx_name ")=trim(Request( "bx_name "))
rs( "bx_title ")=trim(Request( "bx_title "))
rs( "bx_img ")=trim(Request( "bx_img "))
rs.update
rs.Close
set rs=Nothing
call CloseConn()
Response.Redirect "bx_Manage.asp "
end if
end if
end if
if FoundErr=True then
call WriteErrMsg()
else
%>
为什么我象数据库插如不进去啊~~我是象表必须bx_bc插如bx_name,bx_title,bx_img的数值为什么我写不进去拉~~而且还没有什么提示:知道的朋友告诉我一下 在线等着回复谢谢!!!
------解决方案--------------------因为你是插入新记录而不是修改记录
在 else 后加入
rs.addnew
即可!