<%
PS1 = request.form("Pass1")
PS2 = request.form("Pass2")
PS3 = request.form("Pass3")
PS4 = request.form("Pass4")
if PS1 <> "" or PS2 <> "" or PS3 <> "" or PS4 <> "" then
dim conn
set conn = Server.CreateObject("ADODB.Connection")
filePath = Server.MapPath("customers.mdb")
conn.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & filePath
sql = "select * from Users where Country_Number = '"& PS1 &"' and City_Number = '"& PS2 &"' and Custome_Numbe = '"& PS3 &"' and User_Number = '"& PS4 &"'"
set rs = conn.Execute(sql)
if rs.EOF then
response.write("
برجاء التاكد من كلمة المرور . في حالة وجود مشكلات برجاء الاتصال بنادي مستخدمي الفا.
")
%>
<%
else
session("Valid_User") = rs("User_Name")
rs.Close
conn.Close
set conn=nothing
end if
response.redirect("index_services.asp")
else
%>
<%
end if
%>
يجمع هذا النادي مستخدمي الفا من جميع الشركات العاملة بهذه البرمجيات بمختلف
أنشطتها و على جميع المستويات الإدارية بها مما يتيح لنا تقديم خدمات عديدة لأعضاء
هذا النادي، منها على سبيل المثال:
الإحاطة بالمميزات الجديدة لبرامج الفا
الاستفادة بأفكار الأعضاء في إضافة مميزات
جديدة للبرامج.
تزويد الأعضاء بمعلومات عن كل جديد في مجال
تكنولوجيا المعلومات.
الأولوية لحضور السمنارات و الندوات التي
تقيمها الشركة.
الاشتراك في المكتبة الخاصة بالشركة لمتابعة
أي تطورات علمية في هذا المجال.
الاستفادة بالخصومات على الأجهزة و البرامج
من الوكلاء المعتمدون.
تسهيل اجراءات زيارة أو الاشتراك في المعارض
الخاصة بهذا المجال سواء داخل مصر أوخارجها.
الاشتراك فى ( Alpha
News)
For more information please contact
Alpha Users Club team Please send your suggetions to alphags@alphags.com
