dim xls
xls=request.form("xls")
name=request.form("session('adminname')")

set rs=nothing
set rs=server.createobject("adodb.recordset")
sql="select * from jl"
rs.open sql,conn,1,3
rs.addnew
rs("xls")=xls
rs("name")=name
rs.update
session("xls")=rs("xls")

rs.close
set rs=nothing

错了,帮我看下应当怎么写?

session("xls")=xls
这里更新完成之后直接用xls呢？

[glow=255,blue,2]先祝大家国庆快乐,玩得开心^^[/glow]
xls=request.form("xls")后面加上
if xls<>"" then
session("xls")=rs("xls")
end if

呵呵...

[此贴子已经被作者于2007-9-30 11:34:47编辑过]

dim xls
set rs=server.createobject("adodb.recordset")
rs.open "select * from jl",conn,1,3
rs.addnew
rs("xls")=request.form("xls")
rs("name")=session("adminname")
rs.update
session("xls")=rs("xls")
rs.close
set rs=nothing

name=request.form("session('adminname')")

这是什么呀？

应该是：

name=session("adminname")

LS的眼尖，呵呵

Dim xls
xls = Request.Form("xls")
name = Request.Form("session('adminname')")

Set rs = nothing
Set rs = Server.CreateObject("Adodb.RecordSet")

sql = "SELECT * FROM jl"

rs.Open sql, conn, 1, 3
rs.AddNew
rs("xls") = xls
rs("name") = name
rs.Update

session("xls") = xls

rs.Close
Set rs = Nothing

name = Request.Form("session('adminname')")
这里貌似

name = Request.Form(session("adminname"))

这样写是正确的 name=session("adminname")
感觉这句多余吧! set rs=nothing