Try
            Dim conString = ConfigurationManager.ConnectionStrings("liceoConnectionString")
            Dim strConnString As String = conString.ConnectionString
            Using scope As New TransactionScope()
                Using db As New SqlConnection(strConnString)
                    db.Open()
                    Using sqlcmd As New SqlCommand("Insnotizia", db)
                        sqlcmd.CommandType = CommandType.StoredProcedure
                        sqlcmd.Parameters.AddWithValue("@idutente", SqlDbType.Int).Value = CInt(Session.Item(1))
                        sqlcmd.Parameters.AddWithValue("@datanotizia", SqlDbType.Date).Value = CDate(Me.TextBox1.Text)
                        sqlcmd.Parameters.AddWithValue("@notizia", SqlDbType.Text).Value = Me.TextBox2.Text
                        sqlcmd.ExecuteNonQuery()
                    End Using
                End Using
                scope.Complete()
            End Using
        Catch ex As TransactionAbortedException
            Page.RegisterStartupScript("ScriptDescription", "<script type=""text/javascript"">alert('" & ex.Message & "');</script>")
            Return
        Catch ex As SqlException
            Page.RegisterStartupScript("ScriptDescription", "<script type=""text/javascript"">alert('" & ex.Message & "');</script>")
            Return
        Catch ex As Exception
            Page.RegisterStartupScript("ScriptDescription", "<script type=""text/javascript"">alert('" & ex.Message & "');</script>")
            Return
        End Try