
William Rodrigues
Veteranos-
Total de itens
1.935 -
Registro em
-
Última visita
Tudo que William Rodrigues postou
-
É isso mesmo brother! Abraços, William Rodrigues
-
Salve! O App.Path seria a localização do seu projeto, isso quando salvo, do contrário seria "C:\Arquivos de programas\Microsoft Visual Studio\VB98" (origem da instalação) Abraços, William Rodrigues
-
Bom, vai a minha ajuda... Segue dois bons tutoriais para você ver como pode fazer isso cara: Menu MDIForm/MDIChild Menu MDIForm/MDIChild 2 Abraços, William Rodrigues
-
Ok então... Tópico Fechado! Abraços, William Rodrigues
-
Vou encaminhar pros manos de SO É com vocês agora!!! Abraços, William Rodrigues
-
Fale o tipo de conta que você precisa e a maneira que você está tentando fazer que te ajudaremos no que for possível cara! Abraços, William Rodrigues
-
Problema Na Instalação Do Meu Sistema Num Win 98
pergunta respondeu ao brunohjoia de William Rodrigues em Visual Basic
Ah... E tem também o Inno Setup cara, fácil e muito bom PS: Qualquer coisa, procure aqui no fórum sobre ele Abraços, William Rodrigues -
Sim, claro... Você pode fechar o objeto RecordSet após a consulta. RecordSet.Close Abraços, William Rodrigues
-
Salve! estou meio ocupado agora cara, mas pude ver que seu comando SQL está errado! Segue um exemplo para busca: RecordSet.Open "Select Nome From Tabela Where Nome = ' " & Nome.Text & " ' ", Connection, TipoCursor, TipoBloqueio Ah, e outra coisa... Se o campo (TextBox) é Empty por que buscar um registro Empty? Abraços, William Rodrigues
-
Salve! Tem Auto_Increment ou AutoNumeração na sua Tabela? Se tiver, é esse o problema, Auto_Increment ou AutoNumeração não rola com Order By Abraços, William Rodrigues
-
Salve! Como você está tentando fazer para ler a figura escolhida? Algo como: Picture.Picture = LoadPicture(caminho) ? Abraços, William Rodrigues
-
Bom, ela me adicionou no MSN Messenger... Gente boa a mina... Abraços, William Rodrigues
-
Ok.. Tópico Fechado! Abraços, William Rodrigues
-
Salve! A declaração Option Explicit serve para dizer que todas as variaveis devem ser declaradas...Segue um exemplo: O não uso de Option Explict faz com que você possa usar esse código: Private Sub Command1_Click() nome = "William" MsgBox nome End Sub Já com o uso, retornaria erro: Option Explicit Private Sub Command1_Click() nome = "William" MsgBox nome End Sub Erro: Compiler Error --> Variable of defined Para sanar o problema teriamos que declarar a nossa variavel nome. Veja: Option Explicit Private Sub Command1_Click() Dim nome As String nome = "William" MsgBox nome End Sub Abraços, William Rodrigues
-
Bom, vou colocar lá também! Abraços, William Rodrigues
-
Salve! O campo ID é a chave primária? É auto numerico? Se for, não pode ser incluido na consulta Order By Abraços, William Rodrigues
-
Show cara... Ótimo Tutorial, parabéns!!! Abraços, William Rodrigues
-
Salve! Vou mostrar-lhe um exemplo: Tabela1 Cod Nome Endereco Telefone Cidade Estado Tabela2 Cod Nome Telefone Na tabela1 tenho 10 registro, por exemplo, e queria pegar apenas o Nome e Telefone para inserir na outra tabela (Tabela2). O código seria: Insert Into Tabela2 Select Tabela1.Nome, Tabela1.Telefone From Tabela1 Bom, isso baseado em SQL Server né hehehe, vê no que te ajudar cara! Abraços, William Rodrigues
-
Já trabalhou com VB e banco de dados antes? Se não, dê uma olhadinha na lista de sites (tópico fixo), lá você achará vários tutos irá te ajudar cara Abraços, William Rodrigues
-
Você usa o Data Report para fazer seus relatórios? Abraços, William Rodrigues
-
Ficou legal seu OS cara!!! Parabéns Abraços, William Rodrigues
-
Salve! Bom, com relação a esse tal código eu nunca ouvi falar.... Agora, o VB para Linux já existe. Click no link abaixo e veja: VB para Linux hehehe Abraços, William Rodrigues
-
Salve! - Marcelo - você já fez a conexão do VB com o Banco de Dados? Já trabalhou com DAO ou ADO alguma vez cara? Abraços, William Rodrigues
-
Salve! Declare essas duas APIs. Private Declare Function SendMessage Lib _ "user32" Alias "SendMessageA" (ByVal _ hWnd As Long, ByVal wMsg As Long, _ ByVal wParam As Long, lParam As Any) _ As Long Private Declare Function ReleaseCapture Lib _ "user32" () As Long E no evento Mouse_Down Dim rec& If Button And 1 Then ReleaseCapture rec& = SendMessage(Me.hwnd, &HA1, 2, 0&) End IF Vê se ajuda cara Abraços, William Rodrigues
-
Salve! Brother, já te ajudei por MSN Messenger mas segue para quem precisar... Em um módulo: Public Declare Function sndPlaySound Lib "winmm.dll" Alias "sndPlaySoundA" (ByVal lpszSoundName As String, ByVal uFlags As Long) As Long E no evento do botão: Call sndPlaySound("c:\pasta_com_musica\minha_musica.wav", 0) Abraços, William Rodrigues