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开发网
阅读(174)喜欢(0)不喜欢(0)Asp/VBScript