旧网站（IIS6+ASP）进行SSL证书使用https访问

一、为什么网站要安装SSL证书

HTTPS加密SSL证书，主要是用于网络浏览器和网络服务器之间的数据加密，传输网站数据比较安全，因此也得到了等各大主流搜索引擎的认可，并且现在算是要求每个站都尽量安装SSL 证书。

另外做微信公众平台开发，目前要求接入HTTPS。

这是个趋势。

二、怎么申请SSL？

1、可以申请免费的SSL证书，但需要注意目前很多免费的SSL证书在360浏览器中都被认为不安全的

可以通过以下途径进行免费证书申请

（1）阿里云（Symantec(赛门铁克)免费SSL），在控制台，选择SSL证书根据要求可以申请，等待审核通过。

一个阿云帐户最多签发20张免费证书。

（2）Let's Encrypt

2、土豪可以申请收费的

三、IIS如何安装SSL证书

（1）

• 开始 -〉运行 -〉MMC；

• 启动控制台程序，选择菜单“文件”中的”添加/删除管理单元”-> “添加”，从“可用的独立管理单元”列表中选择“证书”-> 选择“计算机帐户”；

• 在控制台的左侧显示证书树形列表，选择“个人”->“证书”，右键单击，选择“所有任务”-〉”导入”, 根据”证书导入向导”的提示，导入PFX文件（选择 “根据证书内容自动选择存储区”）。

• 安装过程当中需要输入密码为您当时设置的密码。导入成功后,可以看到证书信息。

( 2 ) IIS下分配服务器证书。

目录安全性--服务器证书找到证书安装

四、IIS下如何进行强制HTTPS加载

1、IIS下新建一个403-4.htm文件进行IIS错误指定

（403.4错误是由于要求SSL而造成的，您必须在要查看的网页的地址中使用"https"。）

或修改C:\WINDOWS\Help\iisHelp\common\403-4.htm 为以下代码

<HTML><HEAD><TITLE>https查看</TITLE>

</HEAD><BODY>

var url = window.location.href;

if (url.indexOf("https") < 0) {

url = url.replace("http:", "https:");

window.location.replace(url);

}

</script>

</BODY></HTML>

2、在IIS6中，站点属性-》目录安全性-》编辑中把“要求安全通道（SSL）”勾选上即可

3、让ASP页面以https开始

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

五、IIS下完成 http的url 301到https的url上

1、完成网站的HTTPS部署后，未来会发现很严峻的问题：百度不收录了
2、百度进行站点的HTTPS认证
要求必须保证全站所有链接都支持HTTPS访问
https替换后要开启重定向（如果未操作会审核失败）
3、重定向方法，可以代码也可以IIS操作
A：将原网站中的主机头修改为qitadengdeng
B：新建一个网站，开启重定向到https://www.eee.com$S$Q 其中$S$Q务必添加，客户端将定向到，把1,3选择打钩

六、调整ECCMS下https启用后后台登录报错

修改inc下文件CheckPost

Public Function CheckPost()
       On Error Resume Next
       Dim server_v1, server_v2
       CheckPost = False
       server_v1 = Replace(LCase(Trim(Request.ServerVariables("HTTP_REFERER"))), "https://", "http://")
       server_v2 = CStr(Request.ServerVariables("SERVER_NAME"))
       If Mid(server_v1, 8, Len(server_v2)) = server_v2 Then
           CheckPost = True
       End If
   End Function

liuyunfan

发布了246 篇原创文章 · 获赞 14 · 访问量 50万+

私信关注

旧网站（IIS6+ASP）进行SSL证书使用https访问

猜你喜欢