我有一个 zip 文件,其中包含一个 CSV 文件。
我需要对这个 zip 文件进行 Base64 编码以发送到 eBay(使用他们的 API)。
我使用了这个网站:http ://www.opinionatedgeek.com/DotNet/Tools/Base64Encode/效果很好,我上传了我的 zip 文件,它返回了一个 eBay 喜欢的 base64 编码字符串。
我需要做这个网站做的事情,但是使用经典的 ASP 和 VB 脚本。
我已经有一个 base64 编码函数,来自这里:http ://www.motobit.com/tips/detpg_base64encode/所以我不需要脚本。这个函数需要一个参数,所以我需要把我的 zip 文件变成一个字符串(我认为)传递给这个函数。
我曾尝试使用 ADODB.Stream 和 LoadFromFile 方法,但它返回的字符串在 base64 编码后与自以为是的极客网站中的字符串不匹配,并且不被 eBay 接受。
这是我尝试过的:
Dim objStream, strFileText
Set objStream = Server.CreateObject("ADODB.Stream")
objStream.Type = 1
objStream.Open
objStream.LoadFromFile Server.MapPath("myzipfile.zip")
strFileText = Base64Encode(objStream.Read)
Response.Write strFileText
objStream.Close
Set objStream = Nothing
任何人都可以帮助..?
谢谢!