|
![]() |
名片设计 CorelDRAW Illustrator AuotoCAD Painter 其他软件 Photoshop Fireworks Flash |
|
图3 Config.web文件 <?xml version="1.0" encoding="utf-8" ?> <configuration> <!-- SECURITY This section sets the security policies of the application. Possible modes are "Windows", "Cookie", "Passport" and "None" --> <!-- Use Cookie Authentication for external users --> <security> <authentication mode="Cookie"> <cookie cookie=".PRODAUTH" loginurl="https:// beta.visualstudio.net/Login.aspx" decryptionkey="autogenerate"> <credentials passwordformat="Clear" /> </cookie> </authentication> <authorization> <allow users="*" /> </authorization> </security> </configuration> 图4 认证代码 Public Sub cmdSubmit_Click(ByVal sender As Object, ByVal e As _ System.EventArgs) Dim sUserID As String Dim sPassword As String Dim sAuthCookie As String \\'External user, take the values from the Login form sUserid = system.Convert.ToString(Me.txtUserID.Value) sPassword = system.Convert.ToString(Me.txtPassword.Value) adoRS = oBetaUser.LoginEx(sUserID, sPassword) If adoRS.recordcount = 1 Then \\'login success - get a session adoRS = osSession.GetNewSession _ (adoRS("BetaSiteID").Value.ToString().ToInt32()) If Not adoRS Is Nothing Then If adoRS.Recordcount > 0 Then adoRS.movefirst() \\'Set the authentication cookie using the SID sAuthCookie = adoRS("SID").Value.ToString() \\'use ASP+ authentication to authenticate the user, If Instr(CookieAuthentication.GetRedirectUrl _ (sAuthCookie, True), "default.aspx") > 0 Then CookieAuthentication.SetAuthCookie(sAuthCookie, True) Response.Redirect(system.Convert.ToString( _ oSiteUser.GlobalPath) & "Home.aspx") Else CookieAuthentication.RedirectFromLoginPage( _ sAuthCookie, True) End If Else \\'login failed Response.Redirect("LoginFailed.aspx") End If Else \\'login failed Response.Redirect("LoginFailed.aspx") End If Else \\'login failed Response.Redirect("LoginFailed.aspx") End If End Sub 返回类别: 教程 上一教程: 正则表达式简介(13) 下一教程: 论述Asp与XML之间的关系 您可以阅读与"NET移植案例学习:建造Web站点(6)"相关的教程: · NET移植案例学习:建造Web站点(3) · NET移植案例学习:建造Web站点(4) · NET移植案例学习:建造Web站点(2) · 通过事例学习.net的WebForms技术(一) · 通过事例学习.net的WebForms技术(二) |
![]() ![]() |
快精灵印艺坊 版权所有 |
首页![]() ![]() ![]() ![]() ![]() ![]() ![]() |