ASP通过超级连接把信息写入数据库的小疑问。

来源:百度知道 编辑:UC知道 时间:2024/05/26 17:46:53
先看看我的代码
<!--#include file=../Config.asp-->
<!--#include file=Config.asp-->
<!--#include file=Sql.asp-->
<%
dim conn,connstr,time1,time2,mdb
time1=timer
mdb=InstallDir&"Data/#Cookies.asa"
on error resume next
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(mdb)
Set Conn=Server.CreateObject("ADODB.Connection")
conn.Open connstr
If Err Then
err.Clear
Set Conn = Nothing
Response.Write "数据库连接出错,请检查Inc/Cookies.asp文件。"
Response.End
End If

act=request("act")
if act="a" then
id=FormatStr(request.querystring("id"))
n=FormatStr(request.querystring("n"))
t=FormatStr(request.querystring("t"))
s=FormatStr(request.querystring("s"))
dim sql,rs
set rs=server.createobject("adodb.recordset")
rs.open "selec

rs.open "select * from from Ylmv_Cookies",conn,1,3
此句改成
rs.open "select * from Ylmv_Cookies",conn,1,3
并删除
response.write "<script>alert('该报告已发出,我们收到后马上进行处理!');window.close();</Script>"

点评:你的sql语句多了个from

=================================================================
或将
dim sql,rs
set rs=server.createobject("adodb.recordset")
rs.open "select * from from Ylmv_Cookies",conn,1,3
rs.addnew
rs("Ylmv_CId")=request("id")
rs("Ylmv_CName")=request("n")
rs("Ylmv_CSname")=request("t")
rs("Ylmv_CIp")=request("s")
rs("Ylmv_Csid")=request("s")
rs.update
rs.close
set rs=nothing
conn.close
set conn=nothing
response.write "<script>alert('该报告已发出,我们收到后马上进行处理!');window.close();<