USUÁRIO:      SENHA:        SALVAR LOGIN ?    Adicione o VBWEB na sua lista de favoritos   Fale conosco 

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  Seleção com listview
RAIANE
SUZANO
PS - BRASIL
ENUNCIADA !
Postada em 09/09/2006 12:30 hs            
Olá amigos
Obrigada pela colaboração
Eu fiz os testes com os todos os exemplos que vocês postaram e em ambos apresentou o mesmo erro "invalid file name" erro de nome de arquivo, mas eu chequei várias vezes e o nome do arquivo está correto.
 
De qualquer modo obrigada.
Se alguem tiver alguma solução para este problema agradeço muinto
Um abraço
Raiane
   
ghost_jlp
Pontos: 2843 Pontos: 2843 Pontos: 2843 Pontos: 2843
SÃO PAULO
SP - BRASIL
ENUNCIADA !
Postada em 09/09/2006 14:47 hs            
em qual linha do seu código acontece este erro Raiane?
   
RAIANE
SUZANO
PS - BRASIL
ENUNCIADA !
Postada em 09/09/2006 16:45 hs            
O erro acontece nesta linha
.Action=0
   
RAIANE
SUZANO
PS - BRASIL
ENUNCIADA !
Postada em 09/09/2006 16:49 hs            
op's desculpe
.Action=1
   
RAIANE
SUZANO
PS - BRASIL
ENUNCIADA !
Postada em 09/09/2006 18:58 hs            
Olá eu descobri que estava faltando uma barra antes do nome do arquivo por isso estava dando arquivo inválido. Coloquei a barra, mas agora da erro na fórmula, ele não aceita o IN, OR, Chor, EQV.
   
ghost_jlp
Pontos: 2843 Pontos: 2843 Pontos: 2843 Pontos: 2843
SÃO PAULO
SP - BRASIL
ENUNCIADA !
Postada em 10/09/2006 23:27 hs            
Raianeee :)
 
Testei no meu crystal aqui. É a versão 9. Pelo código vc deve estar usando outra versão né?? Acho q a 8.5 ou a 8. Bom fiz um selection formula no crystal mesmo e deu certo com colchetes usando a cláusula IN. Então, no seu código, no trecho do FOR use assim:
 
strItens = "["
 For i% = 1 To ListViewDetalhes.ListItems.Count - 1
            If ListViewDetalhes.ListItems(i%).Checked Then
                strItens = strItens & "'" & ListViewDetalhes.ListItems(i%).Text & "',"
             End If
        Next i%
        strItens = Left(strItens,Len(strItens)-1) & "])"
 
Se não der certo tire os parênteses externos.
 
Qq problema é só postar tá ok??
 
at+ Emoções
   
Página(s): 3/4     « ANTERIOR    PRÓXIMA »

CyberWEB Network Ltda.    © Copyright 2000-2024   -   Todos os direitos reservados.
Powered by HostingZone - A melhor hospedagem para seu site
Topo da página