请问一个关于讲数据库插入SQL的问题~！ASP~！

wanenjie 2008-07-18 03:50:38
我写了一个代码，有判断条件和数据插入，但是运行提交后没有反应，数据也没有插入。请各位帮帮我看看哪里有问题啊~！谢谢·！
<%
dim conn,cnpath
dim title1,neirong2,id,validcode,sql,rs
title1=request.form("title")
neirong2=request.form("neirong")
id=request.form("xl")
if title1="" or neirong2="" then
response.write"<SCRIPT language=JavaScript>alert('提交标题和内容不能为空！');"
response.write"javascript:history.go(-1)</SCRIPT>"
Response.End
end if
%>
<%
set conn=server.CreateObject ("adodb.connection")
conn.Open "driver={SQL Server};server=;UID=;PWD=;database=" & cnpath
set rs=server.createobject("ADODB.Recordset")
rs.open sql,conn 1,3
rs.Source="select * from tijiaoneirong"
if (rs.eof and rs.bof) then
rs.addnew
rs("dl")=dl
rs("xl")=xl
rs("title1")=encrypt(title1)
rs("neirong2")=encrypt(neirong2)
rs.update
end if
rs.close
end if
set rs=nothing
conn.close
set conn=nothing
response.write "<script>alert('提交成功!');location.href='index.asp'; </script>"
%>
...全文
332 36 打赏 收藏 转发到动态 举报
写回复
用AI写文章
36 条回复
切换为时间正序
请发表友善的回复…
发表回复
zc_0101 2008-07-22
  • 打赏
  • 举报
 回复
贴出你的提交表单一目了然！
zc_0101 2008-07-22
  • 打赏
  • 举报
 回复
应该是最基础的问题：

请检查你的提交表单中Action=xxx.asp是有存在？或者是否正确？是否是post方式提交？

或者干脆你就没有添加Form?????


或者你的“提交”按扭压根就不是“submit”型？
wanenjie 2008-07-22
  • 打赏
  • 举报
 回复
请各位帮帮我啊·！谢谢~！
wanenjie 2008-07-22
  • 打赏
  • 举报
 回复
我的提交信息
td width="800" height="600" valign="top"><form action="tijiao.asp" method="post" enctype="multipart/form-data" name="form1" id="form1">
<label>
<div align="center"><br />
获取信息代码
title1=request.form("title")
neirong2=request.form("neirong")
不是应该这样吗？谢谢
wanenjie 2008-07-21
  • 打赏
  • 举报
 回复
搞了半天原来没有获取数据~！但是方法不是这样获取吗？
title1=request.form("title")
neirong2=request.form("neirong")
wanenjie 2008-07-21
  • 打赏
  • 举报
 回复
sql="select * from tijiaoneirong"
rs.open sql,conn 1,3
if (rs.eof and rs.bof) then
rs.addnew
rs("dl")=dl
rs("xl")=xl
rs("title")=encrypt(title)
rs("neirong")=encrypt(neirong)
rs.update
end if
rs.close
end if
set rs=nothing
conn.close
set conn=nothing
是不是应该这样啊？我是这样写但是他都提示我。语句未结束
Microsoft VBScript 编译器错误 错误 '800a0401' 。还有为什么我上面判读TITLE那些没有执行就走到下面呢？
egg_server 2008-07-21
  • 打赏
  • 举报
 回复
我最上面第一次回复就给你指出你rs.open sql,conn,1,3
你没有发现你我给你加了一个,吗?你认真看了大家给你的回复吗?

wanenjie 2008-07-21
  • 打赏
  • 举报
 回复
语句未结束

rs.open sql,conn 1,3
rankisky 2008-07-21
  • 打赏
  • 举报
 回复
response.write" <SCRIPT language=JavaScript>alert('提交标题和内容不能为空！');"
response.write"javascript:history.go(-1) </SCRIPT>"


===


response.write "<script language=Javascript>alert('提交标题和内容不能为空！');window.location='javascript:history.back(-1)';</script>"
egg_server 2008-07-21
  • 打赏
  • 举报
 回复
response.write" <SCRIPT language=JavaScript>alert('提交标题和内容不能为空！');"
response.write"javascript:history.go(-1) </SCRIPT>"

你这么写好像没有错,如果你的有问题试试你把这两句合一起写
response.write" <SCRIPT language=JavaScript>alert('提交标题和内容不能为空！');window.history.back(1);</script>"
wanenjie 2008-07-21
  • 打赏
  • 举报
 回复
我想讲数据插入到select * from tijiaoneirong这里·！但是不知道该在哪里写上。还有请问下面代码有错误吗？？为什么他没有执行呢？谢谢~！
title1=request.form("title")
neirong2=request.form("neirong")
id=request.form("xl")
if title1="" or neirong2="" then
response.write" <SCRIPT language=JavaScript>alert('提交标题和内容不能为空！');"
response.write"javascript:history.go(-1) </SCRIPT>"
Response.End
wanenjie 2008-07-21
  • 打赏
  • 举报
 回复
我这些都没有为什么都不能获取到TITLE和NEIRONG的数据呢？谢谢
Msxindl_Com 2008-07-21
  • 打赏
  • 举报
 回复
我想问搂主:你真的认真看了回复了吗?请注意看回复的代码跟你的有什么不同.哎....


[Quote=引用 19 楼 liaitan 的回复:]
错误1、
把你原来的
rs.open sql,conn 1,3
rs.Source="select * from tijiaoneirong"
改成：
sql="select * from tijiaoneirong"
rs.open sql,conn,1,3
错误2、
支掉你代码中的：
if (rs.eof and rs.bof) then
和两个end if
错误3、
请认真检查这句：
conn.Open "driver={SQL Server};server=;UID=;PWD=;database=" & cnpath
你给cnpath赋值了吗？？
[/Quote]
ambitionzfx 2008-07-20
  • 打赏
  • 举报
 回复
<%
dim conn,cnpath
dim title1,neirong2,id,validcode,sql,rs
title1=request.form("title")
neirong2=request.form("neirong")
id=request.form("xl")
if title1="" or neirong2="" then
response.write" <SCRIPT language=JavaScript>alert('提交标题和内容不能为空！');"
response.write"javascript:history.go(-1) </SCRIPT>"
Response.End
else
%>
<%
set conn=server.CreateObject ("adodb.connection")
conn.Open "driver={SQL Server};server=;UID=;PWD=;database=" & cnpath
set rs=server.createobject("ADODB.Recordset")
sql="select * from tijiaoneirong"
rs.open sql,conn 1,3
if (rs.eof and rs.bof) then
rs.addnew
rs("dl")=dl
rs("xl")=xl
rs("title1")=encrypt(title1)
rs("neirong2")=encrypt(neirong2)
rs.update
end if
rs.close
end if
set rs=nothing
conn.close
set conn=nothing
response.write " <script>alert('提交成功!');location.href='index.asp'; </script>"
end if
%>
pumnfood 2008-07-20
  • 打赏
  • 举报
 回复
学而不厌
则累
ambitionzfx 2008-07-20
  • 打赏
  • 举报
 回复
看看判空逻辑,因为你的判空无论执行与否,后面的加入数据库都要运行的,
所以建议加一句else语句进行数据插入^^
半山闲人 2008-07-20
  • 打赏
  • 举报
 回复
楼主你的这句有问题呀
sql="select * from tijiaoneirong"
rs.open sql,conn 1,3
if (rs.eof and rs.bof) then
你打开了一张表,但是在下面的判断中又要求这张表里没有数据,你是想一张表只能插入一条数据吗?
一般这里有两种可能,打开一张表,直接插入一条记录,不管这条记录是否在表里已存在,另外一种就是要求插入的数据不可与表里数据重复,比如用户名注册,两种写法,如下:
第一种,直接打开表,不判断:
rs.open "tijiaoneirong",conn,1,3
第二种,打开表,要判断
sql="select * from tijiaoneirong where "&你的条件
rs.open sql,conn 1,3
if (rs.eof and rs.bof) then
Msxindl_Com 2008-07-20
  • 打赏
  • 举报
 回复
错误1、
把你原来的
rs.open sql,conn 1,3
rs.Source="select * from tijiaoneirong"
改成：
sql="select * from tijiaoneirong"
rs.open sql,conn,1,3
错误2、
支掉你代码中的：
if (rs.eof and rs.bof) then
和两个end if
错误3、
请认真检查这句：
conn.Open "driver={SQL Server};server=;UID=;PWD=;database=" & cnpath
你给cnpath赋值了吗？？
wanenjie 2008-07-19
  • 打赏
  • 举报
 回复
体提示我缺少END IF~！
sql="select * from tijiaoneirong"
rs.open sql,conn,1,3
rs.addnew
rs("dl")=dl
rs("xl")=xl
rs("title1")=encrypt(title1)
rs("neirong2")=encrypt(neirong2)
rs.update
rs.close
end if
set rs=nothing
conn.close
set conn=nothing
response.write " <script>alert('提交成功!');location.href='index.asp'; </script>"
%>

请问应该加上多少个END IF啊？谢谢
rankisky 2008-07-18
  • 打赏
  • 举报
 回复
title1=request("title")
neirong2=request("neirong")

那说明你没接到值。。
加载更多回复（16）
ASP.NET 2.0 + SQL Server网络应用系统开发案例精解
ASP.NET 2.0 + SQL Server网络应用系统开发案例精解
sql语句妙用，各种sql语句的详细用法与讲解
sql语句妙用，各种sql语句的详细用法与讲解 ，使得程序运行的更加流畅。主要针对一些高效sql语句的解释。
ASP.NET购物车源码
基于Session实现ASP.NET购物车源码，数据库为SqlServer2005，含数据库备份
c#人事管理系统
c#人事管理系统c#人事管理系统
vs自带数据库sql server的中文插入乱码问题、查找当前数据库名
解决两个问题：vs自带数据库sql server的中文插入乱码问题、查找当前数据库名 （查找数据库名在文章中间，自己往下翻吧，不单拎出来了） vs自带数据库sql server的中文插入乱码问题： 如图所示，我插入表的中文变成了问号 解决思路： 1、是我的表建立时字段类型不支持中文？ 2、数据库的排序规则错误？ 3、写入数据库时的数据编码问题？ 第一种情况：把nchar改成nv...
ASP

28,404

社区成员

356,946

社区内容

发帖
与我相关
我的任务
社区描述
ASP即Active Server Pages，是Microsoft公司开发的服务器端脚本环境。
社区管理员
  • ASP
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今

加载中

查看更多榜单
社区公告
暂无公告

试试用AI创作助手写篇文章吧

+ 用AI写文章