TripleDES encode-decode in powershell

3DES encrypt-decrypt.ps1

$TDESKEY = 'fhEzg3Svho6nMYPcyCnEJc4qVRTkGY82'

##ENCODE

$password = "Im a password"
$MS = New-Object System.IO.MemoryStream
$keyb = [Convert]::FromBase64String($TDESKEY)
$TD = New-Object System.Security.Cryptography.TripleDESCryptoServiceProvider
$CS = New-Object System.Security.Cryptography.CryptoStream($MS,$TD.CreateEncryptor($keyb, $TD.IV), [System.Security.Cryptography.CryptoStreamMode]::Write)
$Writer = New-Object System.IO.StreamWriter($CS)
$Writer.Write($password)
$Writer.Flush()
$CS.FlushFinalBlock()
#$MS.Seek(0, [System.IO.SeekOrigin]::Begin) > NULL #not sure of its utility
$EncodedText = [Convert]::ToBase64String($MS.ToArray())
$IVS = [Convert]::ToBase64String($TD.IV)
$EncryptedData = "${IVS}:$EncodedText"
$Writer.Dispose()
$EncryptedData


##DECODE

$Data = $EncryptedData.Split(':')
$TD = New-Object System.Security.Cryptography.TripleDESCryptoServiceProvider
$Key = [Convert]::FromBase64String($TDESKEY)
$IV = [Convert]::FromBase64String($Data[0])
$DataByte = [Convert]::FromBase64String($Data[1])
$MS = New-Object System.IO.MemoryStream(,$DataByte) #array of one item must have a preceding coma
$CS = New-Object System.Security.Cryptography.CryptoStream($MS,$TD.CreateDecryptor($Key,$IV), [System.Security.Cryptography.CryptoStreamMode]::Read)
$Reader = New-Object System.IO.StreamReader($CS)
$Result = $Reader.ReadToEnd()
$Reader.Dispose()
$Result

Hi Carol, I'm new to Powershell. This is very helpful! But can I ask how to generate the $TDESKEY ? Appreciate your help!