VB.NET MYSQL
E AI GALERA BLZ?
SEGUINTE, TO COM DUAS DÚVIDAS.
TO FAZENDO A CONEXÃO COM O MYSQL DA SEGUINTE MANEIRA.
Dim MySqlConnection As MySqlConnection
Me.MySqlConnection = New MySqlConnection([Ô]server=localhost; user id=root; password=fatec; database=Pizzaria[Ô])
Me.MySqlConnection.Open()
AS DÚVIDAS QUE EU TENHO SÃO ESSAS:
1) EU TRABALHAVA ANTES COM O BD SQL SERVER 2005 E USAVA PROCEDURES, AGORA ESTOU COM O MYSQL MAIS NÃO ESTOU CONSEGUINDO CONVERTER AS PROCEDURES. ALGUEM PODE ME AJUDAR? TO MANDANDO UMA PROCEDURE DO SQL DE EXEMPLO.
CREATE PROC SP_I_PIZ_ESTADO
(
@PSIGLA CHAR(2),
@PNOME VARCHAR(30)
)
AS
SET NOCOUNT ON --NAO EXIBE O ROWS AFFECTED APÓS INSERIR
IF LEN(@PSIGLA) = 0
BEGIN
RAISERROR([ô]A SIGLA DO ESTADO é OBRIGATÓRIA[ô],15,1)
RETURN
END
IF LEN(@PNOME) = 0
BEGIN
RAISERROR([ô]O NOME DO ESTADO é OBRIGATÓRIO[ô],15,1)
RETURN
END
IF EXISTS(SELECT EST_CH_SIGLA FROM PIZ_ESTADO WHERE EST_CH_SIGLA = @PSIGLA)
BEGIN
RAISERROR([ô]ESTA SIGLA Jà ESTA CADASTRADA[ô],15,1)
RETURN
END
BEGIN TRAN
INSERT INTO PIZ_ESTADO (EST_CH_SIGLA, EST_ST_NOME)
VALUES (@PSIGLA, @PNOME)
IF @@ERROR <> 0
BEGIN
RAISERROR([ô]OCORREU UM ERRO AO INSERIR O ESTADO[ô],15,1)
ROLLBACK TRAN
END
ELSE
BEGIN
COMMIT TRAN
END
EXEC SP_I_PIZ_ESTADO [ô]SÃO PAULO[ô], [ô]SP[ô]
2) COMO EU FAÇO PRA CHAMAR ESSA PROCEDURE E PASSAR OS DADOS COMO PARAMETRO NO VB.NET?
VLW RAPAZIADA. ABRAÇO AE.
SEGUINTE, TO COM DUAS DÚVIDAS.
TO FAZENDO A CONEXÃO COM O MYSQL DA SEGUINTE MANEIRA.
Dim MySqlConnection As MySqlConnection
Me.MySqlConnection = New MySqlConnection([Ô]server=localhost; user id=root; password=fatec; database=Pizzaria[Ô])
Me.MySqlConnection.Open()
AS DÚVIDAS QUE EU TENHO SÃO ESSAS:
1) EU TRABALHAVA ANTES COM O BD SQL SERVER 2005 E USAVA PROCEDURES, AGORA ESTOU COM O MYSQL MAIS NÃO ESTOU CONSEGUINDO CONVERTER AS PROCEDURES. ALGUEM PODE ME AJUDAR? TO MANDANDO UMA PROCEDURE DO SQL DE EXEMPLO.
CREATE PROC SP_I_PIZ_ESTADO
(
@PSIGLA CHAR(2),
@PNOME VARCHAR(30)
)
AS
SET NOCOUNT ON --NAO EXIBE O ROWS AFFECTED APÓS INSERIR
IF LEN(@PSIGLA) = 0
BEGIN
RAISERROR([ô]A SIGLA DO ESTADO é OBRIGATÓRIA[ô],15,1)
RETURN
END
IF LEN(@PNOME) = 0
BEGIN
RAISERROR([ô]O NOME DO ESTADO é OBRIGATÓRIO[ô],15,1)
RETURN
END
IF EXISTS(SELECT EST_CH_SIGLA FROM PIZ_ESTADO WHERE EST_CH_SIGLA = @PSIGLA)
BEGIN
RAISERROR([ô]ESTA SIGLA Jà ESTA CADASTRADA[ô],15,1)
RETURN
END
BEGIN TRAN
INSERT INTO PIZ_ESTADO (EST_CH_SIGLA, EST_ST_NOME)
VALUES (@PSIGLA, @PNOME)
IF @@ERROR <> 0
BEGIN
RAISERROR([ô]OCORREU UM ERRO AO INSERIR O ESTADO[ô],15,1)
ROLLBACK TRAN
END
ELSE
BEGIN
COMMIT TRAN
END
EXEC SP_I_PIZ_ESTADO [ô]SÃO PAULO[ô], [ô]SP[ô]
2) COMO EU FAÇO PRA CHAMAR ESSA PROCEDURE E PASSAR OS DADOS COMO PARAMETRO NO VB.NET?
VLW RAPAZIADA. ABRAÇO AE.
Dim cmd As New SqlCommand([Ô]exemplo_de_stored_procedure[Ô], sqlcon)
da = New SqlDataAdapter(cmd)
ds = New DataSet
[txt-color=#007100][ô]definindo o parâmetro : nome , tipo , valor [/txt-color]
Dim input As New SqlParameter
With input
.ParameterName = [Ô]@CustomerID[Ô]
.SqlDbType = SqlDbType.NChar
.Value = TextBox1.Text
End With
[txt-color=#007100][ô]definindo o comando : o tipo de parâmetro (entra/saida) e o tipo de comando.[/txt-color]
With cmd
.Parameters.Add(input)
.CommandType = CommandType.StoredProcedure
End With
[txt-color=#007100][ô]preenche o dataset com os dados da sp[/txt-color]
da.Fill(ds, [Ô]exemplo_de_stored_procedure[Ô])
[txt-color=#007100][ô]vincula a tabela gerada ao datagrid[/txt-color]
DataGrid1.DataSource = ds.Tables(0)Fonte: http://www.macoratti.net/vbn_bsql.htm
ALGUEM AI TEM ALGUM EXEMPLO DE CRIAÇÃO DE PROCEDURE NO MYSQL COM IF E ELSE E TALS?
VLW RAPAZIADA.
VLW RAPAZIADA.
Tópico encerrado , respostas não são mais permitidas