[Help] Obsolete Code

[gian20]

I am getting an error if I change PasswordDeriveByres to Rfc2898DeriveBytes...

Dim password_derive_bytes As New Rfc2898DeriveBytes(password, Nothing, "SHA384", 1000)
        key = password_derive_bytes.GetBytes(key_size_bits \ 8)
        iv = password_derive_bytes.GetBytes(block_size_bits \ 8)

no accessible 'New' accepts this number of arguments...