<%
Language = "VBScript"
Response.Buffer = True
Dim objXMLHTTP, xml
sPath = Request.QueryString
sUrl = "http://linkwizard.net/lwn/code.aspx?user_id=438&site_id=463&remote_addr="+Server.URLEncode(Request.ServerVariables("HTTP_HOST") + Request.ServerVariables("URL"))
' Create an xmlhttp object:
Set xml = Server.CreateObject("Microsoft.XMLHTTP")
' Or, for version 3.0 of XMLHTTP, use:
' Set xml = Server.CreateObject("MSXML2.ServerXMLHTTP")
xml.Open "GET", sUrl, False
xml.Send
Response.Write xml.responseText
Set xml = Nothing
%>
أستمتع
بأسبوع كامل فى مصر
اليوم الأول: أستقبال و تسكين
فى فندق + عشاء على نيل كروز فى المساء
اليوم الثانى: زيارة الهرم و
المتحف المصرى فى الصباح + جولة حرة فى سيتى ستارز مول فى المساء
اليوم الثالث: يوم حر فى مدينة
الأنتاج الأعلامى و الماجيك لاند + السفر الى الغردقة فى المساء
اليوم الرابع: الوصول الى
الغردقة و التسكين فى الفندق + جولات حرة فى المساء
اليوم الخامس و السادس: يوم حر
فى الغردقة لممارسة الألعاب المائية
اليوم السابع: الخروج من الفندق
و العودة الى القاهرة
