Question

求ASP代码翻译

action=request.QueryString("action")
username=request.Cookies("lcg")("username")
select case action
case "userziliao"
set rs=server.CreateObject("adodb.recordset")
rs.open "select * from [user] where username='"&username&"'",conn,1,3
rs("email")=trim(request("email"))
rs("realname")=trim(request("realname"))
rs("sfz")=trim(request("sfz"))
rs("sex")=trim(request("shousex"))
rs("age")=trim(request("age"))
rs("address")=trim(request("address"))
rs("tel")=trim(request("tel"))
rs("youbian")=trim(request("youbian"))
rs("qq")=trim(request("qq"))
rs.updat

Answer 1

action=request.QueryString("action") //接受上一页传递过来的action参数的值
username=request.Cookies("lcg")("username")//接受上一页传递过来的名为lcg和username的Cookies变量的值
select case action //使用select语句进行action条件判断
case "userziliao" //当action值为userziliao时
//创建数据库中表名为user的记录集，这个表主要是存放用户数据的
set rs=server.CreateObject("adodb.recordset")
rs.open "select * from [user] where username='"&username&"'",conn,1,3 //向上一页传递过来的username这个指定用户的数据中添加新的记录
//需要补充的是，这里少了一句: rs.addnew
rs("email")=trim(request("email")) //插入email新记录，过滤空格，下同。
rs("realname")=trim(request("realname"))
rs("sfz")=trim(request("sfz"))
rs("sex")=trim(request("shousex"))
rs("age")=trim(request("age"))
rs("address")=trim(request("address"))
rs("tel")=trim(request("tel"))
rs("youbian")=trim(request("youbian"))
rs("qq")=trim(request("qq"))
rs.updat// 更新记录集， 这里写错了，应该是rs.update
最后如果不需要使用记录集时记得关闭
rs.close
set rs=nothing
conn.close
set conn=nothing
不然消耗系统资源。