| http://www.zk168.com.cn 招考学习网 2006-4-30 12:31:27 |
|
| -----------------------------------------------------------[交流]-[打印]-[发送]-[收藏]-- |
在做电子商务站点的时候，经常要求浏览器在https和http之间转化
下面我给出相应的代码：
让一个ASP页面以https开始，请在该ASP页面顶部添加如下代码：
<％
Response.Buffer = True
If (Request.ServerVariables("HTTPS") = "off") Then
Dim xredir__, xqstr__
xredir__ = "https://" & Request.ServerVariables("SERVER_NAME") & _
Request.ServerVariables("SCRIPT_NAME")
xqstr__ = Request.ServerVariables("QUERY_STRING")
if xqstr__ <> "" Then xredir__ = xredir__ & "?" & xqstr__
Response.redirect xredir__
End if
％>
相反的，强迫以Http开始
请添加如下代码
<％
Response.Buffer = True
If (Request.ServerVariables("HTTPS") = "on") Then
Dim xredir__, xqstr__
xredir__ = "http://" & Request.ServerVariables("SERVER_NAME") & _
Request.ServerVariables("SCRIPT_NAME")
xqstr__ = Request.ServerVariables("QUERY_STRING")
if xqstr__ <> "" Then xredir__ = xredir__ & "?" & xqstr__
Response.redirect xredir__
End if
％>
希望能对你有所帮助
|
| -----------------------------------------------------------[交流]-[打印]-[发送]-[收藏]-- |
友情提醒：
1.库中的资料大都来自互联网、网友上传、各类书籍，在录入的过程中难免会出现错误，恳请网
友来信指正！
2.如果网友在本库中未能找到所需要的材料，请登陆到我们的论坛《招考学习网》版块！
3.考友想加入招考学习网的编辑部，请发信到XueXiWang#Gmail.com(#改为@)附带个人简历
4.如需转载请注明出处及作者，谢谢合作！
5.如果您有更好的建议或意见请EMAIL：XueXiWang#Gmail.com (#改为@)
6.凡标题中有注有“[NO]”字样均不含答案且答案整理中.
7.如本库中转载文章涉及版权等问题，请相关网站或作者在两周内发邮件通知(EMAIL： XueXiWang#Gmail.com (#改为@))我们,我们接到通知后立即删除该文章及链接！ |
|
当前位置：
