Radio + comboBox preenchido condicionalmente em formulario de varias instancias

07/12/2011

Ol� pessoal, depois de muito tentar queimando meu neur�nios resolvi pedir ajuda. Meu problema � o seguinte: tenho um form que precisa (de acordo com a necessidade do cliente) ser aberto uma ou mais vezes(para envio de arquivos - Programa para grafica) at� ai tudo bem:

codigo que utilizo para abrir varias instancias do form 

dim novoF as new envia() 
envia.mdiParent = me 
envia.show()

o prolema � que nesse form tem dois combo que recuperam dados do BD (em MYSQL, via dataset criado via programa��o) de acordo com a escolha (atraves de 3 radios) dos materias que ele deseja para o arquivo que vai enviar. quando retiro o codigo que gera um novo form a cada click tudo funciona blz, mas quando trabalho com varias instancias o form abre e tudo m�s a camada de dados n�o � exposta no combos.

Algu�m ai poderia me dar uma luz de como devo proceder?
S� para esclarecer: Ao usuario clicar no radio que contem a op��o desejada este chama uma fun��o em uma class que preenche o dataset e retorna os valores para o combo com with como abaixo:

chama a fun��o

 Private Sub rdoGF_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles rdoGF.CheckedChanged 
id_tipo = 4
tipo = rdoGF.Text
lsq.getMaterial(id_tipo)

End Sub

---------------------------------------

fun��o na class Shared Function getMaterial(ByVal id_tipo As String) As String

Dim strSql As String = select material, id_material from substratos WHERE id_tipo= + id_tipo + GROUP BY material

Dim cn As New MySqlConnection

Dim ds As New DataSet cn.ConnectionString = linha

Try 

cn.Open() 

Catch ex As MySqlException

MsgBox(Erro ao conectar com o servidor!, Verifique sua conexao com a internet)

End Try

Dim ad As New MySqlDataAdapter(strSql, cn)

ad.Fill(ds, substratos)

Dim dv = New DataView(ds.Tables(substratos))

With envia.cboSubs

.DataSource = ds.Tables(substratos)

.DisplayMember = material

.ValueMember = id_material

End With

cn.Close() 

cn.Dispose()

Return True

End Function

se algu�m puder dar uma luz ai agrade�o. Desculpem a carta. Era pra ficar mais explicado. vlw

[code]

Celio Cantalice

Curtir t�pico + 0

Responder