| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1185 人关注过本帖
标题:为什么这段asp插入数据代码执行后,数据库表五反应。请大侠们帮忙
只看楼主 加入收藏
twtrwr
Rank: 3Rank: 3
等 级:论坛游侠
帖 子:39
专家分:102
注 册:2011-3-31
结帖率:100%
收藏
已结贴  问题点数:20 回复次数:10 
为什么这段asp插入数据代码执行后,数据库表五反应。请大侠们帮忙
上面是个留言板的html代码,,,部分如下:

<form action="liuyan.asp" method="POST"   runat="server">

<p align="left">姓名:<input type="text" name="name" size="20" align="left"></p>

<p align="left">标题:<input type="text" name="title" size="20" align="left"></p>

<p align="left">内容:</p>

<p align="left"><textarea rows="11" name="content" cols="60" align="left"></textarea></p>


<p align="left"><input type="submit" value="提交" name="B1" style="color:#000000"><input type="reset" value="重置" name="B2" style="color:#000000"></p>

</form>
在网页中asp插入代码
<%
dim str,conn
str = "Provider = Microsoft.Jet.OLEDB.4.0;Data Source = " & Server.MapPath("db/ly.mdb") '连接数据库路径
Set conn = Server.CreateObject("ADODB.Connection")
If Err Then
err.Clear
 conn = Nothing
Response.Write "系统正在维护之中,暂时不能访问! 标准错误。。。。。"
Response.End
End If
 if Request.Form("submitok")="B1" then   
sql="INSERT INTO ly (name,content,time,ip) VALUES ('"
          sql=sql & Request("name") & "','"  & Request("title") & "','" & Request("content") & "')"
        set rs=conn.execute(sql)
        if rs.eof
         then response.Write("连接失败")
         

%>为什么这段asp插入数据代码执行后,数据库表五反应。请大侠们帮忙

[ 本帖最后由 twtrwr 于 2011-3-31 13:08 编辑 ]
搜索更多相关主题的帖子: content 留言板 数据库 style 姓名 
2011-03-31 11:25
yms123
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:209
帖 子:12488
专家分:19042
注 册:2004-7-17
收藏
得分:7 
<%
dim str,conn
str = "Provider = Microsoft.Jet.OLEDB.4.0;Data Source = " & Server.MapPath("db/ly.mdb") '连接数据库路径
Set conn = Server.CreateObject("ADODB.Connection")
If Err Then
err.Clear
conn = Nothing
Response.Write "系统正在维护之中,暂时不能访问! 标准错误。。。。。"
Response.End
End If
IF Request.Form("submitok")="B1" then
   On Error Resume Next   
   con.open str
   sql="INSERT INTO ly (name,content,time,ip) VALUES ('"
   sql=sql & Request("name") & "','"  & Request("title") & "','" & Request("content") & "')"
   conn.execute sql
   IF Err.Number<>0 Then
       Response.Write("连接失败")
   End IF
End if
 %>
2011-03-31 11:52
twtrwr
Rank: 3Rank: 3
等 级:论坛游侠
帖 子:39
专家分:102
注 册:2011-3-31
收藏
得分:0 
回复 楼主 twtrwr
为什么这个插入操作完成后,,,数据表里看不到这些数据,,版主看下,,是不是哪里错误了

男人无所畏惧,应越战越勇
2011-03-31 13:00
yms123
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:209
帖 子:12488
专家分:19042
注 册:2004-7-17
收藏
得分:0 
<%
dim str,conn
str = "Provider = Microsoft.Jet.OLEDB.4.0;Data Source = " & Server.MapPath("db/ly.mdb") '连接数据库路径
Set conn = Server.CreateObject("ADODB.Connection")
If Err Then
err.Clear
conn = Nothing
Response.Write "系统正在维护之中,暂时不能访问! 标准错误。。。。。"
Response.End
End If
IF Request.Form("submitok")="B1" then
   On Error Resume Next   
   con.open str
   set rs=server.createobject("adodb.recordset")
   rs.open "select * from ly",conn,1,3
   rs.addnew
   rs("name")=Request("name")
   rs("title")=Request("title")
   rs("content")=Request("content")
   rs.update
   IF Err.Number<>0 Then
       Response.Write("连接失败")
   End IF
End if
%>
2011-03-31 14:04
hams
Rank: 12Rank: 12Rank: 12
等 级:贵宾
威 望:18
帖 子:912
专家分:3670
注 册:2008-7-30
收藏
得分:7 
代码不完整

俺不高手,俺也是来学习的。
俺的意见不一定就对,当你不认同时请点忽视按钮。
当走到十字路口不知该如何走时,可在论坛问下路,但你若希望别人能一路把你送到目的地,显然是不现实的,因为别人也有自己要走的路。
2011-03-31 14:30
twtrwr
Rank: 3Rank: 3
等 级:论坛游侠
帖 子:39
专家分:102
注 册:2011-3-31
收藏
得分:0 
回复 5楼 hams
recordset对象这个方法可以向数据库中添加数据成功,,,但是用execute方法却无法向数据库中插入数据
<% dim str,conn
str = "Provider = Microsoft.Jet.OLEDB.4.0;Data Source = " & Server.MapPath("db/ly.mdb") '连接数据库路径
Set conn = Server.CreateObject("ADODB.Connection")
conn.open str
If Err Then
err.Clear
conn = Nothing
Response.Write "系统正在维护之中,暂时不能访问! 标准错误。。。。。"
Response.End
End If
IF Request.Form("B1")="tj" then
   On Error Resume Next   
   con.open str


'   set rs=server.createobject("adodb.recordset")
'   rs.open "select * from ly",conn,1,3
'   rs.addnew
'   
'   rs("name")=Request("name")
'   rs("title")=Request("title")
'   rs("content")=Request("content")
'   rs.update


sql="INSERT INTO ly (name,content,time,ip) VALUES ('"
          sql=sql & Request("name") & "','"  & Request("title") & "','" & Request("content") & "')"
        conn.execute(sql)
End if
为什么用recordset对象这个方法可以向数据库中添加数据成功,,,但是用execute方法却无法向数据库中插入数据,,,execute这段代码哪里有错误吗

男人无所畏惧,应越战越勇
2011-03-31 16:27
twtrwr
Rank: 3Rank: 3
等 级:论坛游侠
帖 子:39
专家分:102
注 册:2011-3-31
收藏
得分:0 
回复 4楼 yms123
recordset对象这个方法可以向数据库中添加数据成功,,,但是用execute方法却无法向数据库中插入数据
<% dim str,conn
str = "Provider = Microsoft.Jet.OLEDB.4.0;Data Source = " & Server.MapPath("db/ly.mdb") '连接数据库路径
Set conn = Server.CreateObject("ADODB.Connection")
conn.open str
If Err Then
err.Clear
conn = Nothing
Response.Write "系统正在维护之中,暂时不能访问! 标准错误。。。。。"
Response.End
End If
IF Request.Form("B1")="tj" then
   On Error Resume Next   
   con.open str


'   set rs=server.createobject("adodb.recordset")
'   rs.open "select * from ly",conn,1,3
'   rs.addnew
'   
'   rs("name")=Request("name")
'   rs("title")=Request("title")
'   rs("content")=Request("content")
'   rs.update


sql="INSERT INTO ly (name,content,time,ip) VALUES ('"
          sql=sql & Request("name") & "','"  & Request("title") & "','" & Request("content") & "')"
        conn.execute(sql)
End if
为什么用recordset对象这个方法可以向数据库中添加数据成功,,,但是用execute方法却无法向数据库中插入数据,,,execute这段代码哪里有错误吗

男人无所畏惧,应越战越勇
2011-03-31 16:28
hams
Rank: 12Rank: 12Rank: 12
等 级:贵宾
威 望:18
帖 子:912
专家分:3670
注 册:2008-7-30
收藏
得分:0 
name,content,time,ip

对应

Request("name") & "','"  & Request("title") & "','" & Request("content")

还少一个

俺不高手,俺也是来学习的。
俺的意见不一定就对,当你不认同时请点忽视按钮。
当走到十字路口不知该如何走时,可在论坛问下路,但你若希望别人能一路把你送到目的地,显然是不现实的,因为别人也有自己要走的路。
2011-03-31 16:59
twtrwr
Rank: 3Rank: 3
等 级:论坛游侠
帖 子:39
专家分:102
注 册:2011-3-31
收藏
得分:0 
回复 7楼 twtrwr
我的数据库有以下几个字段 id    ,name,  title, content, time,  ip
而改后的语句如下:
If Err Then
err.Clear
conn = Nothing
Response.Write "系统正在维护之中,暂时不能访问! 标准错误。。。。。"
Response.End
End If
IF Request.Form("B1")="tj" then
   On Error Resume Next   
   con.open str
'   set rs=server.createobject("adodb.recordset")
'   rs.open "select * from ly",conn,1,3
'   rs.addnew
'   
'   rs("name")=Request("name")
'   rs("title")=Request("title")
'   rs("content")=Request("content")
'   rs.update
sql="INSERT INTO ly (id,name,title,content,time,ip) VALUES ('"
          sql=sql & id &" ','"  & Request("name") & "','"  & Request("title") & "','" & Request("content") & "','"& now()&"','" &request.servervariables("REMOTE_ADDR") & "')"
        conn.execute(sql)
End if
但是还是无法插入数据向数据库中

男人无所畏惧,应越战越勇
2011-03-31 17:20
hams
Rank: 12Rank: 12Rank: 12
等 级:贵宾
威 望:18
帖 子:912
专家分:3670
注 册:2008-7-30
收藏
得分:0 
无法插入是没反应还是出错,要说清楚
另一个还要跟踪代码运行的情况,要执行这段代码,是有条件的,你的条件符合了没有。

俺不高手,俺也是来学习的。
俺的意见不一定就对,当你不认同时请点忽视按钮。
当走到十字路口不知该如何走时,可在论坛问下路,但你若希望别人能一路把你送到目的地,显然是不现实的,因为别人也有自己要走的路。
2011-04-01 08:12
快速回复:为什么这段asp插入数据代码执行后,数据库表五反应。请大侠们帮忙
数据加载中...
 
   



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

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