الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

اريد كود اعادة توجية الصفحة بحسب مايدخلة المستخدم فى المتصفح

مغلق
بدأه bnitt في 2 فبراير 2008 · 4 رد · 2,040 مشاهدة · في ASP.NET
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

اريد كود لتوجية المتصفح

مثلا لديا مجلد OldSite و مجلد NewSite داخل WebRoot

اريد فى حالة ادخال المستخدم للدومين www.bnitt.com

يتم التوجية الى المجلد OldSite

------------------------------------------------------------------------

فى حالة ادخال www.test.bnitt.com

يتم التوجية الى Newsite

-----------------------------------------------------------

هذة محاولتى لكنها لم تتنفذ ....

Imports System.Object
Partial Class _Default
	Inherits System.Web.UI.Page
	Dim SiteNameURL As New Object
	Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
		SiteNameURL = Request.ServerVariables("SERVER_NAME")
		Select Case SiteNameURL
			Case "www.bnitt.com"
		 Response.Redirect("OldSite/Default.asp")
			Case "www.bnitt.com"
				Response.Redirect("NewSite/Default.aspx")
			   End Select
	End Sub
End Class

هذا كود للتحويل بحسب المدخل فى المتصفح ( الصفحة داخل مجلد WebRoot وداخل مجلد الويب روت توجد المجلدات (NewSite - OldSite

لكن لللأسف لم يتنفذ الى على الدومين الرئيسي لكن فى الSubDomain www.new.bnitt.com .

ارجو المساعدة

#2
 Select Case SiteNameURL
			Case "www.bnitt.com"
		 Response.Redirect("OldSite/Default.asp")
			Case "www.bnitt.com"
				Response.Redirect("NewSite/Default.aspx")
			   End Select

نفس الـ case

joseph.gif

logo.gif

CCNA 640-802

مدونتي

#3

ماذا تقصد نفس case

انا لديا Domain ,Sub Domain

#4
1- Select Case SiteNameURL
2- Case "www.bnitt.com"
3- Response.Redirect("OldSite/Default.asp")
4- Case "www.bnitt.com"
5- Response.Redirect("NewSite/Default.aspx")
6- End Select

اخي الكريم نحن نستخدم الـcase من أجل الخيارات المتعددة يعني في المثال السابق لديك المتحول SiteNameURL لنفرض انه اخذ القيمة النصية التالية www.bnitt.com ودخل بعملية الفحص عند السطر 2 سوف يتم الموافقة عليه وسوف يتم تنفيذ السطر 3 ومن ثم سوف يخرج من select وبهذه الحالة من المستحيل ان نصل إلى السطر 4 وتنفيذ التعليمة عند السطر 5 والسبب ان القيمة النصية المقارنة عند السطر 2 هي نفسها عند السطر 4 .....

 Select Case SiteNameURL
 Case "www.bnitt.com"
	 Response.Redirect("OldSite/Default.asp")
 Case "www.test.bnitt.com" 
	 Response.Redirect("NewSite/Default.aspx")
 End Select

تم تعديل هذه المشاركة بواسطة محمد سماقية في 3 فبراير 2008 في 10:28

-----------------------------------------------------------------------------------------------------------------------------





 

ـــــــــــــــــــــــــــــــــــــــــــــــــــــــــ

Mohammad Sonaiea
 

#5

هل هناك كود vb script يقوم بذلك

هذا الموضوع مغلق.

مواضيع مشابهة

عدد الزوار حالياً

المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية

—الإجمالي—أعضاء مسجّلون—زوار بدون تسجيل

جارٍ التحقق من المتواجدين…