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);
}
چگونه نام تمام صفحات در لیست یا آرایه بدست آوریم
vBulletin® v4.2.5, Copyright ©2000-1403, Jelsoft Enterprises Ltd.