PDA

View Full Version : گرفتن نام تمام صفحات در سایت



jamal_ch
سه شنبه 13 اسفند 1392, 09:25 صبح
با سلام خدمت همه دوستان گرامی

میخواستم ببینم میشه نام تمام صفحات موجود در سایتمو در یک ارایه یا لیست ببینم

با تشکر ؟

زبانش فرقی نمیکنه #vb or c

برای ساخت یک login پیشرفته میخوام .
کد زیر تمام فرم های یک برنامه ویندوزی رو نشون میده
وقتی میخواد یک رول تعریف کنه انتخاب کنه که این رو به کدوم صفحات دسترسی داشته باشه
Dim myAssembly As System.Reflection.Assembly = System.Reflection.Assembly.GetExecutingAssembly()
Dim types As Type() = myAssembly.GetTypes()
For Each myType As Object In types

If myType.BaseType.FullName.ToString.ToUpper = "SYSTEM.WINDOWS.FORMS.FORM" Then
' MessageBox.Show(myType.Name)
CheckedListBox1.Items.Add(myType.Name, False)
End If
Next

jamal_ch
سه شنبه 13 اسفند 1392, 10:19 صبح
با سلام خودم پیداش کردم

دوستان اگه کس خواست استفاده کنه

Dim myAssembly As System.Reflection.Assembly = System.Reflection.Assembly.GetExecutingAssembly()
Dim types As Type() = myAssembly.GetTypes()
For Each myType As Object In types
Dim str As String = myType.BaseType.FullName.ToString.ToUpper

' Dim str3 As String = myType.text
If myType.BaseType.FullName.ToString.ToUpper = "SYSTEM.WEB.UI.PAGE" Or myType.BaseType.FullName.ToString.ToUpper = "SYSTEM.WEB.UI.USERCONTROL" Then ' MessageBox.Show(myType.Name)
' CheckedListBox1.Items.Add(myType.Name, False)
CheckBoxList1.Items.Add(myType.Name)

End If
CheckBoxList1.Items.Add(myType.Name)
Next

bitcob589
سه شنبه 13 اسفند 1392, 11:38 صبح
با سلام خودم پیداش کردم

دوستان اگه کس خواست استفاده کنه

Dim myAssembly As System.Reflection.Assembly = System.Reflection.Assembly.GetExecutingAssembly()
Dim types As Type() = myAssembly.GetTypes()
For Each myType As Object In types
Dim str As String = myType.BaseType.FullName.ToString.ToUpper

' Dim str3 As String = myType.text
If myType.BaseType.FullName.ToString.ToUpper = "SYSTEM.WEB.UI.PAGE" Or myType.BaseType.FullName.ToString.ToUpper = "SYSTEM.WEB.UI.USERCONTROL" Then ' MessageBox.Show(myType.Name)
' CheckedListBox1.Items.Add(myType.Name, False)
CheckBoxList1.Items.Add(myType.Name)

End If
CheckBoxList1.Items.Add(myType.Name)
Next
کد بالا بهC#‎‎‎‎‎‎‎‎ تبدیل کردم اما
Nameو
BaseType ناشناخته می داند


System.Reflection.Assembly myAssembly = System.Reflection.Assembly.GetExecutingAssembly();
Type[] types = myAssembly.GetTypes();
foreach (object myType in types)
{
string str = myType.BaseType.FullName.ToString.ToUpper;


// Dim str3 As String = myType.text
// MessageBox.Show(myType.Name)
if (myType.BaseType.FullName.ToString.ToUpper == "SYSTEM.WEB.UI.PAGE" | myType.BaseType.FullName.ToString.ToUpper == "SYSTEM.WEB.UI.USERCONTROL")
{
// CheckedListBox1.Items.Add(myType.Name, False)
CheckBoxList1.Items.Add(myType.Name);


}
CheckBoxList1.Items.Add(myType.Name);
}

چگونه نام تمام صفحات در لیست یا آرایه بدست آوریم