| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1517 人关注过本帖
标题:[求助]这段修改数据库代码的修改
只看楼主 加入收藏
yanguorui
Rank: 1
等 级:新手上路
帖 子:30
专家分:0
注 册:2007-5-18
收藏
 问题点数:0 回复次数:9 
[求助]这段修改数据库代码的修改

<!--#include file="conn.asp"-->
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>基本情况保存</title>
</head>

<body>
<p>
<%
set conn=server.createobject("adodb.connection")
DBPath = Server.MapPath("db/sllj.mdb")
conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath
Set rs = Server.CreateObject("ADODB.Recordset")
%>

<%
mingzi=request.form("name")
oldname=request.form("oldname")
minzu=request.form("minzu")
shengri=request.form("shengri")
gztime=request.form("gztime")
zptime=request.form("zptime")
gongzhong=request.form("gongzhong")
zzmm=request.form("zzmm")
rdtdate=request.form("rdtdate")
rdtadd=request.form("rdtadd")
stzhk=request.form("stzhk")
wgdw=request.form("wgdw")
dwphone=request.form("dwphone")
homeadd=request.form("homeadd")
homephone=request.form("homephone")
jiguan=request.form("jiguan")
telephone=request.form("telephone")
chushengdi=request.form("chushengdi")
hukou=request.form("hukou")
hetongid=request.form("hetongid")

sql="select * from jbqk"
rs.open sql,conn,3,2
rs.addnew

rs("name")=mingzi
rs("oldname")=oldname
rs("minzu")=minzu
rs("shengri")=shengri
rs("gztime")=gztime
rs("zptime")=zptime
rs("gongzhong")=gongzhong
rs("zzmm")=zzmm
rs("rdtdate")=rdtdate
rs("rdtadd")=rdtadd
rs("stzhk")=stzhk
rs("wgdw")=wgdw
rs("dwhpone")=dwphone
rs("homeadd")=homeadd
rs("homephone")=homephone
rs("jiguan")=jiguan
rs("telephone")=telephone
rs("chushengdi")=chushengdi
rs("hukou")=hukou
rs("hetongid")=hetongid

rs.update
rs.close
response.redirect "xlyb.asp"
%>
</p>
</body>
</html>

save.asp文件



<%
dim conn
set conn=Server.createobject("adodb.connection")
conn.open "provider=microsoft.jet.oledb.4.0;data source="&server.mappath("db/sllj.mdb")
If err.number<>0 then
Response.write("连接数据库时产生错误!")
Response.End
End if
%>

conn.asp文件

错误提示见图片,帮忙看一下怎么改!

图片附件: 游客没有浏览图片的权限,请 登录注册

[此贴子已经被作者于2007-6-22 14:37:42编辑过]

搜索更多相关主题的帖子: 数据库 DTD 代码 head 
2007-06-22 14:36
hangxj
Rank: 6Rank: 6
等 级:贵宾
威 望:29
帖 子:2045
专家分:0
注 册:2006-4-10
收藏
得分:0 
不知道你的66行在哪哦~ 帮不了你

http://www./
2007-06-22 16:23
yanguorui
Rank: 1
等 级:新手上路
帖 子:30
专家分:0
注 册:2007-5-18
收藏
得分:0 
rs.update

2007-06-22 16:28
yanguorui
Rank: 1
等 级:新手上路
帖 子:30
专家分:0
注 册:2007-5-18
收藏
得分:0 
还是一样的错误啊!

2007-06-22 16:38
xiaohonghui0
Rank: 1
等 级:新手上路
威 望:1
帖 子:274
专家分:0
注 册:2006-4-10
收藏
得分:0 
你把这句Set rs = Server.CreateObject("ADODB.Recordset")移到rs.open sql,conn,3,2
上面试下, 你的语句看了好象没错
还有,你把rs.open sql,conn,3,2 后的2改为3试下.
如果还不行,你再将减少代码,例如,一个个逐步添加,有时可能是字段的问题,以前我用的access数据库,如果字段里面出现系统变量,例如new、password之类的,就会出错

曾用asp做过公司管理系统,新闻发布系统,个人网站之类,可代做网站 有意者请联系我,电话:13714123661
2007-06-22 16:40
xiaohonghui0
Rank: 1
等 级:新手上路
威 望:1
帖 子:274
专家分:0
注 册:2006-4-10
收藏
得分:0 
应当不会是这问题,我取表单值都是request.form,但是从没出现这问题
lz,你把你的代码上传到附件,我们下载帮你改吧,如果方便的话

曾用asp做过公司管理系统,新闻发布系统,个人网站之类,可代做网站 有意者请联系我,电话:13714123661
2007-06-22 16:58
yanguorui
Rank: 1
等 级:新手上路
帖 子:30
专家分:0
注 册:2007-5-18
收藏
得分:0 
回复:(xiaohonghui0)应当不会是这问题,我取表单值...
IDXWRE5W.rar (2.65 KB) [求助]这段修改数据库代码的修改


这是代码

2007-06-22 17:04
yanguorui
Rank: 1
等 级:新手上路
帖 子:30
专家分:0
注 册:2007-5-18
收藏
得分:0 
谢谢各位,麻烦了

2007-06-22 17:05
yanguorui
Rank: 1
等 级:新手上路
帖 子:30
专家分:0
注 册:2007-5-18
收藏
得分:0 
这个很郁闷啊。以前都是这样写的,现在不知道为什么就是不行了!

2007-06-22 17:09
hangxj
Rank: 6Rank: 6
等 级:贵宾
威 望:29
帖 子:2045
专家分:0
注 册:2006-4-10
收藏
得分:0 

基础都没有打好,怎么出来混的?


http://www./
2007-06-22 17:23
快速回复:[求助]这段修改数据库代码的修改
数据加载中...
 
   



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

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