<% dim fs,f set fs=Server.CreateObject("Scripting.FileSystemObject") set f=fs.OpenTextFile("connections.txt",8,true) ligne=Request.ServerVariables("REMOTE_ADDR") & ";" & Request.ServerVariables("SERVER_SOFTWARE") & ";" & date & ";" & time f.WriteLine(Ligne) f.Close set f=Nothing set fs=Nothing 'if Request.ServerVariables("REMOTE_ADDR")="212.234.97.93" then msg="Merci pour votre visite, vous etes le plus probablement a la Plateforme Controle Qualite de Rades" %>

البلدات المجاورة لمدينة مساكن
Contact مقالات البلدات المجاورة لمدينة مساكن Francais English
الكنايس 1
البرجين 2
بني ربيعة 3
بني كلثوم 4
الفرادة 5
الموردين 6
المسعدين 7
سيدي الهاني 7