mariozneto

Obrigado!!!! Semana que vem, eu termino uma página com uma impressora matricial da Epson (Lx300), está ficando legal!!! Falow... T+

Não!!! Falow... T+

Sim!! Falow... T+

***mas.. pow... os nomes da txt ta ok... tanto no vb quanto no banco!!! o q póde ser??? Amigo, poste a linha do UpDate para que eu possa ver onde está errado!!! Falow... T+

Obrigado!!!! Falow... T+

OK!! Obrigado!!

Bom dia!!! Ficaria mas facil você baixar os E-Mail pelo OutLook e depois resgatar os Dados pelo Visual Basic. É Apenas uma Idéia!!!! Falow.... T+

Verifiquem que ao ficar navegando na página, haverá necessidade de fazer troca de cartucho!!! Falow... T+

Gostaria de ouvir Criticas e Sugestões sobre esta Página! http://www.mak.com.br/ Obrigado!!! Falow... T+

Eu Gostei do Seu Site Afinal Gosto é Gosto, Eu discordo com a opinião de alguns acima, porque não souberam fazer um elogio se quer !!!! Mas fica aqui minha Opinião!!! Falow... T+

De nada Amigo!!! Precisando é só postar!!! Falow... T+

De nada!!! Precisando é Só Postar!!!! Falow... T+

cristiano tavares, como lhe disse, fica muito dificil para descobrir problemas assim, sem ter o sistema em mãos, infelizmente não terei como lhe ajudar.... Falow... T+

Puxa!! Mesmo você falando o erro que acontece, fica muito dificil para saber, sem ter o sistemas em mãos, Vai ser o melhor jeito mesmo!!!! Fazer uma depuração bem detalhada para ver onde está dando este problema!!! No que mais puder ajudar, estarei a sua disposição!! Falow... T+

Sabia que existe um programa bem facil de usar, para você criar suas próprias fontes ? veja este aqui: http://baixaki.ig.com.br/site/detail1229.htm Espero que este lhe ajude!!! Falow... T+

joaopinheiro, Bom dia!!!! Você já tem um tópico igual a este, criado em Feb 14 2006, 11:09 AM, veja: http://scriptbrasil.com.br/forum/index.php?showtopic=72407 Falow.... T+

Amigo, quando os nomes são grandes, eu lhe aconselho a usar o Modo List para você listar os nomes. Obs: vai aparecer os ícones também, mas em tamanho reduzido!!!! Falow... T+

Amigo você tem que falar um pouco mais de seu problema, tipo: Qual é seu Banco de Dados ???Que tipo de conexão você usa ???Que tipo de Rede você está usando ???Em qual Tela está travando o Sistema ???etc....Assim fica mais facil para lhe ajudar..... Falow... T+

Primeiro vamos criar um Módulo, siga as telas abaixo: 1º Imagem http://img211.imageshack.us/img211/2391/primeira6vu.jpg 2º Imagem http://img76.imageshack.us/img76/2818/segunda6lc.jpg Após ter feito isso, você já tem um módulo, Veja esta função, criada no Form Principal: Private Function nome(valor As String) MsgBox valor End Function Agora veja esta mesma função criada em um Módulo: Public Function nome(valor As String) MsgBox valor End Function Para chamar a função você usa: call nome("Mário") Para variaveis que serão acessadas em um Módulo, ao invés de você usar Dim Var1 As String Dim Var2 As String você vai passar a usar Public Var1 As String Global Var2 As String Espero ter ajudado!!!! Falow... T+

Veja este código: 'Redimensionar Controles do Formulário Private WidDiff As Single Private HeiDiff As Single Private OldFrmWid As Integer Private OldFrmHei As Integer Private Sub Form_Resize() Dim CTL As Control On Error Resume Next If (WidDiff <> 1) Or (HeiDiff <> 1) Then WidDiff = (Form1.Width / OldFrmWid) HeiDiff = (Form1.Height / OldFrmHei) For Each CTL In Controls With CTL .Left = (CTL.Left * WidDiff) .Top = (CTL.Top * HeiDiff) .Width = (CTL.Width * WidDiff) .Height = (CTL.Height * HeiDiff) End With Next CTL OldFrmWid = Form1.Width OldFrmHei = Form1.Height End If OldFrmWid = Form1.Width OldFrmHei = Form1.Height End Sub Este código vai redimensionar todos os controles de seu formulário, Falow... T+

OK!!! Precisando é só Postar.... Falow... T+

na parte da tarde eu já lhe mando um exemplo!!!!! Falow... T+

Não está aparecendo um do Lado do outro ????? Falow... T+

Amigo veja seu Código: ---->>>>Set Item = ListView.ListItems.Add(, , rs("nom_pac"), , 1) Item.ListSubItems.Add , , rs("hora") Item.ListSubItems.Add , , rs("data") Item.ListSubItems.Add , , rs("tel_res") Item.ListSubItems.Add , , rs("tel_rec") Na propriedade: Listview.View = lvwIcon você só podera usar uma linha: Set Item = ListView.ListItems.Add(, , rs("nom_pac"), , 1) Como havia lhe dito, apenas ícones e nome, igual ao ícones do windows... Falow... T+

Ok!!!! Precisando é ó gritar.... Falow... T+