I am new to asp.net so any help would appreciated!
What I am try do is show multiple values in the dropdown, once selected it populates the dropdown with a company name and also populates textboxes. He is my code so far.
Sub FIllInsuredDropDownList()
Dim sMasterClaim As String = "Select Company, ID, Company & ' ' & ID as FirstID From TblPolicyTable Order By COmpany"
Dim objComm As New SqlClient.SqlCommand(sMasterClaim, DBConn)
Dim objReader As SqlClient.SqlDataReader = Nothing
DBConn.Open()
objReader = objComm.ExecuteReader
sdaPolicy.SelectCommand = objComm
ddlInsured.DataSource = objReader
ddlInsured.DataTextField = "FirstID"
ddlInsured.DataValueField = "ID"
ddlInsured.DataBind()
DBConn.Close()
End Sub
Private Sub ddlInsured_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ddlInsured.SelectedIndexChanged
DBConn.Open()
Dim sPop As String = "SELECT Company, InsuranceCo, Policy_ID, ID, PolicyNumber FROM TblPolicy WHERE ID LIKE ddlInsured.SelectedItem.Value"
Dim objCommand As New SqlClient.SqlCommand(sPop, DBConn)
sdaPolicy.SelectCommand = objCommand
sdaPolicy.Fill(DsNClaim1)
txtInsCo.DataBind()
txtPolicyID.DataBind()
txtPolicyNumber.DataBind()
DBConn.Close()
End Sub
What I am try do is show multiple values in the dropdown, once selected it populates the dropdown with a company name and also populates textboxes. He is my code so far.
Sub FIllInsuredDropDownList()
Dim sMasterClaim As String = "Select Company, ID, Company & ' ' & ID as FirstID From TblPolicyTable Order By COmpany"
Dim objComm As New SqlClient.SqlCommand(sMasterClaim, DBConn)
Dim objReader As SqlClient.SqlDataReader = Nothing
DBConn.Open()
objReader = objComm.ExecuteReader
sdaPolicy.SelectCommand = objComm
ddlInsured.DataSource = objReader
ddlInsured.DataTextField = "FirstID"
ddlInsured.DataValueField = "ID"
ddlInsured.DataBind()
DBConn.Close()
End Sub
Private Sub ddlInsured_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ddlInsured.SelectedIndexChanged
DBConn.Open()
Dim sPop As String = "SELECT Company, InsuranceCo, Policy_ID, ID, PolicyNumber FROM TblPolicy WHERE ID LIKE ddlInsured.SelectedItem.Value"
Dim objCommand As New SqlClient.SqlCommand(sPop, DBConn)
sdaPolicy.SelectCommand = objCommand
sdaPolicy.Fill(DsNClaim1)
txtInsCo.DataBind()
txtPolicyID.DataBind()
txtPolicyNumber.DataBind()
DBConn.Close()
End Sub