| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 803 人关注过本帖
标题:求救!!
只看楼主 加入收藏
水露
Rank: 1
等 级:新手上路
帖 子:143
专家分:0
注 册:2005-8-3
收藏
 问题点数:0 回复次数:10 
求救!!

运行以下代码: <!-- #Include File=Conn.asp -->

<% Set rs = Server.CreateObject ("ADODB.Recordset") sql = "Select*from member order by 时间 desc" rs.Open sql,conn,1,1 %> <% if rs.EOF and rs.BOF then response.write ("暂时还没有任何信息") else Do Until rs.EOF response.write("申请区域形式:"& rs("shenqing")) response.write("<br>申请区域:"& rs("quyu")) response.write("<br>介绍:"& rs("jieshao")) response.write("<br>单位:"&rs("danwei")) response.write("<br>联系人:"&rs("lianxi")) response.write("<br>性别:"&rs("sex")) response.write("<br>年龄:"&rs("age")) response.write("<br>文化:"&rs("culture")) response.write("<br>电话:"&rs("tel")) response.write("<br>传真:"&rs("fax")) response.write("<br>手机:"&rs("handset")) response.write("<br>地址:"&rs("adress")) response.write("<br>邮编:"&rs("code")) response.write("<br>网址:"&rs("net")) response.write("<br>E_mail:"&rs("email")) response.write("<br>QQ:"&rs("qq")) response.write("<br>申请时间:"&rs("时间")) response.write "<a href=addeluser.asp?id="&rs("username")&">删除</a></td>"

response.write("<hr>") rs.MoveNext Loop end if rs.close Set rs = Nothing conn.close set conn=Nothing %> 结果: 错误类型: Microsoft JET Database Engine (0x80040E14) 无效的 null 使用 /www/zhshwenan/addeluser.asp, 第 13 行

搜索更多相关主题的帖子: member sql 单位 
2005-08-04 11:21
belin2000
Rank: 3Rank: 3
等 级:论坛游侠
威 望:5
帖 子:975
专家分:194
注 册:2004-6-2
收藏
得分:0 
那里错?
13行??在那里啊??

59ita点com(我就爱TA)
2005-08-04 11:34
水露
Rank: 1
等 级:新手上路
帖 子:143
专家分:0
注 册:2005-8-3
收藏
得分:0 

是这个addeluser.asp <!-- #Include File=Conn.asp --> <% dim userid,sql response.buffer=true Response.Expires=0 if session("adpass")<>"passed" then response.redirect "adlogin.asp" end if userid=Request.Querystring("id")

sql="delete * from info where trim(Cstr(用户名))='"&userid&"'"

set rs=conn.execute (sql)

Response.Write "<html><body><center>成功删除!<p>" Response.Write "<a href=adlist.asp>返回查看</a>" Response.Write "</center></body></html>" Conn.Close Set Conn=Nothing %>


2005-08-04 11:44
belin2000
Rank: 3Rank: 3
等 级:论坛游侠
威 望:5
帖 子:975
专家分:194
注 册:2004-6-2
收藏
得分:0 
晕,谁那么有空帮你看一堆代码。。。。。

59ita点com(我就爱TA)
2005-08-04 12:28
水露
Rank: 1
等 级:新手上路
帖 子:143
专家分:0
注 册:2005-8-3
收藏
得分:0 
啊!!??? 第13行是:set rs=conn.execute (sql) 我自已没检查出有错误,所以才发表出来的嘛! 我实在没办法啦!!!!!! 错误类型: Microsoft JET Database Engine (0x80040E14) 无效的 null 使用 //最有可能的原因是什么? addeluser.asp, 第 13 行

2005-08-04 12:50
belin2000
Rank: 3Rank: 3
等 级:论坛游侠
威 望:5
帖 子:975
专家分:194
注 册:2004-6-2
收藏
得分:0 
你的数据库是什么?

59ita点com(我就爱TA)
2005-08-04 13:02
水露
Rank: 1
等 级:新手上路
帖 子:143
专家分:0
注 册:2005-8-3
收藏
得分:0 
ACCESS
&lt;%
Provider = "Provider=Microsoft.Jet.OLEDB.4.0;"
Path = "Data Source=" &amp; Server.MapPath("zhaoshanginfo.mdb")
Set conn= Server.CreateObject("ADODB.Connection")
p1=Provider&amp;Path
conn.Open P1
%&gt;

2005-08-04 13:06
belin2000
Rank: 3Rank: 3
等 级:论坛游侠
威 望:5
帖 子:975
专家分:194
注 册:2004-6-2
收藏
得分:0 
userid=Request.Querystring("id")
response.write(userid) '看看userid的值
sql="delete * from info  where trim(Cstr(用户名))='"&amp;userid&amp;"'"
response.write(sql)'sql的值
response.end()

59ita点com(我就爱TA)
2005-08-04 13:10
水露
Rank: 1
等 级:新手上路
帖 子:143
专家分:0
注 册:2005-8-3
收藏
得分:0 
得到值是:xiaoxiaodelete * from member where trim(Cstr(username))='xiaoxiao'
删除操作还是不行!

2005-08-04 13:32
belin2000
Rank: 3Rank: 3
等 级:论坛游侠
威 望:5
帖 子:975
专家分:194
注 册:2004-6-2
收藏
得分:0 
sql="delete * from info  where [username]='"&amp;userid&amp;"'"

59ita点com(我就爱TA)
2005-08-04 16:00
快速回复:求救!!
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.026366 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved