现在VBSCRIPT的程序员提供了这样一段脚本。但是没见有JS的版本,很是郁闷。是不是没有人做过。100分献给做出来的高手.

伊凡yifan 2005-04-14 04:21:31
Function bytes2BSTR(vIn)
strReturn = ""
For i = 1 To LenB(vIn)
ThisCharCode = AscB(MidB(vIn,i,1))
If ThisCharCode < &H80 Then
strReturn = strReturn & Chr(ThisCharCode)
Else
NextCharCode = AscB(MidB(vIn,i+1,1))
strReturn = strReturn & Chr(CLng(ThisCharCode) * &H100 + CInt(NextCharCode))
i = i + 1
End If
Next
bytes2BSTR = strReturn
End Function
...全文
91 4 打赏 收藏 转发到动态 举报
写回复
用AI写文章
4 条回复
切换为时间正序
请发表友善的回复…
发表回复
Forbes 2005-04-15
  • 打赏
  • 举报
回复
用adodb.stream啊,charset="utf-8"
myvicy 2005-04-14
  • 打赏
  • 举报
回复
直接调用好了。
vivianfdlpw 2005-04-14
  • 打赏
  • 举报
回复
不用翻译成js,js可以直接调用vb函数
ice_berg16 2005-04-14
  • 打赏
  • 举报
回复
JS搞不定,不能对字节进行操作

87,907

社区成员

发帖
与我相关
我的任务
社区描述
Web 开发 JavaScript
社区管理员
  • JavaScript
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧