| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 626 人关注过本帖
标题:[求助]数据库问题,,
取消只看楼主 加入收藏
knifeflytiger
Rank: 1
等 级:新手上路
帖 子:46
专家分:0
注 册:2006-8-22
收藏
 问题点数:0 回复次数:8 
[求助]数据库问题,,
我 的所有的程序都是写不进数据库,,但语法又没有什么错误,并且都显示注册成功,,留言成功,但数据库里面没有相应的数据  这是怎么回事情
搜索更多相关主题的帖子: 数据库 
2006-08-24 01:45
knifeflytiger
Rank: 1
等 级:新手上路
帖 子:46
专家分:0
注 册:2006-8-22
收藏
得分:0 
acess2003 IIS5
<!--#include file="dbpath.asp"-->
<%
user=request.form("user")
pwd1=request.form("pwd1")
pwd2=request.form("pwd2")
email=request.form("email")
web=request.form("web")
url=request.form("url")
gbname=request.form("gbname")

'**********检查是否填写了所有项,如果不是侧自动返回申请页面
if user="" or pwd1="" or pwd2="" or email="" or web="" or url="" or gbname="" then
errmsg=errmsg & "△ 请填写所有内容!\n"
end if
if pwd1<>pwd2 then
errmsg=errmsg & "△ 两次输入的密码不相同!\n"
end if
'**********检查用户名.如果有重复用户名侧自动返回申请页面
dim rsc,errmsg
Set rsc = Conn.Execute("select * from user where user = '" & user & "'")
if not rsc.eof then errmsg=errmsg & "△ 此用户名已被注册,请改名!\n"


if errmsg<>"" then
    Conn.Close
    Set conn = nothing
    Set rsc = nothing
    response.write("<script>alert('" & errmsg & "');history.go(-1)</script>")
    response.end
end if
'**********检查结束**********

set rs=server.createobject("adodb.recordset")
pwd1=md5(pwd1)  '模拟使用MD5加密
sql="select * from user where (id is null)"

rs.open sql,conn,1,3
rs.addnew
rs("user")=user
rs("pwd")=pwd1
rs("email")=email
rs("web")=web
rs("url")=url
rs("gbname")=gbname
rs.update
rs.close
set rs=nothing  
conn.close     
set conn=nothing
%>
2006-08-24 10:19
knifeflytiger
Rank: 1
等 级:新手上路
帖 子:46
专家分:0
注 册:2006-8-22
收藏
得分:0 
兄弟们过来看一下啊
2006-08-24 10:27
knifeflytiger
Rank: 1
等 级:新手上路
帖 子:46
专家分:0
注 册:2006-8-22
收藏
得分:0 
自己鼎
2006-08-24 11:04
knifeflytiger
Rank: 1
等 级:新手上路
帖 子:46
专家分:0
注 册:2006-8-22
收藏
得分:0 
大哥们,,说一下啊,,我求你们了,,是不是什么驱动没有装
2006-08-24 11:25
knifeflytiger
Rank: 1
等 级:新手上路
帖 子:46
专家分:0
注 册:2006-8-22
收藏
得分:0 
再顶呀
2006-08-24 13:38
knifeflytiger
Rank: 1
等 级:新手上路
帖 子:46
专家分:0
注 册:2006-8-22
收藏
得分:0 
是不是路经问题
2006-08-24 13:43
knifeflytiger
Rank: 1
等 级:新手上路
帖 子:46
专家分:0
注 册:2006-8-22
收藏
得分:0 
<%
   dim conn   
   dim connstr
   on error resume next
   connstr="DBQ="+server.mappath("gbmdb.asp")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
     set conn=server.createobject("ADODB.CONNECTION")
     conn.open connstr
     '数据库链接字符串信息,返回一个激活的connection对象。
%>
2006-08-24 14:05
knifeflytiger
Rank: 1
等 级:新手上路
帖 子:46
专家分:0
注 册:2006-8-22
收藏
得分:0 
我顶
2006-08-24 15:07
快速回复:[求助]数据库问题,,
数据加载中...
 
   



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

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