asp的表单怎么提交不到数据库?后台删除的操作也不行了?

来源:百度知道 编辑:UC知道 时间:2024/05/05 18:47:42
dim act
act=request.querystring("act")
select case act
case "ok"

if Request.ServerVariables("HTTP_X_FORWARDED_FOR")="" then
zhenip=Request.ServerVariables("REMOTE_ADDR")
else
zhenip=Request.ServerVariables("HTTP_X_FORWARDED_FOR")
end if
if request("name")="" then
name="游客"
else
name=trim(request("name"))
end if
if request("qq")="" then
qq="无"
else
qq=trim(request("qq"))
end if
if request("email")="" then
email="无"
else
email=trim(request("email"))
end if
set rs_y=server.CreateObject("adodb.recordset")
rs_y.open "select * from laos_ly",conn,1,3
rs_y.AddNew
rs_y("name")=name
rs_y("qq")=qq
rs_y("email")=email

如果程序没问题。
检查NTFS 格式权限

1,确认access是可写状态,有时病毒会改变属性,如果原来行,现在不行,很可能是这个原因.
2,确认是否正常连接数据库,没看到你的conn.asp和数据库,不知道错在哪