Dim myCON As New SqlConnection(System.Web.Configuration.WebConfigurationManager.ConnectionStrings("CS_PDB").ConnectionString)
Dim myCmd As New SqlCommand
Dim mySql As New StringBuilder
mySql.Append("Insert into tblSubSecGulf(subsection,sectionid)values('")
mySql.Append(txtSubSection.Text)
mySql.Append("',")
mySql.Append(ddsectionid.SelectedValue)
mySql.Append(")")
myCON.Open()
myCmd.Connection = myCON
myCmd.CommandText = mySql.ToString
myCmd.ExecuteNonQuery()
myCON.Close()