关于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] 有没有高手能帮我解决下。。。
明天就得检查课程设计啦。。。 rs.open sql,conn,3,2
改成
rs.open sql,conn,[color=red]1,3[/color] 这样还是不行。。。
不知道为什么,理论上应该没问题啊????
还是改用SQL语句吧。。。还是得谢谢版主哈。。。。[tk11] 你是添加还是修改?
如果是修改,就把rs.addnew删除
如果是添加,就把where gname='"&request.form("providername")&"'删除 谢谢斑竹啊。。。
我现在搞定啦。。 [tk10]
页:
[1]
