Insertar resgistros desde un formulario web a SQL

[emartinezg]

Buenos Dias,

Estoy tratando de insertar registros a una tabla de SQL Server desde un formulario Web, he intentado con el siguiente código pero aun no me funciona.

Agradezco toda la ayuda que puedan prestarme.

Código:

Protected Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim Conexion As New SqlConnection(ConfigurationManager.ConnectionStrings("db_Business_Real_EstateConnectionString").ConnectionString)
        If Conexion.State = ConnectionState.Closed Then Conexion.Open()
        Dim Query As New SqlCommand("INSERT INTO tbl_T_Contacto_SI2_Web (Usuario, Correo, Comentario, Fecha_Contacto) VALUES (@Usuario, @Correo, @Comentario, GETDATE())", Conexion)
        Query.Parameters.Add("@Usuario", SqlDbType.VarChar).Value = TextBox1
        Query.Parameters.Add("@Correo", SqlDbType.VarChar).Value = TextBox2
        Query.Parameters.Add("@Comentario", SqlDbType.VarChar).Value = TextBox3
        Conexion.Close()
        Response.Redirect("Default.aspx")
        
    End Sub

Muchas Gracias por sus comentarios.

[DeivisAndres]

No se mucho de VB.Net pero por que no pones después de Conexion.Close():

cmd.ExecuteScalar() ó Comando.ExecuteNonQuery(), la verdad creo que es uno de los dos, por que en C# utilizo el segundo para ejecutar el SqlCommand creo que para VB es el segundo.

por que no veo por ningún lado que ejecutes el comando. (Prueba con los dos para ver)