Question

asp留言板access数据库连接，急急急 在线等，好的会追加分的

一直都跳转过来都是无法显示
加qq554369881
接收的
<%@language=vbscript%>
<%response.buffer=true%>
<%
dim username,email,qq,subject,content,conn,rs
username=lcase(trim(request("username")))
email=lcase(trim(request("email")))
qq=lcase(trim(request("qq")))
subject=lcase(trim(request("subject")))
content=trim(request("content"))

Set conn = Server.CreateObject("ADODB.Connection")
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("guest.mdb" )
conn.Open connstr
set rs=server.createobject("adodb.recordset")
conn.execute("insert into guest(name,email,qq，subject，content) values('"&uid &"','"&email &"','"&qq&"','"& subject &"','"&content&"') " )
response.write("<div class="STYLE7" id="Layer2">你对我说的话已经收到，我会尽快回复你的！thanks！</div>")

set rs=nothing
set conn=nothing
%>

Answer 1

page1.htm 代码如下

<form action="page2.asp" mothed="post">
<input type="input" name="name">
<input type="input" name="age">
<input type="input" name="sex">
<input type="input" name="email">
<input type="input" name="liuyan">
<input type="submit" name="submit" value="提交">
</form>

page2.asp 代码如下
<%
name =Request.Form("name")
age=Request.Form("age")
sex=Request.Form("sex")
email=Request.Form("email")
liuyan=Request.Form("liuyan")

set Conn=Server.CreateObject("ADODB.Connection")
Conn.open("provider=microsoft.jet.oledb.4.0;data source = "&server.mappath("shujvku001.mdb"))
set rs=Server.CreateObject("ADODB.Recordset")
rs.open"select * from liuyanban" ,conn,1,3
rs.AddNew()
rs ("name")=name
rs("age")=age
rs ("sex")=sex
rs ("email")=email
rs ("liuyan")=liuyan
rs.update
Conn.close
%>

Answer 2

从代码上看，你的uid这个变量值在哪儿？是不是username呢？
还有一点，你插入数据时，有些逗号是中文的。
改成这样：
conn.execute("insert into [guest] (name,email,qq,subject,content) values('"&username&"','"&email &"','"&qq&"','"& subject &"','"&content&"')")
试

Answer 3

具体问题具体解决
吧问题贴出来

追问

主要代码太多了

追答

我的意思是 你把出错误地方贴出来 关键代码