yEnc/yDec algorithm (Including Multi-Part)
Author: Anne-Lise Pasch
Version Compatibility: Visual Basic 6, Visual Basic 5
The encoder is 1.1 compliant, the decoder 1.2+ compliant. if you want 1.2 compliant encoding (not all newsgroups support) - you can tweak it a little following the specs on yenc.org.
Enjoy. Can be called thusly: Sub Main() WriteToFile "c:\file.ync", yEncodeFile("c:\calc.exe", 128) Kill "c:\calc.exe" DoEvents yDecodeFile "c:\file.ync" End Sub Me, I've made it a class for my own use because I want to call it async - But as the work's been done its up to you...
Instructions: Copy the declarations and code below and paste directly into your VB project.