asp将字符串内容转换为2进制数据

　　asp如何将字符串内容转换为2进制数据，要实现字符串到2进制的转换，可以使用adodb.stream对象写入字符串，然后设置stream的type为1，即指定或返回的数据类型为2进制，然后就可以读取2进制数据流了。

　　asp如何将字符串内容转换为2进制数据流源代码如下

function TextToBinary(text)
  dim bindata,stream
  set stream=server.CreateObject("adodb.stream")
  with stream
    .Type=2'返回值text字符串模式
    .Mode=3'readwrite模式
    .Open'打开流
    .Charset="gb2312"'设置编码为gb2312
    .Position=0'设置流初始位置为0
    .WriteText text'写入字符串内容
    .Position=0'重新设置流位置为0，要不流位置处于最后，读不到数据
    .Type=1'设置流返回值类型为2进制
    bindata= .read'读取前面写入的字符串对应的2进制流数据
    .Close'关闭流
  end with
  TextToBinary=bindata
end function
dim text
text="<a href='/'>编程设计网</a>"
response.Write len(text)&"<br/>"'输出44
response.Write lenb(TextToBinary(text))'输出49，因为中文占用2字节

 

加支付宝好友偷能量挖...


原创文章，转载请注明出处：asp将字符串内容转换为2进制数据

评论(0)Web开发网
阅读(490)喜欢(0)Asp/VBScript