Criar ARRAY

[-_KIKO_- 0]

Pessoal, meu problema é assim , criei a array e tal..

dai eu tentei aqui e começou a dar erro...

 

script

 

<%linguagem = linguagem & ".ASA,C:\WINDOWS\system32\inetsrv\asp.dll,5,GET,HEAD,POST,TRACEñ"linguagem = linguagem & ".ASAX,C:\WINDOWS\Microsoft.NET\Framework\v1.1.4322\aspnet_isapi.dll,5,GET,HEAD,POST,DEBUGñ"linguagem = linguagem & ".ASCX,C:\WINDOWS\Microsoft.NET\Framework\v1.1.4322\aspnet_isapi.dll,5,GET,HEAD,POST,DEBUGñ"linguagem = linguagem & ".ASHX,C:\WINDOWS\Microsoft.NET\Framework\v1.1.4322\aspnet_isapi.dll,5,GET,HEAD,POST,DEBUGñ"linguagem = linguagem & ".ASMX,C:\WINDOWS\Microsoft.NET\Framework\v1.1.4322\aspnet_isapi.dll,5,GET,HEAD,POST,DEBUGñ"linguagem = linguagem & ".AXD,C:\WINDOWS\Microsoft.NET\Framework\v1.1.4322\aspnet_isapi.dll,5,GET,HEAD,POST,DEBUGñ"linguagem = linguagem & ".CDX,C:\WINDOWS\system32\inetsrv\asp.dll,5,GET,HEAD,POST,TRACEñ"linguagem = linguagem & ".CER,C:\WINDOWS\system32\inetsrv\asp.dll,5,GET,HEAD,POST,TRACEñ"linguagem = linguagem & ".CONFIG,C:\WINDOWS\Microsoft.NET\Framework\v1.1.4322\aspnet_isapi.dll,5,GET,HEAD,POST,DEBUGñ"linguagem = linguagem & ".CS,C:\WINDOWS\Microsoft.NET\Framework\v1.1.4322\aspnet_isapi.dll,5,GET,HEAD,POST,DEBUGñ"linguagem = linguagem & ".IDC,C:\WINDOWS\system32\inetsrv\httpodbc.dll,5,GET,POSTñ"linguagem = linguagem & ".LICX,C:\WINDOWS\Microsoft.NET\Framework\v1.1.4322\aspnet_isapi.dll,5,GET,HEAD,POST,DEBUGñ"linguagem = linguagem & ".REM,C:\WINDOWS\Microsoft.NET\Framework\v1.1.4322\aspnet_isapi.dll,5,GET,HEAD,POST,DEBUGñ"linguagem = linguagem & ".resources,C:\WINDOWS\Microsoft.NET\Framework\v1.1.4322\aspnet_isapi.dll,5,GET,HEAD,POST,DEBUGñ"linguagem = linguagem & ".RESX,C:\WINDOWS\Microsoft.NET\Framework\v1.1.4322\aspnet_isapi.dll,5,GET,HEAD,POST,DEBUGñ"linguagem = linguagem & ".SOAP,C:\WINDOWS\Microsoft.NET\Framework\v1.1.4322\aspnet_isapi.dll,5,GET,HEAD,POST,DEBUGñ"linguagem = linguagem & ".STM,C:\WINDOWS\system32\inetsrv\ssinc.dll,5,GET,POSTñ"linguagem = linguagem & ".VB,C:\WINDOWS\Microsoft.NET\Framework\v1.1.4322\aspnet_isapi.dll,5,GET,HEAD,POST,DEBUGñ"linguagem = linguagem & ".VBPROJ,C:\WINDOWS\Microsoft.NET\Framework\v1.1.4322\aspnet_isapi.dll,5,GET,HEAD,POST,DEBUGñ"linguagem = linguagem & ".VSDISCO,C:\WINDOWS\Microsoft.NET\Framework\v1.1.4322\aspnet_isapi.dll,5,GET,HEAD,POST,DEBUGñ"linguagem = linguagem & ".WEBINFO,C:\WINDOWS\Microsoft.NET\Framework\v1.1.4322\aspnet_isapi.dll,5,GET,HEAD,POST,DEBUGñ"linguagem = linguagem & ".ASPX,C:\WINDOWS\Microsoft.NET\Framework\v1.1.4322\aspnet_isapi.dll,5,GET,HEAD,POST,DEBUGñ"linguagem = linguagem & ".SHTM,C:\WINDOWS\system32\inetsrv\ssinc.dll,5,GET,POSTñ"linguagem = linguagem & ".SHTML,C:\WINDOWS\system32\inetsrv\ssinc.dll,5,GET,POSTñ"linguagem = linguagem & ".ASP,C:\WINDOWS\system32\inetsrv\asp.dll,5,GET,HEAD,POST,TRACEñ"lingua	= split(linguagem,"ñ")Dim valor(Ubound(lingua))for x = 0 to ubound(lingua)	valor(x) =lingua(x)next%>

 

Esse é o erro

Tipo de erro:

Erro de compilação do Microsoft VBScript (0x800A0402)

Constante inteira esperada

/servu/teste.asp, line 29, column 10

Dim valor(Ubound(lingua))

 

 

se eu coloco

 

Dim valor(25) ele vai

mas eu quero desse outro modo! pq n vai ser sempre q vai ser 25....

 

como posso fazer?!

[-_KIKO_- 0]

ConseguiSegredo::Dim valor()Redim valor(ubound(lingua))