我的asp代码为什么没办法提交到数据库 求大神指点 谢谢各位了!!! <% if request.

我的asp代码为什么没办法提交到数据库求大神指点谢谢各位了!!!<%ifrequest.form("pwd")<>request.form("pwd1")thenresp... 我的asp代码为什么没办法提交到数据库 求大神指点 谢谢各位了!!!
<%
if request.form("pwd")<>request.form("pwd1") then
response.write("<p align='center'>您输入的密码不一致,请重新输入!</p>")
elseif request.form("yhm")<>"" and request.form("pwd")<>"" and request.form("pwd1")<>"" then
dim conn,strconn
set conn=server.createobject("adodb.connection")
strconn="provider=microsoft.jet.oledb.4.0;data source="&server.mappath("shujuku.mdb")
conn.open strconn
dim rs,sql
sql=("select * from kehubiao where khnc='"&request.form("yhm")&"'")
set rs=conn.execute(sql)
if rs.eof then
rs.addnew
rs.("khnc")= request.form("yhm")
rs.("pwd")= request.form("pwd")
rs.("zcsj")= now()
rs.update
session("name")= request.form("yhm")
session("mima")= request.form("pwd")
response.redirect("xskhxx.asp")
else
response.write("<p align='center'>用户名已存在,请重新输入!")
end if
rs.close
set rs=nothing
conn.close
set conn=nothing
end if
%>
展开
 我来答
编程知识分享家
2013-06-13 · 编程、数据库入门。计算机技巧、心得分享。
编程知识分享家
采纳数:404 获赞数:924

向TA提问 私信TA
展开全部
<%
If request.Form("pwd")<>request.Form("pwd1") Then
response.Write("<p align='center'>您输入的密码不一致,请重新输入!</p>")
ElseIf request.Form("yhm")<>"" And request.Form("pwd")<>"" And request.Form("pwd1")<>"" Then
    Dim conn, strconn
 set conn = server.CreateObject("adodb.connection")
 conn = "provider=microsoft.jet.oledb.4.0;data source="&server.mappath("bbsftplogdb.mdb")
 set rs=server.createobject("adodb.recordset")
    sql = ("select * from kehubiao where khnc='"&request.Form("yhm")&"'")
    rs.open sql,conn,1,3  '错误点1,建议以这种格式打开数据库,格式清楚。
    If rs.EOF Then
        rs.addnew
        rs("khnc") = request.Form("yhm") '错误点2
        rs("pwd") = request.Form("pwd")
        rs("zcsj") = Now()
        rs.update
        session("name") = request.Form("yhm")
        session("mima") = request.Form("pwd")
        response.redirect("xskhxx.asp")
    Else
        response.Write("<p align='center'>用户名已存在,请重新输入!")
    End If
    rs.Close
    Set rs = Nothing
    conn.closes
    et conn = Nothing
End If
%>

在线交流,错误点已经注释。

更多追问追答
追问
能够详细解释一下错误点2吗?   和我的有什么不同呢
追答
你的方式只能默认是读操作,不能写。所以错误点1就有了。
字段的引用方式没有点。所以错误点2就有了。
会cry的鱼
2013-06-12 · TA获得超过259个赞
知道小有建树答主
回答量:422
采纳率:0%
帮助的人:186万
展开全部
你这个貌似没有与数据库连接起来呀,怎么可能提交的上去
strconn="provider=microsoft.jet.oledb.4.0;data source="&server.mappath("shujuku.mdb")这个是表示你与数据库连接的么?
因为你的命名我都不知道是什么意思,所以不知道你代码有没有写错
更多追问追答
追问
可这个是我复制粘贴的应该不会错  而切我在其他的代码里就完全能够读取数据库的文件
追答
那我就不清楚了,我每次做的时候不用你这样的语句,一般我跟数据库连接用这个
private static string connstr = @"Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=user;Data Source=.";在此之前就用操作来测试一下是否连接成功
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式