taov Posted February 17, 2009 at 09:47 PM Report Share #245224 Posted February 17, 2009 at 09:47 PM alguem me pode ajudar , Como é que eu faço, para inserir dados na Base de dados, sem carregar no botao inserir, ou seja, ao abrir um formulário, escrevemos os dados, e ao fazer concluir, guardar, sem carregar em nenhum botao. Obrigado Link to comment Share on other sites More sharing options...
Hellblazer Posted February 18, 2009 at 09:26 AM Report Share #245282 Posted February 18, 2009 at 09:26 AM No evento Page UnLoad inseres como por exemplo assim: Dim strConn = "bla bla bla connection string" Dim objConn As New SqlConnection(strConn) objConn.Open() Dim objcmd As New SqlCommand objcmd.Connection = objConn Dim campo1 As New SqlParameter("@Codigo", OleDbType.VarChar) Dim campo2 As New SqlParameter("@Nome", OleDbType.VarChar) Dim campo3 As New SqlParameter("@Ch1", OleDbType.VarChar) Dim campo4 As New SqlParameter("@Função", OleDbType.VarChar) Dim campo5 As New SqlParameter("@Ch2", OleDbType.VarChar) Dim campo6 As New SqlParameter("@HE", OleDbType.VarChar) objcmd.Parameters.Add(campo1) objcmd.Parameters.Add(campo2) objcmd.Parameters.Add(campo3) objcmd.Parameters.Add(campo4) objcmd.Parameters.Add(campo5) objcmd.Parameters.Add(campo6) objcmd.Parameters(0).Value = textbox1.text objcmd.Parameters(1).Value = textbox2.text objcmd.Parameters(2).Value =textbox3.text objcmd.Parameters(3).Value = textbox4.text objcmd.Parameters(4).Value = textbox5.text objcmd.Parameters(5).Value = textbox6.text objcmd.ExecuteNonQuery() objConn.Close() There are two ways to write error-free programs; only the third one works. Link to comment Share on other sites More sharing options...
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now