请教怎么将常规的文本能打开的文件转换成ascii码的文件

请问如何将常规的文本能打开的文件转换成ascii码的文件
我要讲我们用记事本能打开的文件，如“2012年1月1日 2.3”转换成ascii，保存成文件。不清楚要怎么做


------解决方案--------------------
你可以定义
type mydata
zonename as string*12
..
end type
如何二进制方式读取，直接put就可以了。