字符串分割为数组的简单问题

[MMX1027]

有一颜色串，需要将其放入数组中。
ColorString = "ffdfdf,f8e3c1,fef2c3,fcc3fe,d6fec3,c3f9fe,c3d6fe,edcdfe,eefad1,d7ecf4"

似乎ASP没有类似C语法中的定义数组时即为数组赋值的写法：
dim ColorArray()= ("ffdfdf,f8e3c1,fef2c3,fcc3fe,d6fec3,c3f9fe,c3d6fe,edcdfe,eefad1,d7ecf4")
这样写出错。

用split分割，也出错，说类型不匹配
ColorArray = Split(ColorString, ",")

总之我想把这10个颜色放到数组ColorArray中，怎么写？
不要这样的ColorArray(1)=.. ColorArray(2)=..

请高手指导，谢谢！

[超级大笨狼]

<SCRIPT LANGUAGE=vbs>
ColorString = "ffdfdf,f8e3c1,fef2c3,fcc3fe,d6fec3,c3f9fe,c3d6fe,edcdfe,eefad1,d7ecf4"
ColorArray=split(ColorString,",")
for i=0 to ubound(ColorArray)
document.write ColorArray(i) & "<br>"
next

</SCRIPT>

ColorArray不要事先定义，如果你dim ColorArray()就错了
Microsoft® Visual Basic® Scripting Edition
Split 函数 语言参考
版本 2


请参阅


--------------------------------------------------------------------------------

描述
返回基于 0 的一维数组，其中包含指定数目的子字符串。
语法
Split(expression[, delimiter[, count[, start]]])
Split 函数的语法有以下参数：

参数 描述
expression 必选。字符串表达式，包含子字符串和分隔符。如果 expression 为零长度字符串，Split 返回空数组，即不包含元素和数据的数组。
delimiter 可选。用于标识子字符串界限的字符。如果省略，使用空格 ("") 作为分隔符。如果 delimiter 为零长度字符串，则返回包含整个 expression 字符串的单元素数组。
count 可选。被返回的子字符串数目，-1 指示返回所有子字符串。
compare 可选。指示在计算子字符串时使用的比较类型的数值。有关数值，请参阅“设置”部分。



设置
compare 参数可以有以下值：
常数 值 描述
vbBinaryCompare 0 执行二进制比较。
vbTextCompare 1 执行文本比较。
vbDatabaseCompare 2 执行基于数据库（在此数据库中执行比较）中包含的信息的比较。




--------------------------------------------------------------------------------
© 1997 Microsoft Corporation 版权所有。

[超级大笨狼]

他的反函数

Microsoft® Visual Basic® Scripting Edition
Join 函数 语言参考
版本 2


请参阅


--------------------------------------------------------------------------------

描述
返回一个字符串，此字符串由包含在数组中的许多子字符串联接创建。
语法
Join(list[，delimiter])
Join 函数的语法有以下参数：

参数 描述
list 必选。包含要联接的子字符串一维数组。
delimiter 可选。在返回字符串中用于分隔子字符串的字符。如果省略，将使用空字符 ("")。 如果 delimiter 是零长度字符串，则在同一列表中列出全部项，没有分界符。




--------------------------------------------------------------------------------
© 1997 Microsoft Corporation 版权所有。

[Brookes]

ColorString = "ffdfdf,f8e3c1,fef2c3,fcc3fe,d6fec3,c3f9fe,c3d6fe,edcdfe,eefad1,d7ecf4"
colorArray=split(ColorString,",")

[MMX1027]

楼上的高手，我是这样写的啊，ColorArray = Split(ColorString, ",")
说这行类型不匹配

[anita2li]

你前面有是不是把ColorArray定义成数组了﹖

[quady]

记得VBscript里面好像没有枚举赋值的。
试试
dim ColorArray = Split(ColorString, ",", -1, 1)

[CTBOK]

先dim colorarray
就dim行了，不用加任何东西的，然后
split

[MMX1027]

to anita2li：是的，我在前面有定义 dim ColorArray(10) ，用split分割的出来的不正是数据吗，可以用Ubount来取其最大下标的。

to quady:去掉之前的定义，用你写的 dim ColorArray = Split(ColorString, ",", -1, 1)
提示：语句未结束

[yzwxjun]

顶

[SadEmprie]

<%
ColorString = "ffdfdf,f8e3c1,fef2c3,fcc3fe,d6fec3,c3f9fe,c3d6fe,edcdfe,eefad1,d7ecf4"
colorarray=split(ColorString,",")
for i=0 to ubound(colorarray)
response.write(colorarray(i)&"|")
next
%>
这么写没问题啊，是不是别的地方的代码问题的影响？

[xiaobird1]

不要定义ColorArray为数组。
dim ColorArray
ColorArray = split( ColorString, "," )

这时ColorArray已经是数组了

[007james]

不要定义，直接这样就可以了
ColorArray = split( ColorString, "," )