problemas en insercion de datos

[alfil123]

hola amigos tengo un problema algo grave para mi la verdad que en la pagina que estoy haciendo no puedo insetar datos, bueno si se pueden hacer consultas pero no puedo introducir datos.
el codigo que utilizo es este
Using cnn As New SqlConnection(Me.SqlDataSource1.ConnectionString)
' Usamos el comando Insert del DataSource
Dim cmd As New SqlCommand(Me.SqlDataSource1.InsertCommand, cnn)
' Abrimos la conexión
cnn.Open()
' Añadimos el valor del parámetro de la consulta
cmd.Parameters.AddWithValue("@Correo", txtCorreo.Text)
' La clave la guardaremos como un valor SHA1
Dim clave As String
clave = FormsAuthentication.HashPasswordForStoringInConfig File( _
txtClave.Text, "SHA1")
'clave = generarClaveSHA1(txtClave.Text)
cmd.Parameters.AddWithValue("@Clave", clave)
' La fecha será la actual
txtFecha.Text = DateTime.Now.ToString
cmd.Parameters.AddWithValue("@Fecha", txtFecha.Text)
cmd.Parameters.AddWithValue("@Nombre", txtNombre.Text)
cmd.Parameters.AddWithValue("@Comentarios", txtComentarios.Text)
' Ejecutamos el comando de inserción
cmd.ExecuteNonQuery()
' Al salir del bloque Using se cierra la conexión
End Using
el error me manda en cmd.ExecuteNonQuery(), pero me imagino que algo mal hay en esta linea
Dim cmd As New SqlCommand(Me.SqlDataSource1.InsertCommand, cnn)
, especificamente SqlDataSource1.InsertCommand, como puedo modificar la cadena que va en esta linea para poder introducir datos, puedo hacer consultas como ya lo dige.