<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)

    隨筆分類

    隨筆檔案

    文章分類

    文章檔案

    搜索

    •  

    最新評論

    閱讀排行榜

    評論排行榜

    主站蜘蛛池模板: 免费视频成人片在线观看| 亚洲中文字幕在线无码一区二区| 亚洲AV无码国产剧情| 国产人在线成免费视频| 亚洲一区动漫卡通在线播放| 四虎免费影院ww4164h| 亚洲图片中文字幕| 久久久久av无码免费网| 亚洲第一成年人网站| 免费成人福利视频| 亚洲国产成人久久综合| 免费国产在线观看老王影院| 免费夜色污私人影院网站电影| 亚洲精品一级无码中文字幕| 久久久WWW免费人成精品| 亚洲人成77777在线播放网站| 在线观看肉片AV网站免费| 亚洲第一精品在线视频| 免费黄色福利视频| 亚洲av永久无码精品网址| 国产亚洲精午夜久久久久久| a级大片免费观看| 亚洲成AV人片久久| 日美韩电影免费看| XXX2高清在线观看免费视频| 亚洲国产老鸭窝一区二区三区| 美丽的姑娘免费观看在线播放| 中文字幕乱码亚洲精品一区| 国产精品视频免费一区二区三区| 一级成人a做片免费| 亚洲av丰满熟妇在线播放| 国拍在线精品视频免费观看| MM1313亚洲精品无码久久| 久久久久国产成人精品亚洲午夜| 日本免费一区二区三区四区五六区| 亚洲最大成人网色香蕉| 亚洲国产av无码精品| 18禁美女裸体免费网站| 精品亚洲成a人在线观看| 亚洲国产国产综合一区首页| 国产一级淫片a免费播放口之|