Graymalkin

Você colocou aspas simples para todos os campos... seriam todos eles do tipo texto? Porque se o campo for numérico você não precisa de aspas. Abraços, Graymalkin PS: Movendo para o local correto (Visual Basic).

Já tentou reinstalar o Corel? Se já, e não deu certo, já tentou reinstalar o Windows (do zero, não por cima)? Se ainda assim o caso persistir então pode ser problema de hardware (memória, muito provavelmente). Abraços, Graymalkin

E funcionou legal o seu programa? Aqui não rolou nenhum que utilizasse o OleDb (ou seja, com banco Access). Mas, me parece que não há problemas com o Npg, então vou tentar instalar o PostgreSQL e ver se funciona. Abraços, Graymalkin

O que exatamente você quer fazer? Que tipos de "recursos" seriam estes? Abraços, Graymalkin

Como assim? Você quer em único arquivo ter várias imagens? Abraços, Graymalkin

Aí você vai estar pegando os 17 primeiros *caracteres* e não as palavras. Para tal você poderia usa a função Split() para dividir a string pelo espaço e pegar os 17 primeiros elementos do array criado. Abraços, Graymalkin

Você postou no lugar errado. Estou movendo seu tópico. Agora, em relação a sua dúvida, para DAO você precisaria estar utilizando um BD até o Access 97. Do 2000 em diante você precisa atualizar (sendo que não sei se existe tal atualização para o VB5). O ideal mesmo seria utilizar ADO com o VB6. Abraços, Graymalkin

Se você tivesse utilizado a busca já teria encontrado um tópico sobre a sua dúvida: http://scriptbrasil.com.br/forum/index.php?showtopic=87465 Além disso, existem vários outros tratando da função EnumJobs. É só procurar. <_< Graymalkin

Use a propriedade SubItems do objeto ListItem. Abraços, Graymalkin

Só por curiosidade, qual é o seu modelo? Por falar em um "montão de coisa" eu andei brincando de mexer e trocar o firmware do meu, e realmente dá pra fazer altas paradas! Com certeza! São os melhores! Já tive dois: um Z530i e um K750i e assim que puder vou pegar um K790i. Abraços, Graymalkin PS: Sei que já estou fugindo do assunto principal do tópico... mas é que uma conversa leva a outra... ;) :P

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

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

Bom, fiz um teste e funcionou! :D Usei uma imagem do VMWare que eles disponibilizam. Ela já tem o OpenSUSE com o Mono instalado, então não tive trabalho nenhum. Só baixei o VMWare Player: http://www.vmware.com/download/player/ E a imagem: http://svn.myrealbox.com/mono1.2.3.1_opens...e_0.zip.torrent ou http://svn.myrealbox.com/mono1.2.3.1_opens....2_vmware_0.zip Peguei projetos que *já estavam* compilados no Windows e rodei. Primeiro foi um Hello World simples e depois executei um com forms. Não tive que fazer nada de especial, foi só chamar "mono programa.exe" no terminal. Veja a screenshot do segundo programa que executei: Se você não conhece o VMWare, ele é um software que cria uma máquina virtual completa dentro do seu sistema. Com isso você pode executar um outro sistema operacional (como o Linux) estando no Windows. E isso sem ter que criar uma partição a parte, já que o sistema de arquivos também é emulado. Quanto ao Mono, depois vou tentar rodar um projeto mais complexo nele. Abraços, 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

Onde está esse arquivo? No site da SB ou em algum tópico? De qualquer maneira, esta não seria a seção correta para se perguntar isso. Abraços, Graymalkin

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

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

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.

Sim, e é só você se basear no código do Py.Sendmail para fazer isso. Abraços, Graymalkin

Passe qualquer coisa, já que ele não vai ser utilizado mesmo. Graymalkin

Essas coisas (temas, jogos, etc.) você pode baixar no próprio computador e passar para o celular via Bluetooth (ou cabo USB). Abraços, Graymalkin

Não, que eu saiba é só o contrário, ou seja, usar a Internet do celular no PC (via Bluetooth). O meu post anterior, por exemplo, foi durante a minha conexão via bluetooth do celular. Mas, qual seria a vantagem em se fazer o contrário? :unsure: Abraços, Graymalkin

É só usar substring: string(início:fim). No caso, você primeiro tem que achar onde está o ponto e depois usar esta posição como base. Segue um exemplo: program Teste integer i, posponto character *(12) arquivo arquivo = "arquivo.txt" do i=1, len(arquivo) if (arquivo(i:i) .eq. ".") then posponto = i endif enddo print *, "Arquivo.: ", arquivo print *, "Nome....: ", arquivo(1:posponto-1) print *, "Extensao: ", arquivo(posponto+1:len(arquivo)) end program Teste Certo? ;) Graymalkin

Bom, baixei o exemplo em C e compilei o mesmo, só que não tenho como testar sem ter o dispositivo. Então, estou disponibilizando aqui a versão compilada. Tente executá-la (no prompt) e veja se aparece algo interessante. Se aparecer, então a gente pode tentar dar um jeito de transformar o exemplo em uma DLL que você possa utilizar no VB. Abraços, Graymalkin

Não seria o InnoSetup? Que permite a criação de uma programa de instalação? Se for, então é: http://www.jrsoftware.org/ Abraços, Graymalkin