关于格式转换的问题,急!!!!
平时没用过vb,为了简单的用activex控件,选择vb来开发。
现在有个问题是:
我用一个加密解密的控件,对text1可以加密和解密如:
加密
EnvMessage.Content = Text1.Text
Envelopedmessage = EnvMessage.Encrypt
Text2.Text = Envelopedmessage
解密
EnvMessage.Decrypt Text2.Text
msgbox text2.text
但我要加密的是一个文件(如doc),不是text1,怎么办,格式怎么转换?
用inputfilename = "c://1.doc"
Open inputfilename For Input As #1
Input #1, c
Close #1
EnvMessage.Content = c
好像不行,可能要格式转换
问题点数:100、回复次数:4Top
1 楼gang75(*^&^*)回复于 2003-04-01 00:48:13 得分 0
gzTop
2 楼Cooly(☆不做开发很久了......☆)回复于 2003-04-01 13:39:42 得分 0
open inputfilename for binary as #1
然后通过对得到的二进制数组进行处理,得到一个全部由可视字符组成的字符串。
关于二进制与字符串转换的方法较多,如果你对算法不要求很复杂,可以考虑使用ASCII还原的方式或者使用Base64的编码规则,也可以使用Qutoed Printable的编码规则。
Top
3 楼tob(gcc)回复于 2003-04-01 13:47:02 得分 0
TO Cooly(☆回答问题不要分儿☆)
先谢了,能不能给个例子,我急着用这个加密的控件,对vb不是很熟悉Top
4 楼Cooly(☆不做开发很久了......☆)回复于 2003-04-01 14:27:15 得分 100
你查找一下以前的帖子,或者看一下VB版的FAQ.
在VB的网络编程版中有Base64的相应代码。
另外,下面的帖子中有二进制读写文件的代码,二进制数组与字符串转换代码。
http://expert.csdn.net/Expert/topic/1555/1555609.xml?temp=.1675531Top




