ASP实现检测网站是否备案的小程序

　　你的网站备案了吗？现在做网站可是要到信息产业部网站去备案啊！这是谁都知道的事了！今天用一个小程序来检测网站是否备案，如果备案了则自动转到首页，如果没有备案则提示信息出现。

<%
    Set fso = Server.CreateObject("scripting.filesystemobject")
    If fso.fileexists(server.mappath("cert\bazs.cert")) = True Then
     Response.write("系统检测为已备案站点，正在转向中...")
     Response.Redirect "index.asp"
    Else
     Response.write("系统检测为未备案站点，请尽快备案...")
    End If
    %>

分享到：