<rt id="bn8ez"></rt>
<label id="bn8ez"></label>

  • <span id="bn8ez"></span>

    <label id="bn8ez"><meter id="bn8ez"></meter></label>

    allen
    專注于java ee技術,包括struts,jsf,webwork,spring,hibernate,ibatis
    posts - 7,  comments - 9,  trackbacks - 0

    <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
    <HTML>
    <HEAD>
    <TITLE> New Document </TITLE>
    <META NAME="Generator" CONTENT="EditPlus">
    <META NAME="Author" CONTENT="">
    <META NAME="Keywords" CONTENT="">
    <META NAME="Description" CONTENT="">
    <%@ LANGUAGE="VBScript" %>
    </HEAD>

    <BODY>


    <%
    ?'Declare and assign CAS server variable
    ?Dim casServer
    ?casServer = "localhost:8443/cas"

    ?'Declare additional variables used for redirect
    ?Dim protocol, originatingURL, caseNetworkID

    ?'Determine the protocol for the originitating page
    ?if Request.ServerVariables("HTTPS") = "off" then
    ??protocol = "http"
    ?else
    ??protocol = "https"
    ?end if

    ?'Construct the originatingURL variable based on ServerVariables
    ?'originatingURL = protocol & "://" & Request.ServerVariables("HTTP_HOST") & Request.ServerVariables("URL")
    ?originatingURL = protocol & "://localhost"? & Request.ServerVariables("URL")

    ?'Check to see if the 'ticket' variable was passed via the query string
    ?if Request.QueryString("ticket") = "" then
    ??'If no, then redirect to CAS
    ??Response.Redirect("https://" & casServer & "/login?service=" & originatingURL)
    ?else
    ??'If yes, create MSXML object and attempt to validate the ticket
    ??Dim objSvrHTTP, ticket, casResponse, casResponseArray

    ??ticket = Request.QueryString("ticket")

    ??'Set objSvrHTTP = Server.CreateObject("Msxml2.ServerXMLHTTP")
    ?
    ??Set objSvrHTTP = Server.CreateObject("Msxml2.ServerXMLHTTP.5.0")
    ??
    ??objSvrHTTP.open "GET", "https://" & casServer & "/validate?ticket="+ ticket +"&service=" & originatingURL, false
    ??????? objSvrHTTP.setOption(2) = 13056
    ??objSvrHTTP.send
    ??casResponse = objSvrHTTP.responseText
    ??casResponseArray = Split(casResponse, Chr(10), -1, 1)

    ??if casResponseArray(0) = "no" then
    ???Response.Redirect("https://" & casServer & "/login?service=" & originatingURL)
    ??else
    ???caseNetworkID = casResponseArray(1)
    ???Response.write caseNetworkID
    ??end if
    ?end if
    %>

    ?

    </BODY>
    </HTML>

    posted on 2006-11-15 09:07 robbin163 閱讀(720) 評論(1)  編輯  收藏

    FeedBack:
    # re: asp和sso結合
    2011-09-23 08:45 | 記憶有你
    這段是如何把sso和asp結合的,請告知QQ。 最近在看sso 但是網上的asp的sso比較少 看到您這段 卻沒有明白具體的含義,請即使告知,謝謝qq271882889  回復  更多評論
      

    只有注冊用戶登錄后才能發表評論。


    網站導航:
     

    <2011年9月>
    28293031123
    45678910
    11121314151617
    18192021222324
    2526272829301
    2345678

    常用鏈接

    留言簿(3)

    隨筆分類

    隨筆檔案

    文章分類

    文章檔案

    搜索

    •  

    最新評論

    閱讀排行榜

    評論排行榜

    主站蜘蛛池模板: 99免费精品视频| 人人爽人人爽人人片av免费| 久久成人免费电影| 中文字幕不卡亚洲| 中文字幕在线免费看| 国产成人亚洲精品狼色在线| 一级成人生活片免费看| 狠狠色婷婷狠狠狠亚洲综合| eeuss免费影院| 亚洲成人激情在线| 99热精品在线免费观看| 亚洲激情电影在线| 成人免费视频观看无遮挡| 国产精品亚洲精品青青青| 成人在线视频免费| 色窝窝亚洲av网| 国产日韩成人亚洲丁香婷婷| 波多野结衣免费一区视频| 亚洲尹人九九大色香蕉网站 | 国产亚洲美女精品久久久2020 | 一级做性色a爰片久久毛片免费| 亚洲国产精品狼友中文久久久| 国产黄色免费观看| 久久亚洲AV成人无码软件| 成人片黄网站色大片免费| 羞羞视频免费网站含羞草| 亚洲人成图片小说网站| 8x8x华人永久免费视频| 亚洲精品伦理熟女国产一区二区| 免费在线观看你懂的| 久久精品免费视频观看| 亚洲国产av玩弄放荡人妇| 中文字幕亚洲一区| 在线看片v免费观看视频777| 国产精品亚洲二区在线| 亚洲国产精品无码久久SM| 成人人观看的免费毛片| 你是我的城池营垒免费观看完整版| 亚洲国产精品xo在线观看| 亚洲Av无码乱码在线znlu| 最近中文字幕mv免费高清视频8|