<% '---------------------------------------------------- 'http://www.majddesign.com 'info@majddesign.com '---------------------------------------------------- %> login
<% Session("UserLoggedIn") = "" If Request.Form("logine") = "check" Then CheckLogin Else ShowLogin End If %> <% Sub ShowLogin %>

Username:

 

Password:

 

عضویت

       

اقدام برای عضویت در سایت

<% End Sub %> <% Sub CheckLogin if LCase(Request.Form("username")) = "asheghi4u-4141" And LCase(Request.Form("userpwd")) = "brc789" Then Session("UserLoggedIn") = "true" Response.Redirect "http://tanzimekhanevadeh.ir/membership/login/" Else Response.Write("

نام کاربری و یا کلمه عبور شما اشتباه است

") ShowLogin End If End Sub %>

 

این سرویس توسط خدمات موسسه طرح برتر ارئه شده

www.majddesign.com