<%@ Language=VBScript %> <% Dim ToMail,HTTP_HOST_Array,FromMail,MailBody ToMail = "info" FromMail = "info" HTTP_HOST_Array = Split(Request.ServerVariables("HTTP_HOST"),".",-1,1) If UBound(HTTP_HOST_Array) > 0 Then If HTTP_HOST_Array(0) = "www" Then For i = 1 To UBound(HTTP_HOST_Array) - 1 DomainName = DomainName & HTTP_HOST_Array(i) & "." Next DomainName = DomainName & HTTP_HOST_Array(i) Else DomainName = Request.ServerVariables("HTTP_HOST") End If End If FromMail = FromMail & "@" & DomainName ToMail = ToMail & "@" & DomainName MailBody = "" For Each Item In Request.Form MailBody = Item & ": " & Request.Form(Item) & Chr(13) & Chr(10) & MailBody Next On Error Resume Next Set PersitsMail = Server.CreateObject("Persits.MailSender") PersitsMail.Host = "209.81.157.3" PersitsMail.From = FromMail PersitsMail.FromName = "Feed Back From Silwad - Retain" PersitsMail.AddAddress ToMail PersitsMail.AddReplyTo FromMail PersitsMail.Subject = "Feed Back - " & Now PersitsMail.Body = MailBody On Error Resume Next PersitsMail.Send Set PersitsMail = Nothing %> Silwad ---- سلواد


هل لديك مستندات ووثائق عن ارضك المصادرة - هل لديك الرغبة في العودة لارض الاباء والاجداد واسترداد ما سرق - لقد حان الوقت لانهاء محنتك الشخصية ومحنة ابناءك من بعدك. من خلال تسجيل بياناتك ستتوفر لك الفرصة في عرض قضيتك امام محكمة العدل الدولية.
Do you have documents on your confiscated land - do you have the urge of going back home and restore whatever have been stolen - its time to end your personal and family suffering. By registering your details you will have the chance of your bringing your case to the International of Justice.

 

My Confiscated Land

Name :        (private)

Address  : 

List your Documents :