求助啊！！！急急急！-Asp吧-贴吧-asp编程网

当前位置：asp编程网>贴吧>Asp吧> 求助啊！！！急急急！

yunlong151	楼主

发表于 2013-09-07 15:06:07

回顶端　

代码：

If (CStr(Request("MM_insert")) = "form1") Then

MM_LoginAction = Request.ServerVariables("URL")
If Request.QueryString <> "" Then MM_LoginAction = MM_LoginAction + "?" + Server.HTMLEncode(Request.QueryString)
email = CStr(Request.Form("email"))
code = CStr(Request.Form("code"))
name = CStr(Request.Form("name "))

MM_fldUserAuthorization = ""
MM_redirectLoginSuccess = "index.asp"
MM_redirectLoginFailed = "land_err.html"

Dim email,code
Set Rs = Server.CreateObject("Adodb.RecordSet")
Sql = "Select Top 1 email,code From 51_user where email='"&email&"' and code='"&code&"'"
Set Rs = Conn.Execute(Sql)
If Not Rs.EOF Then

Session("MM_Username")=name
response.redirect(MM_redirectLoginSuccess)
else
response.redirect(MM_redirectLoginFailed)
End If
Rs.Close
Set Rs = Nothing
response.end

End If

这是一个登陆界面，登陆后想让网页显示用户的真实姓名，字段为name,怎么做呢

wangsdong	2楼

发表于 2013-09-09 09:05:02

回顶端　

你的真实姓名在数据库的什么地方？
Sql = "Select Top 1 email,code,真实姓名字段 From 51_user where email='"&email&"' and code='"&code&"'" ‘这句中加真实姓名字段

然后在
If Not Rs.EOF Then
下面加上 Session("MM_truename")=Rs("真实姓名")

然后在你想要显示的地方加上<%=Session("MM_truename")%>就行了

yunlong151	3楼

发表于 2013-09-11 09:44:49

回顶端　

已解决谢谢啦！现在遇到新的问题，就是我的一个页面是提取的数据库前最新十个数据的某个字段，我想在点击当前页面的任意一个字段名进到的那个页面显示该字段的记录的详细信息，现在就是显示详细信息那个页面的代码搞不定，能给指点一二吗？

共1页每页20条页次：1/1

首页
上一页
1
下一页
尾页

热门帖子