error از متغیر ;amp&

[maryam_jamshid]

سلام آقای راد

در paging datalist شما یک کدی نوشتید که از متغیر ;amp& در پروژه من ایراد میگیره:


Dim con As New SqlConnection("connstr")
Dim startrec As Integer
If pageno = 1 Then
startrec = 0
Else
startrec = (pageno - 1) * pagesize
End If
Dim da As New SqlDataAdapter("select top " & pagesize & " * from khabar where(id > " & startrec, con)
Dim ds As New DataSet
da.Fill(ds, "table1")

news.DataSource = ds
news.DataBind()

چطوری میتونم این خطا را برطرف کنم؟؟؟

[Behrouz_Rad]

من چنین چیزی ننوشتم. ;amp& ها رو حذف کن.

موفق باشید.

[maryam_jamshid]

یعنی اینطوری ولی باز ایراد میگیره؟
Dim da As New SqlDataAdapter("select top " pagesize " * from khabar where(id >" startrec, con)

[Behrouz_Rad]

نه جانم. شما رشته ها رو به هم نچسبوندی. فکر کردم این مورد رو دیگه میدونی:


Dim da As New SqlDataAdapter("select top " & pagesize & " * from khabar where(id > " & startrec & "", con)

موفق باشید.

[maryam_jamshid]

اقای راد ممنونم مشکل برطرف شد ولی یه مشکله دیگه پیش اومد.
توی دیتالیستم فقط 3تا رکورد رو نمایش میده(در صورتی که من 7 تا رکورد دارم) و نه next ویا previous من نمی بینم چرا ؟؟اینم کدهام:
Public Sub SetTotalPages()
If viewstate("pagecount") Is Nothing Then
strcon = "workstation id=LUS62;packet size=4096;user id=khabar;data source=LUS62;persist security info=True;initial catalog=basejeasated;password=973"
con = New SqlConnection(strcon)

Dim cmd As SqlCommand = New SqlCommand("SELECT Count(*) FROM khabar", con)
con.Open()
Dim reccount As Integer = cmd.ExecuteScalar().ToString()

If reccount Mod pagesize = 0 Then
pagecount = reccount / pagesize
Else
pagecount = CInt(reccount / pagesize) + 1
End If
viewstate("pagecount") = pagecount
con.Close()
Else
pagecount = viewstate("pagecount")
End If
End Sub
Public Sub Bindgrid(ByVal pageno As Integer)
strcon = "workstation id=LUS62;packet size=4096;user id=khabar;data source=LUS62;persist security info=True;initial catalog=basejeasated;password=973"
con = New SqlConnection(strcon)

Dim startrec As Integer
If pageno = 1 Then
startrec = 1
Else
startrec = (pageno - 1) * pagesize
End If
Dim da As New SqlDataAdapter("select top " & pagesize & " * from khabar where(id > " & startrec & ")", con)
Dim ds As New DataSet
da.Fill(ds, "khabar")
news.DataSource = ds
news.DataBind()
End Sub
Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
'Put user code to initialize the page here

If Not Page.IsPostBack Then
viewstate("curpage") = 1
Bindgrid(1)
End If
SetTotalPages()

con.Close()

End Sub

Private Sub news_ItemCommand(ByVal source As Object, ByVal e As System.Web.UI.WebControls.DataListCommandEventArgs ) Handles news.ItemCommand
Dim curpage As Integer
Select Case e.CommandName
Case "prev"
curpage = viewstate("curpage")
If curpage > 1 Then
curpage = curpage - 1
Else
curpage = 1
End If
viewstate("curpage") = curpage
Bindgrid(curpage)

Case "next"
curpage = viewstate("curpage")
If curpage > pagecount Then
curpage = curpage + 1
Else
curpage = pagecount
End If
viewstate("curpage") = curpage
Bindgrid(curpage)

End Select

End Sub

[Behrouz_Rad]

وقتی از تگ [code] برای کدهات استفاده کردی، کدهات رو نگاه می کنم.

موفق باشید.

[maryam_jamshid]

آقای راد بیسوادی منو ببخشید:
من از این لینک شما استفاده کردم و توی برنامم به کار بردم:
http://barnamenevis.org/forum/showthread.php?t=17743&highlight=%D8%B5%D9%81%D8%AD%D9%87+%D8%A8%D9%86%D8 %AF%DB%8C

[Behrouz_Rad]

اون ;amp& که دیدی، مربوط به نسخه ی قدیمی سایت میشد که در هنگام سویچ به نسخه ی جدید، برخی کدها به هم ریختند... اگر به اون تاپیک درست عمل کرده باشی نباید مشکلی داشته باشی.
در هر حال از کنترل ذیل برای Paging استفاده کن:
http://www.codeproject.com/KB/custom-controls/ASPNETPagerControl.aspx

موفق باشید.

[maryam_jamshid]

آقای راد واقعا ببخشید که حسابی اذیتون کردم ،من میخوام از همین کدهای خودتون استفاده کنم ،ببینید من

تمامی کدهاتون توی پروژه ام کپی کردم و فقط نام جدولم رو درست کردم و connection ام رو.
چرا next و prev رو نمایش نمیده؟؟؟؟

("viewstate("pagecount چه کاری انجام میده آخه توی بخش properties دیتالیست وجود نداره،آیا نباید اون رو
تعریف کنم.
ممنون میشم اگه کمکم کنید.

[Behrouz_Rad]

دوست من.
بنده اذیت نمیشم و دوست دارم به شما کمک کنم :) اون مقاله مال سال 83 هست. تمام رکوردها رو با هم در حافظه لود می کنه و باعث کاهش جدید کارایی و حافظه میشه. اون مقاله ای که لینکش رو دادم این مشکل رو نداره. حتماً از اون استفاده کنید چون در هر مرحله، فقط تعداد رکوردهای مورد نیاز رو بازیابی می کنه.

موفق باشید.

[maryam_jamshid]

کدوم لینک؟؟

[Behrouz_Rad]

پست 8 رو ببین :)

[maryam_jamshid]

اگه این لینکه: http://www.codeproject.com/KB/custom...erControl.aspx
من فایلو دانلود کردم ولی نمیتونم چطوری اجراش کنم آخه error میده:
ضمنا من از Vs.net2003 استفاده میکنم. و با کد vb.net مینویسم: لطفا کمکم کنید.

[Behrouz_Rad]

اون کنترل با هر سه نسخه ی دات نت (1.1، 2.0 و 3.5) نوشته شده! برنامه های زیادی هم برای تبدیل کدهای دات نت به هم وجود داره. ضمن اینکه در ASP.NET نیازی نیست که حتی دو صفحه هم از یک زبان استفاده کنند. می تونی یک صفحه یا کنترل رو با VB.NET و صفحه ی دیگه رو با #C بنویسی.
واقعاً بیشتر از این کمکی از دستم بر نمیاد. خودتون هم کمی تلاش بفرمایید.

موفق باشید.

[Amir Taghavi]

من فایلو دانلود کردم ولی نمیتونم چطوری اجراش کنم آخه error میده:

باید تو سایت ثبت نام کنی.


ضمنا من از Vs.net2003 استفاده میکنم.

فکر نمی کنی دیگه وقتشه که update بشی! :)

[maryam_jamshid]

از این خط کد پایین ایراد میگیره:
Protected WithEvents pager1 As CutePager.Pager

ضمنا از دو فایل dll که در پوشه bin قرار داره فقط ASPnetPagerV2Netfx1_1.dll رو میتونم add کنم ولی DEMO_aspnetPagerV2netfx1_1_VB.dll رو نمیتونم add کنم

چرا؟؟؟

[maryam_jamshid]

بالاخره حل شد.
آقای راد از کمکهاتون ممنونم.