24-07-13, 07:53 AM
الصفحات : 1 2
24-07-13, 07:31 PM
هل يوجد هل للمشكلة دى ؟؟
25-07-13, 06:10 AM
تفضلو شباب ده حل المشكلة لى وقفت قدمى
[HTML] Private Sub DataList1_ItemCommand(ByVal source As Object, ByVal e As System.Web.UI.WebControls.DataListCommandEventArgs) Handles DataList1.ItemCommand
Dim lblId As Button = DirectCast(DataList1.Items(e.Item.ItemIndex).FindControl("Button5"), Button)
Label1.Text = lblId.Text
End Sub[/HTML]
[HTML] Private Sub DataList1_ItemCommand(ByVal source As Object, ByVal e As System.Web.UI.WebControls.DataListCommandEventArgs) Handles DataList1.ItemCommand
Dim lblId As Button = DirectCast(DataList1.Items(e.Item.ItemIndex).FindControl("Button5"), Button)
Label1.Text = lblId.Text
End Sub[/HTML]
16-08-13, 12:58 PM
السلام عليكم قومت بعمل الكود التالى
و لكن بتحصل مشكلة هنا
هنا بالضبطpos = adsource.PageCount -1
و ده نص المشكلة لى زهقت منو
Object reference not set to an instance of an object.
كود :
Public Sub databinds()
Dim strConnString As String = ConfigurationManager.ConnectionStrings("ConnectionString").ConnectionString
Dim con As New SqlConnection(strConnString)
If ConnectionState.Open Then con.Close()
con.Open()
dadapter = New SqlDataAdapter("select Impression from Table_Ads", con)
dset = New DataSet()
adsource = New PagedDataSource()
dadapter.Fill(dset)
adsource.DataSource = dset.Tables(0).DefaultView
adsource.PageSize = 18
adsource.AllowPaging = True
adsource.CurrentPageIndex = pos
Button4.Enabled = Not adsource.IsFirstPage
Button3.Enabled = Not adsource.IsFirstPage
Button1.Enabled = Not adsource.IsLastPage
Button2.Enabled = Not adsource.IsLastPage
DataList1.DataSource = adsource
DataList1.DataBind()
End Subكود :
Protected Sub Button4_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Button4.Click
pos = 0
databinds()
End Sub
Protected Sub Button3_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Button3.Click
pos = CInt(Me.ViewState("vs"))
pos -= 1
Me.ViewState("vs") = pos
databinds()
End Sub
Protected Sub Button2_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Button2.Click
pos = CInt(Me.ViewState("vs"))
pos += 1
Me.ViewState("vs") = pos
databinds()
End Sub
Protected Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Button1.Click
pos = adsource.PageCount - 1
databinds()
End Subكود :
Protected Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Button1.Click
pos = adsource.PageCount - 1
databinds()
End Subو ده نص المشكلة لى زهقت منو
Object reference not set to an instance of an object.
16-08-13, 01:34 PM
هو ده الحل
كان المشكلة فى ترتيب الكود
كان المشكلة فى ترتيب الكود
كود :
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
If Not IsPostBack Then
img()
Me.ViewState("vs") = 0
End If
pos = CInt(Me.ViewState("vs"))
databinds()
End Sub12-04-20, 04:33 PM
عندي موقع لعرض المسلسلات و أريد ربط هذا الكود بمسلسل واحد لأنه لمزج بين كل المسلسلات
div class='row'>
<div class='col-md-6' style='text-align: right'/>
<div class='col-md-6' style='text-align: left'> <a class='list_ep btn-color btn-xs' expr:href='data:olderPageUrl' expr:title='data:olderPageTitle' style='height: 36px;line-height: 40px;padding: 0 20px;border-radius: 21px;margin: 0;'> الحلقة السابقة <i class='fa fa-chevron-circle-left'/></a></div>
</div>
div class='row'>
<div class='col-md-6' style='text-align: right'/>
<div class='col-md-6' style='text-align: left'> <a class='list_ep btn-color btn-xs' expr:href='data:olderPageUrl' expr:title='data:olderPageTitle' style='height: 36px;line-height: 40px;padding: 0 20px;border-radius: 21px;margin: 0;'> الحلقة السابقة <i class='fa fa-chevron-circle-left'/></a></div>
</div>
الصفحات : 1 2