Graymalkin

O caminho da pasta do MySQL é relativo (..\pasta\blá) ou é absoluto (c:\pasta\blá\)? Pode ser esse o problema no batch. Abraços, Graymalkin

Ah, finalmente! Admin Dedeia... você usou seu charme pra convencer o Binho, é? rsrsrs Realmente uma ótima mudança, que irá contribuir muito para a organização do fórum. Abraços, Graymalkin

No próprio site da Sony Ericsson você encontra o driver e aplicativos para o aparelho. Abraços, Graymalkin

Não existe uma sintaxe para comentar várias linhas, mas você pode fazer isso selecionando o texto (o código) e pressionando CTRL + K + C. Para "descomentar" é só usar CTRL + K + U. Abraços, Graymalkin

Ficaram muito boas estas plaquinhas, parabéns aos criadores. Dessa vez não deu pra eu participar criando, mas já votei na que mais gostei. Abraços, Graymalkin

Se me lembro bem, o problema é em relação a utilização do #data#, no qual o formato da data deve ser MM/dd/yyyy ao invés do nosso dd/MM/yyyy. Ou seja, acho que se usarmos o DateValue() em conjunto com o BETWEEN deve dar certo também - eu é que gosto mais de usar >= e <=. Abraços, Graymalkin

Nas linhas do fopen() a aspa dupla está invertida com o parêntese aberto: fopen"(http://suporte1.teste.com.br/") Veja se é isso. Abraços, Graymalkin

Experimente com uma SQL assim: "SELECT * FROM ow WHERE DateValue(datdesos) >= DateValue('" & d1 & "') AND DateValue(datdesos) <= DateValue('" & d2 & "') AND (codmotos LIKE '" & esprel.Text & "') ORDER BY numos" Na época que usava Access eu sempre usei a função DateValue dentro da SQL para comparação de datas. Veja se dá certo aí. Abraços, Graymalkin

Está parecendo que esse campo que esse seu campo é do tipo texto (string) e não um campo numérico. É esse o caso? Se for, você poderia convertê-lo para inteiro na hora de ordenar com o ORDER BY. Abraços, Graymalkin

Esse código deveria estar no evento KeyDown da caixa de texto e não do controle browser. Isso você pode fazer colocando um atalho no próprio item do menu e vai funcionar automaticamente. Abraços, Graymalkin

No título do tópico você colocou "VB5 para VB6" e no texto já perguntou sobre "VB4 para VB6"... seria o VB4 ou o VB5? Se for o VB5 acho que basta abrir no VB6 e salvar, já que as mudanças entre essas duas versões foram poucas. Agora o mesmo não se pode dizer sobre o VB4, então não sei se é possível fazer essa migração de forma fácil. Abraços, Graymalkin

Na verdade creio que você esteja indo por um caminho certo. Só vale lembrar que as expressões nos parênteses mais internos são resolvidas primeiro, então creio que o ideal seria primeiro separá-las. Em relação a resolver os cálculos vai ser uma simples questão de somar dois termos se o operador for "+", subtrair se for "-", e assim por diante. Por isso que tendo tudo separado fica mais fácil. Abraços, Graymalkin

O que você quer fazer exatamente? Abraços, Graymalkin

Parabéns pelo novo cargo, Andréia! Ah, se desse pra colocar uma plaquinha só pra você eu faria com o dizer "Administrador*a*" na cor lilás-roxo-malva-e-rosa (que na minha opinião também é tudo a mesma coisa! rsrsrs). Abraços, Graymalkin

Para imprimir numa matricial o ideal é abrir a porta (LPT1) como se fosse um arquivo texto. Veja um exemplo que irá imprimir todos os itens de uma Listbox: n = FreeFile() Open "LPT1:" For Output As #n For i = 0 To List1.ListCount - 1 Print #n, List1.List(i) Next Close #n Certo? ;) Graymalkin

Como fazer essas alterações realmente eu não sei, mas já instalei um driver novo da câmera no meu antigo K750i, por isso recomendo dar uma olhada nos seguintes fóruns/sites: http://forums.se-nse.net/ http://www.esato.com/ http://www.topsony.com/ Nesses três sites você encontra tudo (para Sony Ericsson) que possa imaginar. Abraços, Graymalkin

O Excel aqui não faz essa "soma"... :unsure: Como o kuroi sugeriu você pode usar o Mid() para quebrar a string, fazer a conta e depois remontá-la, sendo que, como ele disse, isso só vai valer realmente se esta seguir um padrão. Veja um exemplo: alfanumérico = "1A000020" somar = 10 pos_alfa = InStr(1, alfanumérico, "A") alfa = Mid(alfanumérico, 1, pos_alfa) número = Mid(alfanumérico, pos_alfa + 1, Len(alfanumérico) - posalfa) novonúmero = Format(Val(número) + somar, String(Len(número), "0")) nalfanumérico = alfa & novonúmero MsgBox nalfanumérico Repare ali que estou procurando especificamente pela letra "A" e que o valor será somado ao valor que vem depois da letra. Abraços, Graymalkin

Você pode usar a função Replace() para isso. Exemplo: texto = "um teste e mais outro teste" texto2 = Replace(texto, "mais", "") MsgBox texto2 Abraços, Graymalkin

Defina a propriedade Format do estilo do modelo de célula da coluna para o formato desejado, exemplo: col.CellTemplate.Style.Format = "dd/MM/yyyy" Onde "col" é uma coluna da DataGridView. Abraços, Graymalkin

Experimente instalar a impressora como "Genérico/Somente Texto", mas não sei se vai realmente dar certo. Se fosse uma aplicação local bastaria gravar em um arquivo texto e depois mandar copiar esse arquivo para a LPT1 (ou qualquer que fosse a porta). Abraços, Graymalkin

A ListBox tem uma propriedade Items onde estão todos os seus itens; basta percorrê-la usando o foreach. Abraços, Graymalkin

Talvez o Winrar e o Winzip até aceitem parâmetros por linha de comando, mas fica mais prático usar uma biblioteca que compacte os arquivos diretamente a partir do seu aplicativo, sem necessitar de aplicativos externos, não acha? Então, dê uma olhada nessa aqui: http://www.codeplex.com/DotNetZip Abraços, Graymalkin

Tem várias coisas erradas: 1) tem dois "início_para" mas não tem nenhum "fim_para"; 2) em "ler(notas[1])" no lugar de "1" não deveria ser "i"?; 3) falta o cálculo de "calc_media"; 4) em "se notas > calc_media" não deveria ser "se notas > calc_media"?; 5) e falta mostrar os valores de "calc_media" e "contador"; Certo? ;) Abraços, Graymalkin

É, talvez seja preciso dar permissão aos assemblies para que eles sejam executados numa unidade de rede. Eu costumo fazer um batch pra isso, bastando executá-lo apenas uma vez em cada estação. O conteúdo seria o seguinte: C:\Windows\Microsoft.net\framework\v2.0.50727\caspol -machine -addgroup All_Code -url file://Servidor/Pasta/* FullTrust -name Programa_Code_Group -description "Programa v1.0" Onde você tem que trocar o "Servidor/Pasta" pelo nome do seu servidor e da sua pasta compartilhada, além das palavra "Programa" pelo nome do seu programa. Bom, veja se dá certo aí. Abraços, Graymalkin

Dê uma procurada sobre MAPI aqui mesmo no fórum. Abraços, Graymalkin