For some reason the result from my query is not binding with the dropdown control..any hint would be appreciated
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
If Not IsPostBack Then
lettingDate()
End If
End Sub
Sub lettingDate()
Dim connectionString As String = ConnectionStrings("ConnectionString").ConnectionString
Dim oOracleConn As OracleConnection = New OracleConnection(connectionString)
Dim strStringBuilder As StringBuilder
strStringBuilder = New StringBuilder
With strStringBuilder
.Append(" select distinct b.datelet ")
.Append(" from bidlet b , letprop l ")
.Append(" where datelet > to_date('12/31/2004','MM/DD/YYYY') ")
.Append(" and datelet < trunc(sysdate) ")
.Append(" and l.letting = b.letting ")
.Append(" AND SUBSTR (l.lcontid, 4, 4) <= '5' ")
.Append(" order by datelet ")
End With
Dim cmdLetting As OracleCommand = New OracleCommand()
cmdLetting.Connection = oOracleConn
cmdLetting.CommandType = CommandType.Text
cmdLetting.CommandText = strStringBuilder.ToString
Dim adLetting As New OracleDataAdapter(cmdLetting)
Dim dsLetting As New DataSet
adLetting.Fill(dsLetting, "LettingDate")
ddLetting.DataSource = dsLetting
ddLetting.DataBind()
End Sub
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
If Not IsPostBack Then
lettingDate()
End If
End Sub
Sub lettingDate()
Dim connectionString As String = ConnectionStrings("ConnectionString").ConnectionString
Dim oOracleConn As OracleConnection = New OracleConnection(connectionString)
Dim strStringBuilder As StringBuilder
strStringBuilder = New StringBuilder
With strStringBuilder
.Append(" select distinct b.datelet ")
.Append(" from bidlet b , letprop l ")
.Append(" where datelet > to_date('12/31/2004','MM/DD/YYYY') ")
.Append(" and datelet < trunc(sysdate) ")
.Append(" and l.letting = b.letting ")
.Append(" AND SUBSTR (l.lcontid, 4, 4) <= '5' ")
.Append(" order by datelet ")
End With
Dim cmdLetting As OracleCommand = New OracleCommand()
cmdLetting.Connection = oOracleConn
cmdLetting.CommandType = CommandType.Text
cmdLetting.CommandText = strStringBuilder.ToString
Dim adLetting As New OracleDataAdapter(cmdLetting)
Dim dsLetting As New DataSet
adLetting.Fill(dsLetting, "LettingDate")
ddLetting.DataSource = dsLetting
ddLetting.DataBind()
End Sub