Question

ASP怎样将文本(string)转为字节(byte)数组

如果有懂易语言的就更好了，如何把这句易语言代码转换成ASP代码？其中的“到字节”到底是什么？Asc、AscB还是StrConv？

加入成员 (临时, 到字节 (转换为十进制 (取文本中间 (instr, 计次, 2), 16)))

如果没有懂易语言的，请问在ASP中怎样把文本型字符串转换成字节型数组？或者ASP怎样实现VB中的StrConv函数？

给最高悬赏，希望认真解答！谢谢！

Answer 1

VB的做法：

首先得到这个字符串的个数，将这个字符串分割成单个字符存储到一个数组中，然后将数组转换到另一个数组，得到这个数组的ANSI字符代码即可。下面是实现代码：

Private Sub Command1_Click()
If Text1.Text = "" Then   '判断字符串是否为空
    MsgBox "请输入需要转换的字符串！"
    Exit Sub
End If
Dim a() As String, b() As Integer, x As Integer   '之所以数组b定义为 Integer 数据类型是考虑到汉字
x = Len(Text1.Text)     '得到字符串的字符个数
ReDim a(1 To x), b(1 To x)   '定义数组的上标和下标
For i = 1 To x     '循环x次
    a(i) = Mid(Text1.Text, i, 1)   '得到单个字符
    b(i) = Asc(a(i))               '转换为ANSI码
    Text2.Text = Text2.Text & b(i) & vbCrLf    '输出
Next i
End Sub

Answer 2

/// <summary>
/// 将文本(string)转为字节(byte)数组
/// </summary>
/// <param name="hexString">需要转换的字符串</param>
/// <returns></returns>
public static byte[] StringToHexByteArray(string hexString)
{
if (hexString == null)
{
throw new ArgumentNullException("hexString");
}
if ((hexString.Length % 2) != 0)
{
throw new ArgumentException("Argument fromat error!", "hexString");
}

byte[] returnBytes = new byte[hexString.Length / 2];
for (int i = 0; i < returnBytes.Length; i++)
{
//if(
returnBytes[i] = Convert.ToByte(hexString.Substring(i * 2, 2), 16);

}
return returnBytes;
}

Answer 3

如何将string 转换到 byte字节数组中去??
刚学vb,要求通过串口,telnet和一个嵌入的系统通信
他那边是c写的东西,发字符串过来,我也要发字符串过去

问题是我用vb的string变量收发好象是不行啊,可能要用到字符数组
可问题来拉,我如何做到string和数主的相互转换啊

比如
Dim sz As string
sz = "jknd "
Dim by(1 to 20) As Byte
要求 by(1)的等于sz的第一个字符 by(2)的等于sz的第二个字符等等

在就是反过来:
Dim by(1 to 20) As Byte
数组by每个元素给一个初植后
Dim sz As string
要求 sz 为 "by(1)by(2)..... "

呵呵~,麻烦大家拉

------解决方案--------------------
Private Sub Command1_Click()

Dim strData As String
Dim arrData() As Byte

strData = "hello world "

arrData = strData ' Unicode 编码
arrData = StrConv(strData, vbFromUnicode) ' Ansi 编码

End Sub

------解决方案--------------------
StrConv(字格式转换)
用法：字符串 = StrConv(字符串,功能)

例：
MyStr = StrConv( "千千VBvbVBvb资源中心 ", 1)
MyStr的值为 "千千VBVBVBVB资源中心 "

StrConv的功能：
1 所有英文字转大写
2 所有英文字转小写
3 第一个英文字大写
4 所有半型字转全型字
8 所有全型字转半型字
64 所有Single Code字转成UniCode字
128 所有UniCode字转成Single Code字

※Signle Code→以单一位元组(1Byte/8Bit)作为一个字的处理单位的字码。
※UniCode→由ISO(国际标准组织)订定的标准字码，以两个位元组(2Byte/16Bit)组成一个字，作为一个字处理单位的字码