Şimdi Ara

bir page laod da iki datareader

Daha Fazla
Bu Konudaki Kullanıcılar: Daha Az
1 Misafir - 1 Masaüstü
5 sn
3
Cevap
0
Favori
893
Tıklama
Daha Fazla
İstatistik
  • Konu İstatistikleri Yükleniyor
0 oy
Öne Çıkar
Sayfa: 1
Giriş
Mesaj
  • basit bir alışveriş sitesi hazırlıyorum yorum kısmını falan ekledim yalnız yorumu yapanın adının user.identityname ile çektikten sonra resmini de göstermek istiyorum fakat üstte çalışan kod altta çalışmıyor hata verior aşağıda kodalr ve hata var yardımcı olan olursa sevinirim.

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load



    Label5.Text = User.Identity.Name

    ID = Request.QueryString.Get(0)
    TextBox1.Text = Convert.ToString(ID)

    Dim c As New Data.OleDb.OleDbConnection
    c.ConnectionString = "provider=microsoft.jet.oledb.4.0;Data source=" + Server.MapPath("~\app_data\urun.mdb")
    c.Open()

    Dim co As New Data.OleDb.OleDbCommand
    co.Connection = c


    co.CommandText = String.Format("select * from urun ")

    Dim dr As Data.OleDb.OleDbDataReader

    dr = co.ExecuteReader

    Do While dr.Read = True
    If ID = dr(0) Then

    Label2.Text = dr(2)
    Label3.Text = dr(3).ToString
    End If
    Loop


    c.Close()
    Dim cc As New Data.OleDb.OleDbConnection
    cc.ConnectionString = "provider=microsoft.jet.oledb.4.0;Data source=" + Server.MapPath("~\app_data\urun.mdb")

    cc.Open()

    Dim coco As New Data.OleDb.OleDbCommand
    coco.Connection = cc


    coco.CommandText = String.Format("select * from uyeler ")

    Dim drdr As Data.OleDb.OleDbDataReader

    drdr = co.ExecuteReader

    Do While drdr.Read = True
    If User.Identity.Name = dr(1) Then

    Label6.Text = dr(8)

    End If
    Loop
    cc.Close()


    End Sub



    hata:


    line 51:

    line 52: Do While drdr.Read = True

    line 53: If User.Identity.Name = dr(1) Then

    line 54:

    line 55: Label6.Text = dr(8)


     bir page laod da iki datareader







  • yokmu asp.net bilen?
  • sorun çözülmüştür genede sağolun
  • 
Sayfa: 1
- x
Bildirim
mesajınız kopyalandı (ctrl+v) yapıştırmak istediğiniz yere yapıştırabilirsiniz.