标题: ASP网页设计二进制毗连函数VBSCRIPT [打印本页] 作者: 飘飘悠悠 时间: 2015-2-16 00:24 标题: ASP网页设计二进制毗连函数VBSCRIPT SQL Server是基于服务器端的中型的数据库,可以适合大容量数据的应用,在功能上管理上也要比Access要强得多。在处理海量数据的效率,后台开发的灵活性,可扩展性等方面强大。vbscript|二进制|函数
Public Function ConvertAsc(strIn)
Dim i
ConvertAsc = ""
For i=1 to Len(strIn)
Dim c: c = Asc(Mid(strIn, i, 1))
If Abs(c)<128 Then
ConvertAsc = ConvertAsc & ChrB(c)
Else
Dim h: h = Hex(c)
ConvertAsc = ConvertAsc & ChrB(Int("&H" & Mid(h, 1, 2)))
ConvertAsc = ConvertAsc & ChrB(Int("&H" & Mid(h, 3, 2)))
End If
Next
End Function
Dim a: a = ConvertAsc("hello world!")
Dim b: b = ConvertAsc("世界你好!")