- Mesajlar
- 1,508
bir arama sayfası yapıyorum querystringden gelen değer yok ise sql sorgusunda o alandaki tüm kayıtlar listelensin istiyorum ama olmadı.Kodlarım aşağıda.
ara.aspx?sinifID=&konuID=5 yada
ara.aspx?sinifID=10&konuID= gibi
SinifID değeri yok ise konuId ye göre tüm kayıtları listelensin ya da tam tersi durumda sınıfa ait tüm kayıtlar listelensin.
Dim c As New OleDbConnection(WebConfigurationManager.ConnectionStrings("database").ConnectionString)
c.Open()
Dim cmd As New OleDbCommand("Select * from materyal where konuID=@konuID and sinif=@sinif", c)
If Request.QueryString("konuID") Is Nothing Then
cmd.Parameters.AddWithValue("@konuID", DBNull.Value)
Else
cmd.Parameters.AddWithValue("@konuID", Request.QueryString("konuID"))
End If
If Request.QueryString("sinif") Is Nothing Then
cmd.Parameters.AddWithValue("@sinif", DBNull.Value)
Else
cmd.Parameters.AddWithValue("@sinif", Request.QueryString("sinif"))
End If
Dim da As New OleDbDataAdapter(cmd)
Dim ds As New DataSet()
da.Fill(ds, "materyal")
GridView1.DataSource = ds
GridView1.DataBind()
c.Close()
ara.aspx?sinifID=&konuID=5 yada
ara.aspx?sinifID=10&konuID= gibi
SinifID değeri yok ise konuId ye göre tüm kayıtları listelensin ya da tam tersi durumda sınıfa ait tüm kayıtlar listelensin.
Dim c As New OleDbConnection(WebConfigurationManager.ConnectionStrings("database").ConnectionString)
c.Open()
Dim cmd As New OleDbCommand("Select * from materyal where konuID=@konuID and sinif=@sinif", c)
If Request.QueryString("konuID") Is Nothing Then
cmd.Parameters.AddWithValue("@konuID", DBNull.Value)
Else
cmd.Parameters.AddWithValue("@konuID", Request.QueryString("konuID"))
End If
If Request.QueryString("sinif") Is Nothing Then
cmd.Parameters.AddWithValue("@sinif", DBNull.Value)
Else
cmd.Parameters.AddWithValue("@sinif", Request.QueryString("sinif"))
End If
Dim da As New OleDbDataAdapter(cmd)
Dim ds As New DataSet()
da.Fill(ds, "materyal")
GridView1.DataSource = ds
GridView1.DataBind()
c.Close()