编程论坛's Archiver

hokylove 发表于 2008-6-13 21:10

关于recordset写入数据库(我写不进去)

<%
if Request.ServerVariables("REQUEST_METHOD")="POST" then
if request.form("providername")<>"" then
sql="select * from gongying where gname='"&request.form("providername")&"'"
rs.open sql,conn,3,2
if rs.eof then
  rs.addnew
  rs("gname")=request.form("providername")
  rs("memo")=request.form("memo")
  rs.update
  response.write "<p align=center>添加成功,请<a href='viewgong.asp'>返回</a><br><br>"
else
  response.write "<p align=center>该供应商已存在,请<a href='addgong.asp'>重新输入</a><br><br>"
end if
rs.close
else
   response.write "<p align=center>请<a href='addgong.asp'>输入供应商名称</a><br><br>"
end if
else
%>


我的conn.asp文件
<%
   dim conn,str  
   on error resume next
   str="PROVIDER=SQLOLEDB;DATA SOURCE=127.0.0.1;UID=sa;PWD=123;DATABASE=kucun"
   set conn=server.createobject("ADODB.CONNECTION")
   Set rs = Server.CreateObject("ADODB.Recordset")
   Set rs2 = Server.CreateObject("ADODB.Recordset")
   Set rs3 = Server.CreateObject("ADODB.Recordset")
   if err then
      err.clear
          response.Write("数据库连接错误!")
   else
        conn.open str
        if err then
           err.clear
                   response.Write("数据库打开错误!")
        end if
   end if
%>


大家帮帮我啊。。。急需。。。

我问了老师,老师居然不能解决。。。[tk01]

hokylove 发表于 2008-6-13 21:27

有没有高手能帮我解决下。。。

明天就得检查课程设计啦。。。

hmhz 发表于 2008-6-14 08:13

rs.open sql,conn,3,2
改成
rs.open sql,conn,[color=red]1,3[/color]

hokylove 发表于 2008-6-14 10:28

这样还是不行。。。
不知道为什么,理论上应该没问题啊????

还是改用SQL语句吧。。。还是得谢谢版主哈。。。。[tk11]

hmhz 发表于 2008-6-14 13:36

你是添加还是修改?
如果是修改,就把rs.addnew删除
如果是添加,就把where gname='"&request.form("providername")&"'删除

hokylove 发表于 2008-6-16 18:41

谢谢斑竹啊。。。

我现在搞定啦。。

wangmeng6313 发表于 2008-6-17 17:43

[tk10]

页: [1]

Powered by Discuz! Archiver 6.1.0  © 2001-2007 Comsenz Inc.