Problemas no comando Split

Já tentou mudar o separador ao invés de / usar o | ?

ele gera algum número de erro ?

>
Já tentou mudar o separador ao invés de / usar o | ?

Faz alguma diferença? Se fizer me explique por favor...

Xan, o Erro está no Link "Hospedado" que postei

tente colocar o recordset em uma variavel e veja o resultado , tipo

var=RsDetalhes("idaplicacao")

Aplicacao = Split(var,"/")

você esta trabalhando com campos BLOB

Seguinte, se o primeiro valor da variável está vindo com "/"

tente gerar o split depois do "/"

Exemplo

Dim Aplicacao

Aplicacao = mid(Aplicacao,2,len(Aplicacao))

desta forma ele vai ignorar a primeira /

Espero que ajude

Forte Abraço!

>
Bom dia pessoal, estou com uma dúvida muito esquisita e não sei se isso é normal de acontecer...

Espero que seja fácil de resolver.

Seguinte: Uso BD MySQL e estou tendo problemas no comando "Split". Localmente ele aparece corretamente, mas ao hospedar ele da erro.

Localmente

Hospedado

O meu code com problemas é:

<% If RsDetalhes("idaplicacao") <> "" Then
Aplicacao = Split(RsDetalhes("idaplicacao"),"/")
%>

 <div id="aplicacao-detalhe">
 <h3 style="border-top:1px solid #C4E1FF;width:430px;margin:3px 0 5px 0;padding:5px 0 5px 0;">Áreas de Aplicação</h3>
 <ul id="cats-det">
 <%
 For a = 1 To Ubound(Aplicacao)
 SQL7 = "SELECT * FROM aplicacoes WHERE id=" & Aplicacao(a)
 Set RsAplicacoes = conn.Execute(SQL7)

 While Not RsAplicacoes.EOF
 Response.Write("<li><a href='?t=ap&u=" & Unidade & "&cat=" & RsAplicacoes("id") & "'>" & RsAplicacoes("titulo1") & "</a></li>")
 RsAplicacoes.MoveNext
 Wend
 Next
 %>
 </ul>
 </div>
 <% End If %>

E o erro apontado é nessa linha:

Aplicacao = Split(RsDetalhes("idaplicacao"),"/")

Aguardo respostas...

OBS: Meu BD possui dados e está como exemplo assim: /15/19/80/22. Aonde cada número seria o ID da Aplicação.

Tentei as duas sugestões e ambas não deram certo.

Xan, a coluna é tipo BLOB sim. Tem alguma outra sugestão?

tem uma correção da própria microsoft sobre isso,

eu tenho a solução em um dos meus artigos...

preciso achar ele

mas se quiser me mande um email para

xanburzum@terra.com.br

que eu te passo os procedimentos.

Como você não aceita PM, estou lembrando aqui.

Eu enviei o e-mail a você mas não obtive resposta. Meu e-mail é epsylon.xi@gmail.com

No aguardo.

mande novamente com o assunto - fórum

Eu já deixei o e-mail, não sei porque você já não enviou logo de cara, mas enviei de novo.

No aguardo.

O correto aqui

For a = 1 To Ubound(Aplicacao)

seria assim

For a = 0 To Ubound(Aplicacao)

Isso eu já havia corrigido, mas obrigado por apontar

Pelo erro, o problema está no conteúdo do que esta sendo passado para a função split, ou seja: RsDetalhes("idaplicacao")

Tente alterar a condiçao para:

<%
If Not IsNull(RsDetalhes("idaplicacao")) Then
Aplicacao = Split(RsDetalhes("idaplicacao"),"/")
%>

Para confirmar qual o conteudo de RsDetalhes("idaplicacao"), faça um:

<% Response.Write (RsDetalhes("idaplicacao")) %>

Antes da condição.

Espero ter ajudado.