Protected Sub ListBox1_SelectedIndexChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles ListBox1.SelectedIndexChanged Session("CurrentList") = ListBox1.SelectedValue Dim sql As String sql = "SELECT list_members.list_id, list_members.personid, " sql += " list_members.persontag, maillist.lname, " sql += " maillist.fname + maillist.middle + maillist.lname + maillist.suffix + ', ' + maillist.company AS name" sql += " FROM list_members " sql += " LEFT JOIN maillist ON list_members.personID = maillist.personID " sql += " WHERE list_members.list_id =" & Session("CurrentList").ToString sql += " ORDER BY lname" SqlDataSource3.SelectCommand = sql lblOwner.Text = ListBox1.SelectedValue End SubThe user makes a choice in Listbox1 that controls the contents of Listbox3 via the above code. (Note the reset of the SelectCommand.) So I really don't need to return a value from the new record. I just need to make sure its included in the selection set.
>> Protected Sub cmdAdd_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles cmdAdd.Click >> Dim sql As String = "INSERT into list_members (list_ID, personID) VALUES " >> sql += "(" & Session("CurrentList").ToString & "," & ListBox2.SelectedValue.ToString & ")" >> SqlDataSource3.InsertCommand = sql >> SqlDataSource3.Insert() >> SqlDataSource3.Select(DataSourceSelectArguments.Empty) >> ListBox3.DataBind() >> lblOwner.Text = sql >> End Sub >>>>
>>>> Protected Sub cmdAdd_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles cmdAdd.Click >>>> Dim sql As String = "INSERT into list_members (list_ID, personID) VALUES " >>>> sql += "(" & Session("CurrentList").ToString & "," & ListBox2.SelectedValue.ToString & ")" >>>> SqlDataSource3.InsertCommand = sql >>>> SqlDataSource3.Insert() >>>> SqlDataSource3.Select() ' This line presents an error and may not belong >>>> ListBox3.DataBind() >>>> End Sub >>>>>>>>