[求助]请教一个split的问题

[snower01]

这是我写的一段函数，取的是数据库中的一组数据作为数组。

<%
function fix_name()
set rs=server.createobject("adodb.recordset")
strsql="select fixname from fixture"
rs.open strsql,conn,1,1
fix_num=rs.recordcount
rs.movefirst
for i=1 to fix_num
fix_name1=rs("fixname")&"|"
rs.movenext
next
fix_name=fix_name1
rs.close
set rs=nothing
end function
%>

在另一个文件中我要将fix_name拆开，代码如下：

<!--#include file="conn.asp"-->
<!--#include file="function.asp"-->
<%
set rs=server.createobject("adodb.recordset")
fix=split(fix_name(),"|")
fix_n=ubound(fix)
response.write fix_n
%>

为什么提示是：


Microsoft VBScript 运行时错误 错误 魸a01f5'

非法赋值: 'fix'


/kyz/s/lx.asp，行 5

谢谢！

[叮咚叮咚叮叮咚]

dim fix_name,fix_name1
rs.movefirst
for i=1 to fix_num
fix_name1=fix_name1&"|"&rs("fixname")
rs.movenext
next
fix_name=fix_name1

[snower01]

试试

[snower01]

不行呀！

[alan chen 1315333 qq]

感觉上你是没事找事，本来是个数组你要转换为字符串，然后又把字符串转换为数组。呵呵

[alan chen 1315333 qq]

dim fix_name

set rs=server.createobject("adodb.recordset")
strsql="select fixname from fixture"
rs.open strsql,conn

if not rs.eof then
fix_name=rs.getrows()
end if

rs.close
set rs=nothing

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

for i = 0 to UBound(fix_name,2)
response.write fix_name(i)&"<br>"
next

[Unending]

问题真正所在绝非是你的Split用的不好，而是把一个VBScript的保留函数Fix但变量使用

[snower01]

up

[snower01]

up

[sfar]

for i=0 to fix-1
fix_n=ubound(fix , i )
next

[snower01]

顶一下

[snower01]

up

[commaxsoft]

你能保证你那个函数里从数据库取数据一定行吗？？

=====================================================
在线编辑WORD,EXCEL等OFFICE文档控件的ASP源代码下载地址：
http://www.superoa.net/webofficeforasp.rar
更详细信息访问：http://www.superoa.net
标准COM接口，支持开发语言：VB,VC,C#,ASP,ASP.NET,PHP,JSP,java等
QQ:53928716

[chendongqiang]

for i = 0 to UBound(fix_name,2)-1
response.write fix_name(i)&"<br>"
next

[snower01]

Microsoft VBScript 运行时错误 错误 '800a0009'

下标越界

/kyz/s/l.asp，行 19
即：response.write fix_name(i)&"<br>"