VARIAVEL DO VB COM VALOR DE DADOS DO SQL
Olá!
Eu preciso atribuir a uma variavel do vb uns dados do sql e não consigo.
é assim: No VB, eu vou criar um novo usuario e seleciono o nÃvel dele (administrador, vendedor, caixa) por uma combobox.
No SQL, os dados serão salvos na tabela [Ô]usuario[Ô]. Porém, os niveis de cada usuario nesta tabela estão como uma chave estrangeira da tabela [Ô]niveis[Ô].
Então o nivel do usuario tal vai ser 1,2 ou 3. O 1=administrador, 2=vendedor, 3=caixa, etc.
Eu preciso que, quando, no VB, eu selecionar o nivel [Ô]vendedor[Ô] para um novo usuario, na combobox; no sql, seja registrado o 2, ao inves de [Ô]vendedor[Ô].
Eu estou utilizando esse codigo (que, por sinal, está dando erro):
sql.CommandText = [Ô]select (ni.niveis.id) from dbo.usuarios_niveis as ni where ni.niv_descricao=([ô][Ô] & nivelUsuario.text & [Ô][ô])[Ô]
sql.CommandText = variavel
Alguém poderia me ajudar? D:
Eu preciso atribuir a uma variavel do vb uns dados do sql e não consigo.
é assim: No VB, eu vou criar um novo usuario e seleciono o nÃvel dele (administrador, vendedor, caixa) por uma combobox.
No SQL, os dados serão salvos na tabela [Ô]usuario[Ô]. Porém, os niveis de cada usuario nesta tabela estão como uma chave estrangeira da tabela [Ô]niveis[Ô].
Então o nivel do usuario tal vai ser 1,2 ou 3. O 1=administrador, 2=vendedor, 3=caixa, etc.
Eu preciso que, quando, no VB, eu selecionar o nivel [Ô]vendedor[Ô] para um novo usuario, na combobox; no sql, seja registrado o 2, ao inves de [Ô]vendedor[Ô].
Eu estou utilizando esse codigo (que, por sinal, está dando erro):
sql.CommandText = [Ô]select (ni.niveis.id) from dbo.usuarios_niveis as ni where ni.niv_descricao=([ô][Ô] & nivelUsuario.text & [Ô][ô])[Ô]
sql.CommandText = variavel
Alguém poderia me ajudar? D:
Assim,voce tem que usar um select ou ate mesmo deixar a logica dentro do proprio programa...
com um select case.:
[ô]variavel no topo da classe
Dim _nivel as integer
Select Case ComboBox.Text
Case is [Ô]Administrador[Ô]
_nivel = 1
Case is [Ô]Vendedor[Ô]
_nivel = 2
Case Else
_nivel = 3
End Select
E da um insert no banco com o nivel selecionado.
com um select case.:
[ô]variavel no topo da classe
Dim _nivel as integer
Select Case ComboBox.Text
Case is [Ô]Administrador[Ô]
_nivel = 1
Case is [Ô]Vendedor[Ô]
_nivel = 2
Case Else
_nivel = 3
End Select
E da um insert no banco com o nivel selecionado.
Tópico encerrado , respostas não são mais permitidas