求救!! - ASP - 新微赢技术网

┈ㄝai〾噯儿

电梯直达

1^#

发表于 2010-1-13 03:31:32 | 只看该作者回帖奖励

|倒序浏览 |阅读模式

运行以下代码: 
<% 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(" 申请区域:"& rs("quyu")) response.write(" 介绍:"& rs("jieshao")) response.write(" 单位:"&rs("danwei")) response.write(" 联系人:"&rs("lianxi")) response.write(" 性别:"&rs("sex")) response.write(" 年龄:"&rs("age")) response.write(" 文化:"&rs("culture")) response.write(" 电话:"&rs("tel")) response.write(" 传真:"&rs("fax")) response.write(" 手机:"&rs("handset")) response.write(" 地址:"&rs("adress")) response.write(" 邮编:"&rs("code")) response.write(" 网址:"&rs("net")) response.write(" E_mail:"&rs("email")) response.write(" QQ:"&rs("qq")) response.write(" 申请时间:"&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 行

收藏0

使用道具举报

太阳神

2^#

发表于 2010-1-13 03:31:35 | 只看该作者

那里错？
13行？？在那里啊？？

回复支持反对

使用道具举报

枫之泪-天涯

3^#

发表于 2010-1-13 03:31:39 | 只看该作者

是这个addeluser.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>成功删除!" Response.Write "<a href=adlist.asp>返回查看</a>" Response.Write "</center></body></html>" Conn.Close Set Conn=Nothing %>

回复支持反对

使用道具举报

落叶秋雨

4^#

发表于 2010-1-13 03:31:42 | 只看该作者

晕，谁那么有空帮你看一堆代码。。。。。

回复支持反对

使用道具举报

听妈妈的话

5^#

发表于 2010-1-13 03:31:46 | 只看该作者

啊!!??? 第13行是:set rs=conn.execute (sql) 我自已没检查出有错误,所以才发表出来的嘛! 我实在没办法啦!!!!!! 错误类型： Microsoft JET Database Engine (0x80040E14) 无效的 null 使用 //最有可能的原因是什么? addeluser.asp, 第 13 行

回复支持反对

使用道具举报

祗↘爲.輝仔

6^#

发表于 2010-1-13 03:31:49 | 只看该作者

你的数据库是什么？

回复支持反对

使用道具举报

tp寶寶^ō^

7^#

发表于 2010-1-13 03:31:56 | 只看该作者

ACCESS
<%
Provider = "Provider=Microsoft.Jet.OLEDB.4.0;"
Path = "Data Source=" & Server.MapPath("zhaoshanginfo.mdb")
Set conn= Server.CreateObject("ADODB.Connection")
p1=Provider&Path
conn.Open P1
%>

回复支持反对

使用道具举报

.｀D.D`地`

8^#

发表于 2010-1-13 03:32:00 | 只看该作者

userid=Request.Querystring("id")
response.write(userid) '看看userid的值
sql="delete * from info where trim(Cstr(用户名))='"&userid&"'"
response.write(sql)'sql的值
response.end()

回复支持反对

使用道具举报

魅力ぉ小猪ぎ

9^#

发表于 2010-1-13 03:32:04 | 只看该作者

得到值是:xiaoxiaodelete * from member where trim(Cstr(username))='xiaoxiao'
删除操作还是不行!

回复支持反对

使用道具举报

秋风扫落叶

10^#

发表于 2010-1-13 03:32:10 | 只看该作者

sql="delete * from info where [username]='"&userid&"'"

回复支持反对

使用道具举报

		自动登录	找回密码
密码			注册