根据用户名写入数据

[shortppsy]

user=trim(request.form("user"))
用户名在数据库内的字段为 "nicheng"

在写入数据库的时候，不知道该用怎么样的查询语句
我这样写是错误的
sql1="select * from member where nicheng="&??????&" order by id desc"

哪位朋友会的，请给个列子，全面点好吗？
我不是很熟悉ASP，谢谢大家了~

[haver.G]

sql1="select * from member where nicheng='"&??????&"' order by id desc"
加上单引号就好了.

[yanxunet]

sql1="select * from member where nicheng="& user &" order by id desc"

[yanxunet]

sql1="select * from member where nicheng='"& user &"' order by id desc"
刚刚错了，

[shortppsy]

谢谢楼上的几位，顺便帮我看下面这段有什么问题好吗？
马上就搞完收工了.

提示 ：rs1.open sql1,Conn1,1,3 有问题 缺少对象: ''
<%
dim sql1
dim sql
dim rs1
dim rs
dim sn
dim password
dim access


sn=trim(request.Form("txtsn"))
password=(trim(Request.Form("txtpwd")))

%>

<!--#include file="conn1.asp"-->
<%
us=trim(request.form("us"))
a=(len(password))
b=(len(sn))
sql="select * from main "
rs.open sql,conn,1,1
if not(rs.bof and rs.eof) then
if password=rs("pwd") and sn=rs("sn") and a=8 and b=8 then
rs.close
conn.close
set rs=nothing
set conn=nothing
id=request.QueryString("id")
SQL1="DBQ="+server.mappath("admin/Shopmember/member.asp")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
set conn1=server.createobject("ADODB.CONNECTION")
Conn1.open SQL1

sql1=sql1="select * from member where nicheng='"& us &"' order by id desc"
rs1.open sql1,Conn1,1,3
rs1("nowmoney")=rs1("nowmoney")+cdbl("20")
rs1("total")=rs1("total")+cdbl("20")
rs1.update
rs1.close

response.write("冲值成功")
else
call Error
end if
else
call Error()
end if
rs.close
conn.close
set rs=nothing
set conn=nothing
%>

<%sub Error() %>
<script language="JavaScript">
alert(' 冲值失败,请检查您的卡号与密码是否正确!')
window.history.go(-1);
</script>
<%end sub%>

[IT_Fish]

你确认下定义的数据库连接是conn1还是conn

[shortppsy]

创建了两个数据库连接
一个包括在conn1.asp里
一个在页面里

[haver.G]

在前面加一句Set rs1 = Server.CreateObject("Adodb.recordset")

[haver.G]

晕倒,你的代码...rs1,conn1,sql1.....哈哈..:)

[shortppsy]

Set rs1 = Server.CreateObject("Adodb.recordset")
这句已经加了

现在是该页无法显示

[caobin518]

你写的代码不规范．

你那长的代码我没有看，你查一下是否有类似的语句：

set conn=server.createobject("adodb.connection")
set rs=server.createoject("adodb.recordset")

[shine2000]

Conn1.open SQL1
sql1=sql1="select * from member where nicheng='"& us &"' order by id desc"
?