| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 553 人关注过本帖
标题:关于登录并向表中增加一条记录的问题继续请教!
只看楼主 加入收藏
云中的雨
Rank: 1
等 级:新手上路
帖 子:36
专家分:0
注 册:2007-3-19
收藏
 问题点数:0 回复次数:7 
关于登录并向表中增加一条记录的问题继续请教!
关于登录并向表中增加一条记录的问题继续请教各位老人家
上次请教的代码我也觉得太复杂,所以改成两个页面,第一是登录页面。第二个页面是登录成功页面。这两步我已经作成功了。但是当我在第二个页面,就是登录成功页面的代码上添加增加记录的代码时,显示是错误类型
Microsoft VBScript 编译器错误 (0x800A03EE)
缺少 ')'
/MyHome/denluxianshi.asp, line 19, column 69
conn.execute("INSERT INTO logintable (name,logintime) VALUES ('"&stxm"','"Now"')")

我不知道原因何在,想请教各们前辈!谢谢!我的登录成功页面并增加记录的代码如下
<%
If Request("pwd") <> "" And Request("stxm") <> "" Then
' 注释:创建并初始化Recordset对象
Set objRS = Session("objRS")
objRS.Source = "SELECT * FROM record " & _
"WHERE pwd = '" & Request("pwd") & "' " & _
"AND name = '" & Request("stxm") & "' "
objRS.Open
' 注释:显示登录结果
If objRS.RecordCount > 0 then
Response.Write("登录成功!")
Session("stxm")=name
logintime=trim(request.form("Now"))
conn.execute("INSERT INTO logintable (name,logintime) VALUES ('"&stxm"','"Now"')")
Else
Response.Write("登录失败!")
End If
' 注释:关闭记录集
objRS.Close
Set objRS = Nothing
Else
Response.Write("请先输入用户信息!")
End If
%>
说明:其中logintable是登录人员时间记录表有name,logintime两个字段,
搜索更多相关主题的帖子: 记录 登录 
2007-11-09 22:27
kira007
Rank: 2
等 级:论坛游民
帖 子:294
专家分:27
注 册:2007-6-28
收藏
得分:0 
VALUES ('"&stxm"','"Now"')")
多了 &

生活的理想,就是为了理想的生活。
2007-11-09 22:34
云中的雨
Rank: 1
等 级:新手上路
帖 子:36
专家分:0
注 册:2007-3-19
收藏
得分:0 

我把多余的&去掉了仍不行啊!

2007-11-10 08:14
madpbpl
Rank: 4
等 级:贵宾
威 望:11
帖 子:2876
专家分:244
注 册:2007-4-5
收藏
得分:0 
stxm是什么?没有定义吧?
2007-11-10 08:40
云中的雨
Rank: 1
等 级:新手上路
帖 子:36
专家分:0
注 册:2007-3-19
收藏
得分:0 
是登录用户姓名,在登录的那个页面定义了的.去掉增加记录的代码显示登录成功的,但一加上就不行了.
2007-11-10 09:57
madpbpl
Rank: 4
等 级:贵宾
威 望:11
帖 子:2876
专家分:244
注 册:2007-4-5
收藏
得分:0 
你没有理解我的意思,我想引导你的
改成这样试试
conn.execute("INSERT INTO logintable (name,logintime) VALUES ('"&request("stxm")&"','"&request("Now")&"')")
按你的意思可能应该是
conn.execute("INSERT INTO logintable (name,logintime) VALUES ('"&request("stxm")&"',Now())")
你的错误是stxm没定义造成的错误.
你要定义
stxm=request.form("stxm")
不然电脑不认识stxm是什么?
2007-11-10 10:18
云中的雨
Rank: 1
等 级:新手上路
帖 子:36
专家分:0
注 册:2007-3-19
收藏
得分:0 

谢谢madpbpl帮我,但是还是不行。显示的错误类型:
Microsoft VBScript 运行时错误 (0x800A01A8)
缺少对象: ''
/MyHome/denluxianshi.asp, 第 17 行
我又在前添加了

name=trim(request.Form("stxm"))
logintime=trim(request.Form("Now"))
也仍然是一样的。只是变成第 17 行
罢了。

2007-11-10 16:06
云中的雨
Rank: 1
等 级:新手上路
帖 子:36
专家分:0
注 册:2007-3-19
收藏
得分:0 
谢谢各位,问题已解决。但现在是只能增加一次记录,同一用再增加去不行。
2007-11-11 14:16
快速回复:关于登录并向表中增加一条记录的问题继续请教!
数据加载中...
 
   



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

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