为什么这个代码在修改表单数据提交后不能，数据库的内容不改变？

<%
   dim mysql
       all_uid=Request.Form("uid")
       all_password= Request.Form("password")
       all_repassword=Request.Form("repassword")
       all_province=Request.Form ("province")
       all_city=Request.Form("city")
       all_name=Request.Form("name")
       all_kind=Request.Form("kind")
       all_hizhaohm=Request.Form("zhizhaohm")
       all_tel=Request.Form("tel")
       all_fax=Request.Form ("fax")
       all_www=Request.Form ("www")
       all_email=Request.Form ("email")
       all_address=Request.Form("address")
       all_inkman=Request.Form("linkman")
       all_zc=Request.Form ("zc")
       all_createtime=Request.Form ("createtime")
       all_khh=Request.Form("khh")
       all_khmc=Request.Form ("khmc")
        all_zh=Request.Form ("zh")
       all_introduce=Request.Form ("introduce")

    set conn=server.CreateObject("adodb.connection")
      conn.Open"dsn=guanggao;uid=yh;pwd=yh"
      mysql= "update allmessage set password='"&all_password&"',repassword='"&all_repassword&"',province='"&all_province&"',city='"&all_city&"',name='"&all_name&"',kind='"&all_kind&"',zhizhaohm='"&all_zhizhaohm&"',tel='"&all_tel&"',fax='"&all_fax&"',www='"&all_www&"', email='"&all_email&"',address='"&aLL_address&"',linkman='"&all_linkman&"', zc='"&all_zc&"',createtime='"&all_createtime&"',khh='"&all_khh&"',khmc='"&all_khmc&"',zh='"&all_zh&"',introduce='"&all_introduce&"' where uid='"&all_uid&"'"
      set rs=conn.Execute(mysql)
      Response.Write "修改成功"
%>
<%
conn.Close
set conn=nothing
%>

45 个解决方案

#1

先测试以下你从上页获得的值有没有，如果有看看你的表名是不是你想该记录的表名！我估计你的表名有问题！

#2

To kuzi(苦子)　
我的上一页可以重数据库里面获得值，就是不能改变

上一页可以重数据库里面获得值
<%
   dim mysql
    all_uid=Request.Form("uid")
     set conn=server.CreateObject("adodb.connection")
      conn.Open"dsn=guanggao;uid=yh;pwd=yh"
      mysql="select uid,password,repassword,province,city,name,kind,zhizhaohm,tel,fax,www,email,address,linkman,zc,createtime,khh,khmc,zh,introduce from  allmessage  "
     set rs=conn.Execute(mysql)
%>
  <tr>
                <td width="29%" height="46" bgcolor="#F0F0F0">
                  <p align="right">用户名：
                </td>
                <td width="68%" height="46">
                  <div align="center">
                    <%=rs("uid")%>
                  </div>
              <tr>
                <td width="29%" height="46" bgcolor="#F0F0F0">
                  <p align="right">密码修改：
                </td>
                <td width="68%" height="46">
                  <div align="center">
                    <input type="text" name="password" size="20" maxlength="50" class="form" value="<%=rs("password")%>">
                  </div>
                <td width="3%" height="46">
                  <div align="center"> </div>
                </td>
              </tr>
              <tr>
                <td width="29%" height="46" bgcolor="#F0F0F0">
                  <p align="right">确认密码：
                </td>
                <td width="68%" height="46">
                  <div align="center">
                    <input type="text" name="repassword" size="20" maxlength="30" class="form" value="<%=rs("repassword")%>">
                  </div>
                <td width="3%" height="46">
                  <div align="center"> </div>
                </td>
              </tr>
              <tr>
                <td width="29%" height="46" bgcolor="#F0F0F0">
                  <p align="right">省   份：
                </td>
                <td width="68%" height="46">
                  <div align="center">
                    <input type="text" name="province" size="10" maxlength="6" class="form" value="<%=rs("province")%>">
                  </div>
                <td width="3%" height="46">
                  <div align="center"></div>
                </td>
              </tr>
              <tr>
                <td width="29%" height="46" bgcolor="#F0F0F0">
                  <p align="right">城   市：
                </td>
                <td width="68%" height="46">
                  <div align="center">
                    <input type="text" name="city" size="20" maxlength="30" class="form" value="<%=rs("city")%>">
                  </div>
                <td width="3%" height="46">
                  <div align="center"> </div>
                </td>
              </tr>

#3

我想是你的第一段代码中的MYSQL语句有问题，你好象没有注意到数字和非数字的变量的如何应用问题

#4

to ：　goldworld(小虾)　
你好象没有注意到数字和非数字的变量的如何应用问题 ???
我有点不明白

#5

你在存盘的时候数据库有报错信息吗？？你存盘的字段里有没有是数字型的和非数字型的？

#6

to goldworld(小虾)
数据库没有显示错误，执行完程序后，就是“修改成功"这个我测试的结果，
到数据库里面看，数据字段全部都没有改变，
我存盘的字段里有一个id字段是int型的，但是他是不要被修改的

　

#7

有可能set rs=conn.Execute(mysql)这句话有问题,去掉set就可以了
或者是"
mysql= "update allmessage set password='"&all_password&"',repassword='"&all_repassword&"',province='"&all_province&"',city='"&all_city&"',name='"&all_name&"',kind='"&all_kind&"',zhizhaohm='"&all_zhizhaohm&"',tel='"&all_tel&"',fax='"&all_fax&"',www='"&all_www&"', email='"&all_email&"',address='"&aLL_address&"',linkman='"&all_linkman&"', zc='"&all_zc&"',createtime='"&all_createtime&"',khh='"&all_khh&"',khmc='"&all_khmc&"',zh='"&all_zh&"',introduce='"&all_introduce&"这句话的问题,注意数字和非数字的变量如何区分使用

#8

to ：　ljmok202(ljmok202)　
能举个例子吗？小弟不才

#9

<%@ Language=VBScript %>

<%
dim rsCust
set rsCust=server.CreateObject ("adodb.recordset")
set rsCust.ActiveConnection =oConn
rsCust.Source ="select * from customer where CustomerName='"&session("username")&"';"
rsCust.Open
if not rsCust.EOF then %>
<html><head>
<title>会员升级</title>
<link rel="stylesheet" href="ccisn.css">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
</head>
<body>

<p align=center >会员信息修改</p>
<form action="upself.asp" method=post id=form0 name=form0>
<table align="center" cellPadding="0" cellSpacing="0"
width="85%" border="1" bordercolor="#FFCC00" bordercolorlight="#006666">
<tr><td>
姓名：<input  name=truename value="<%=rsCust.Fields ("TrueName")%>"></td>
<td><% if session("username")="webmaster" then %>
<input type=hidden name=customername value=<%=rsCust.Fields ("CustomerName")%>>
<% else %>
注册名：<input  name=customername value=<%=rsCust.Fields ("CustomerName")%>>
<%end if
%></td></tr><tr><td>
密码：<input  name=password value="<%=rsCust.Fields ("Password")%>"></td><td>
电话号码：<input  name=phoneno value="<%=rsCust.Fields ("PhoneNo")%>"></td></tr>
<tr><td>所在地区：<input  name=area value="<%=rsCust.Fields ("RegionID")%>"></td><td>
邮政编码：<input  name=zipcode value="<%=rsCust.Fields ("ZipCode")%>"></td></tr><tr><td>
E-Mail：<input name=email value="<%=rsCust.Fields ("EMail")%>"></td><td>
传真号码：<input  name=faxno value="<%=rsCust.Fields ("FaxNo")%>"></td></tr><tr><td>
单位名称：<input name=address value="<%=rsCust.Fields ("Address")%>"></td><td>
联系地址：<input  name=sendaddress value="<%=rsCust.Fields ("SendAddress")%>"></td></tr>
<tr><td> </td><td>
<input type=submit value=更改  id=submit1 name=submit1></td></tr>
</td></tr></table>
</form>

</body></html>
<%end if
%>

#10

这么长的语句，估计应该是哪里提交错误了，一步步逐个慢慢进行判断吧

#11

http://www.yescnet.com
------------------------
http://www.yescnet.com
http://user.7host.com/yescnet
http://perso.kilio.com/yescnet
http://home.domaindlx.com/yescnet
http://yyycnet.phidji.com
http://yescnet8.tf2hq.com
http://www.yescnet.net
http://www.websamba.com/yescnet
http://www.cnetpower.net
http://user.7host.com/cnetyes江湖
http://6y.wo.to六爷(湖涂)
http://7y.wo.to七爷(湖涂)
http://8y.wo.to八爷(湖涂)
http://9y.wo.to九爷(湖涂)
------------------------
不去看？好东东你没缘份，我还有什么好说的？！
------------------------------------------------
http://www.yescnet.com

#12

不要加on error resume next语句就有错误信息

#13

#14

问题很奇怪，你可以先update一个字段看看操作能不能成功，关于set rs那个东东，是没有问题的。如果不能是不是你的数据库没有给你权限更新！where条件改称id=all_uid或者把all_uid转换成数字型的再id=all_uid数字型字段好像不用加''

#15

to playmud(*教导我们：知识青年要到北京去！)　
我在数据库下面用命令updata了一下，可以改变数据字段的内容
where条件改称id=all_uid，因为uid字段数据类型是一个nvarchar(20)

#16

我建议你先不要把所有的字段都写上去，你先写一个试试，如果能够成功，你再试试你的语句就知道哪里错了！！！

#17

将你生成后的SQL语句输出，然后拿到SQL SERVER里执行一下就知道问题所在了！

#18

按haichuang()的做法，把sql语句response.write出来，到sql server里面运行一下！
这样可以使问题细化，然后再判断那里出问题了就好说了！

#19

1。很久没有写asp了，我记得，用set rs=cnn.execute(sqlstring)是得不到记录集的，不知道对不对
2。应该是这里有问题吧

mysql= "update allmessage set password='"&all_password&"',.... where uid='"&all_uid&"'"

uid是int型的，但是你把他作为string了，所以在数据库中根本没有找到这条记录，就不会改变了,应该是：
mysql= "update allmessage set password='"&all_password&"',.... where uid="&all_uid

#20

to  ：　haichuang(不戒和尚)　 playmud(*教导我们：知识青年要到北京去！)　
我这样到数据库里面运行，没的语法错误的
updata  allmessage set password='password',repassword='repassword'.....where
  uid='uid'
没任何的错误！
to  fangoxyz(不想玩了)　
set rs=cnn.execute(sqlstring)这个会自动生成一个 recordset的记录集，并且保存在rs中
  uid字段是字段数据类型是一个nvarchar(20)

#21

我看了好像是没错，你把

set rs=conn.Execute(mysql)
换为
conn.Execute(mysql)

试试。

#22

打错了，你把

set rs=conn.Execute(mysql)
换为
conn.Execute mysql

试试。

#23

to　xialei001(我是汇编我怕谁)
　

set rs=conn.Execute(mysql)
换为
conn.Execute mysql

错误为：

Microsoft OLE DB Provider for ODBC Drivers 错误 '80040e0c'

没有为命令对象设置命令

/kill/hzxgtj.asp, 行22

#24

那你的mysql串有问题，
换为

mysql= "update allmessage set password='"&all_password&"'
再试

#25

你是说你把response.write sql输出的内容，拷贝下来在sql server里面可以执行？

#26

to playmud(*教导我们：知识青年要到北京去！)　
我这样到数据库里面运行，没的语法错误的
updata allmessage set password='password',repassword='repassword'.....where
uid='uid'
因为里面的数据全是nvarchar(20) 和char型的， uid字段数据类型是一个nvarchar(20)

#27

在查询器中有没有改变记录集

#28

uid为什么要做成nvarchar(20),它不是一个唯一性标识吗？我一般都是写成int,建唯一性索引

#29

to fangoxyz(小虫)　
因为我有一个id字段是关键字，所以uid字段就不行了，因为注册之后uid字段也是不能改变的

#30

会不会是conn的问题？

conn.CursorLocation = adUseClient

conn.Open"dsn=guanggao;uid=yh;pwd=yh" 中没有加空格
conn.Open "dsn=guanggao;uid=yh;pwd=yh"

asp中有没有加on error resume next 所以没有报错

#31

fangoxyz(小虫)　

我的asp中没有加on error resume next
代码全部在上面

#32

to fangoxyz(小虫)　

谢谢你呀，我一定会跟你加分的，今天我们的数据库的那台机器关了，我现在不能调试了
明天我在调试！
好伤脑筋！~

#33

http://www.yescnet.com
http://user.7host.com/yescnet
http://perso.kilio.com/yescnet
http://home.domaindlx.com/yescnet
http://yyycnet.phidji.com
http://yescnet8.tf2hq.com
http://www.yescnet.net
http://www.websamba.com/yescnet
http://www.cnetpower.net
http://user.7host.com/cnetyes江湖
__________________

国外空间中文解决方案，支持任何语言，支持Access2000
__________________

动网论坛国外空间完整无错版
完全支持Access 2000

http://www.yescnet.com/manage.asp?url=down/list.asp**id=90
http://user.7host.com/yescnet/manag...l=down/list.asp**id=91
** 傲世江湖一鹤之国外空间版提供下载(支持非虚拟目录) **
下载：http://www.yescnet.com/manage.asp?url=down/list.asp**id=91
下载：http://user.7host.com/yescnet/manag...l=down/list.asp**id=92
示例：http://user.7host.com/cnetyes

** 傲世江湖一鹤之虚拟目录补丁 **

http://www.yescnet.com/manage.asp?url=down/list.asp**id=92
http://user.7host.com/yescnet/manag...l=down/list.asp**id=93

#34

to huang_brid(风之舞)　
因为我有一个id字段是关键字，所以uid字段就不行了，因为注册之后uid字段也是不能改变的

uid与另一个id有什么区别或关联?

#35

to fangoxyz(小虫)　
uid是用户名，id是用户编号，这两个字段都上唯一的，

#36

to huang_brid:
建议你把代码放到VB里去调试,因为ASP的侦错功能实在差很错,所以把代码放进VB里调试,很容易发现错误在哪里,然后在改asp就ok了,我经常干这种事,呵呵~

#37

updata  allmessage set password='password',repassword='repassword'.....where
  uid='uid'

这句在查询器中有没有改变记录集

#38

to fangoxyz(小虫)
谢谢老兄的关注，现在俺也不知道问题能不能解决了，俺下岗了，这个问题就没意义了
to 　xialei001(我是汇编我怕谁)　，，playmud(*教导我们：知识青年要到北京去！)　
谢谢关注

#39

下岗是很正常的事，你也说得对，这种乱七八糟的事没意义难得想

#40

取出字段名称后加一句
字段名称=replace(字段名称,"'","''")

#41

to fangoxyz(小虫
你说的很对,但是作为学习来讲应该还是要把问题弄清楚,希望给我点指点!
QQ:6572764
所以欢迎各位在给点意见,我想知道问题的根源!继续给分,以前给的是工作的角度,现在是求的问题的角度出发!
to hongfan(红帆)　
取出字段名称后加一句
字段名称=replace(字段名称,"'","''")
你说的跟我想的差不多,但是我有一点想问的,为什么要加最后一句,可能我加了可以通过,但我还是想求问题彻底弄懂,谢谢指教!

#42

sql中一般都是用'而不用"

我用了n+1000次以上

#43

吧每个字段两边的'"都去掉

#44

SQL2000
使用 char 和 varchar 数据
......
字符常量必须包括在单引号 (') 或双引号 (") 中。建议用单引号括住字符常量。当 QUOTED IDENTIFIER 选项设为 ON 时，有时不允许用双引号括住字符常量。

单引号在SQL中是特殊字符,把你没替换前的SQL语句打出来,再数一下单引号的个数就会明白.

#45

好的，谢谢给为，俺试了回来算分

#1