ƮҶ԰ϵͳ(p-ye.cn)
汾P_blogV1.0
 
      㻹ΪԼĲͳÿֵ©?㻹Ĳͳ򲻹ȫô?ǵûа,ǽЩ. 
      PblogһAspAccessSqlĲϵͳ.ΪTNTBlogĺ̲Ʒ,Pblogڴ,Ч,,ȫȼ,ܿɲٿԺȨԵȷ涼ԭеĻ,һ¥.
      ƾ߶Ŀ,Pblogļ,,κΰȫ©,ĿǰǵTNTbbsѾ5ʱ,ûгֹκ. 
      ӵ߶߽ĵĵطǾ־,ύκηǷݶᱻ¼,ʾʽ,:ע,վ,ƭ. 
      ܲMD10(MD5)ʹ߼ʹʾ֭õҲ޷ĿǰƽMD5վƽ,˫֤,һݿ֤,һҳ֤,ʹҵݿ,Ҳ޷õҳе,ûϢ洢ڷ,޷ƭ.ȷ̨һʧ.ұע빥ȫķɱ,žһע©. 

      Դƹϵͳ.ʹĲÿյͷ.Ҳǹ׼ȫԶƹĲϵͳ.

ϵͳװ 



  ʹû:piaoyepiaoye ¼ǰ̨,Ȼpiaoye,̨֤piaoye¼̨. Ĭݿַpiaoyemdb/#piaoye.mdb
Աǰ̨޸,̨ӹԱ˺,Ϊǰ̨Ա̨Ա. 
Ҫ޸ĺ̨֤޸.ļΪpiaoyeadmin.asp 

<%
    If Request.QueryString("action")="login" Then
       if request.Form("adminpassword2")="piaoye" Then
        Dim AdminLogin,AdminLogin_OK
        Set AdminLogin=Conn.ExeCute("SELECT mem_PassWord,mem_Name FROM blog_Member WHERE mem_Name='"&memName&"' AND mem_PassWord='"&md5(CheckStr(Request.Form("adminpassword")))&"'")
        SQLQueryNums=SQLQueryNums+1
        If AdminLogin.EOF And AdminLogin.BOF Then
            Session("Admin")=""
        Else
            Session("Admin")=memName
        End if
       End if    
        Set AdminLogin=Nothing
        Response.Redirect("tomadmin.asp")
    End If
Else
    If Request.QueryString("action")="logout" Then
        Session("Admin")=""
        Response.ReDirect("default.asp")
    ElseIf Request.QueryString("action")="database" Then%> 



ʹõͬʱϱ˵Ĳ.ƮҶ԰


κϵQQ412585971     cnxlz@163.com  
