PiGmEu

Seria isso mesmo Guest Abraços, William Rodrigues Isso ae! []´s!

Will Will deixa uma pessoa ver você mandando BEIJOS bem grifados pra você ver... tu morre! eheheehhe []´s! PS.. Parabens por passar na Facul Will!!

como assim brother.. não entendi.. []´s

e qual é o erro q ele da? veerifique se os indicies na sua tabela estao corretos... []´s

se for o q eu to pensando é simples no evento click do seu ListBox você faz a inclusao no banco de dados Insert Into tb_tabela(campo)Values('" & List1.Text & "') e pronto.. ele vai adicionar o campo q você selecionou na tabela []´s

tem sim brother.. você pode fazer assim: Select * from tabela Where Left(campoRegistro,2) = '04' And Right(campoRegistro, 3) = '021' ele vai particionar e listar tudo pra você q comece com 04 e termina com 021 []´s

tente fazer o seguinte: Tirar os acentos do nome dos campos no banco de dados; altere: rs.Open "SELECT * FROM senha WHERE Usuário='" & user & "'" And senha = '" & pass & " '", cn, adOpenDynamic, adLockOptimistic PARA rs.Open "SELECT * FROM senha WHERE Usuário='" & user & "'" And senha = '" & pass & " '", cn, adOpenKeyset faca esse teste

Sandra... 2 topics iguais tb não não é?... http://scriptbrasil.com.br/forum/index.php?showtopic=43121 aki a resposta

Tenta fazer um DataGrid1.ReBind

Tem certeza q o tipo de campo do seu banco de dados é um campo Binario(Sim/não) ? Bom cara.. posta seu codigo ae pra gente dar uma olhada... porque é impossivel... []´s

o q você pode fazer é o seguinte.. faca no evento clique do seu MothView uma busca pelo mes.. exemplo "Select * from tarefas Where mes = '" & MothView.Mouth & "' []´s * Corrigindo q escrevi Comando ou invés de Evento!

pode acessar tb www.msdnbrasil.com.br []´s

Bom.. o True e False deveria funcionar... tente usar Campo = Verdadeiro ou Campo = Falso na sua string []´s

Olá Sandra Acho q com esse Tutorial aki você pode tirar todas suas duvidas sobre DBGrid, pois acho q esta bem Completinhu http://www.macoratti.net/vb_dbgt2.htm Abracos

Bom.. acho q aki não seria o lugar Ideal para a sua pergunta.. o Pessoal do Forum de Windows pode t explicar melhor Link: http://scriptbrasil.com.br/forum/index.php?showforum=13 []´s Obs.. para você ter os 2 Sistemas.. você precisa instalar primeiro o 98 e depois instalar o XP. para q ele de o DUAL Boot.

Bom.. esse erro acontece quando você vai executar um programa em um PC e o mesmo não tem as DLL´s necessarias... No seu caso verifique se na maquina q está rodando o seu sistema possuia todas as DLL´s e OCX´s necessarias []´s

de um Select na tabela : Select * from tabela depois verifique se ela retornou EOF(End Of File).. If tabela.EOF = true 'aki sua funcao end if

humm.. você quer no estilo "ARVORE"(uma sub pasta amarrada com outra) ??

Que erro ele esta retornando pra vc? []´s

Você pode estar usando a ferramenta FileListBox ai você coloca na propriedade Pattern a extensao dos arquivos que voce queira.. exemplo *.jpg (para aparecer so as imagens com extensao .jpg) Para mostrar as Pastas use o DirListBox e para exibir os Diretorios use o DriverListBox Espero q isso t ajude! Abracos []´s

Salver Brother.. de uma olhadinha sobre ActiveX Document DLL... com ele você conseguira fazer isso..... []´s

você insere este codio em um Module #If Win32 Then Declare Function SendMessage Lib "user32" Alias "SendMessageA" _ (ByVal hwnd As Long, ByVal wMsg As Long, _ ByVal wParam As Long, lParam As Any) As Long #Else Declare Function SendMessage Lib "User" _ (ByVal hwnd As Integer, ByVal wMsg As Integer, _ ByVal wParam As Integer, lParam As Any) As Long #End If depois no evento KeyPress do seu Combobox você insere este aki Dim CB As Long Dim FindString As String Const CB_ERR = (-1) Const CB_FINDSTRING = &H14C If KeyAscii < 32 Or KeyAscii > 127 Then Exit Sub If cmb_123.SelLength = 0 Then FindString = cmb_123.Text & Chr$(KeyAscii) Else FindString = Left$(cmb_123.Text, cmb_123.SelStart) & Chr$(KeyAscii) End If CB = SendMessage(cmb_123.hwnd, CB_FINDSTRING, -1, ByVal FindString) If CB <> CB_ERR Then cmb_123.ListIndex = CB cmb_123.SelStart = Len(FindString) cmb_123.SelLength = Len(cmb_123.Text) - cmb_123.SelStart End If KeyAscii = 0 Obs. é so trocar o cmb_123 pelo nome do seu Combobox! []´s

AEuhaUEhuaehuHEA cara.. malz.. eu li errado o tópico.. ao invés de CIDADE eu li ESTADO aeuhaeuhe Ignora o meu POST! foi malz hehehe

Aki ta a lista de estados... creio eu q está completa AC AL AM AP BA CE DF ES FN GO MA MG MS MT PA PB PE PI PR RJ RN RO RR RS SC SE SP TO []´s

compacte os arquivos (.zip, .rar, etc..) e coloque em um FTP.. e voi-lá! já esta pronto para download.. so colocar o link na sua PAGE! []´s!