Verificar Se Existe Algum Item Na Listview

[mestre fyoda]

já resolvi o problema :

Campo.ListItems.Count

agora to com outro, veja aqui em baixo, e do seu codigo do smtp ,

For i = 0 To anexos.ListItems.Count

k.AttachFile anexos.List(i)

Next i

ali em vermelho , como eu faço para selecionar uma listview ?

Editado Março 17, 2007 por mestre fyoda

[Graymalkin]

já resolvi o problema :

Campo.ListItems.Count

agora to com outro, veja aqui em baixo, e do seu codigo do smtp ,

For i = 0 To anexos.ListItems.Count

k.AttachFile anexos.List(i)

Next i

ali em vermelho , como eu faço para selecionar uma listview ?

Use ListItems.Item(i).

Abraços,

Graymalkin

PS: Como você sabia que *eu* iria responder? :P (Você fala ali em cima "do *seu* código do SMTP")

PS2: Editei o título do seu tópico, pra ficar mais claro.

[mestre fyoda]

deu erro,:

Index out of abounds

é que eu tinha visto você responder o meu outro tópico !

Editado Março 17, 2007 por mestre fyoda

[Graymalkin]

ListItems é uma coleção, então o índice começa de 1 e não de 0.

Abraços,

Graymalkin

[mestre fyoda]

tambem não deu certo :

For i = 0 To anexos.ListItems.Count
        k.AttachFile anexos.[color="#FF0000"]ListItems.Item(i)[/color]
    Next i

mesmo erro!

[Graymalkin]

tambem não deu certo :

For i = 0 To anexos.ListItems.Count
        k.AttachFile anexos.[color="#FF0000"]ListItems.Item(i)[/color]
    Next i

mesmo erro!

Olhe qual o valor inicial de i no seu For... <_<

Graymalkin

[mestre fyoda]

agora deu erro :

Unexpected Python Error : exceptions.TypeError: expected string or buffer

For i = 1 To anexos.ListItems.Count
        k.AttachFile anexos.ListItems.Item(i)
    Next i

[Graymalkin]

Isso te retorna um objeto ListItem. Se você quer o texto dele então tem que pedir a propriedade Text do mesmo:

For i = 1 To anexos.ListItems.Count
    k.AttachFile anexos.ListItems.Item(i).Text
Next i

Abraços,

Graymalkin

[mestre fyoda]

agora deu erro aqui :

retorno = k.Send()

Unexpected Python Error : exceptions.IOError:[Errno 2] No such file or directory: u"

[Graymalkin]

Você adicionou algum item sem texto na lista de anexos? Está parecendo que sim. Experimente fazer o teste novamente e tenha certeza de que não está adicionando uma string vazia para a lista de anexos.

Abraços,

Graymalkin

[mestre fyoda]

eu suando assim está em branco !

anexos.ListItems.Item(i).Text

[Graymalkin]

eu suando assim está em branco !

anexos.ListItems.Item(i).Text

Como assim? Você está adicionando na ListView os caminhos completos dos arquivos (c:\pasta\arquivo.ext), certo? Quando você percorre a lista, você consegue ver os itens? Faça um teste aí:

for each arquivo in anexos.ListItems
    msgbox arquivo.Text
next arquivo

Veja se você "vê" o caminho completo do arquivo.

Abraços,

Graymalkin

[mestre fyoda]

Graymalkin não me xinge porfavor :P:) , eu tinha colocado na coluna 2 , por isso tava em branco .

malz ai mano !

nesse caso como seleciono a segunda coluna na ListView , sendo que estou fora do evento dela

Editado Março 18, 2007 por mestre fyoda

[Graymalkin]

Use a propriedade SubItems do objeto ListItem.

Abraços,

Graymalkin