rodrigo_fabiam

Hum, não sabai que dava pra adicionar mais controles ao ToolBox. Duvida sanada. Problema resolvido OK.

Porque o DataGrid tem o metodo: TableStyles.Add Já o DataGridView não possui esse metodo. E no artigo ele adicionou o DataGrid direto da ToolBox, porque era VS 2003. Porém estou usando VS 2008, que como você mesmo disse não tem esse controle na ToolBox.

Bruno, É porque eu queria usar a classe DataGridTableStyle: http://www.macoratti.net/vbn_fdg2.htm Pelo que vi, a classe DataGridView não permite a propriedade dgCategories.TableStyles.... já o DataGrid permite. Se souberem como eu uso o DataGridTableStyle com o DataGridView, para mim é melhor.

Pessoal, alguém sabe como eu faço para colocar um DataGrid no Form no VB 2008 Obs.: Não é o DataGridView, é o dataGrid.

Pessoal, Tenho um codigo com faz a conexão com um Banco de Dados Postgre: Set postgree = Server.CreateObject("ADODB.Connection") postgree.ConnectionString = "DRIVER={PostgreSQL ANSI};SERVER=192.168.40.16;port=5432;DATABASE=xxx;UID=xxx;PWD=xxx;" postgree.Open postgree.close Fiz um teste, e se o Servidor do BD estiver fora, e der erro na conexão, ele mostra essa mensagem: Microsoft OLE DB Provider for ODBC Drivers error '80004005' Could not connect to the server; No connection could be made because the target machine actively refused it. [192.168.40.16:5432] /lnb/novo_registro.asp, line 17 Gostaria de saber como faço para que, se der erro na conexao ADODB, ele mostrar uma mensagem amigavel ao usuario, tipo: "Erro na conexão com o Banco de Dados" Sei que no VB, tem-se a opção: On Erro Goto xxxx No ASP tem alguma coisa parecida?

Jonathan, É isso mesmo, agora funcionou. Quando o form é enviado, a pagina recupera o valor digitado no campo texto, e joga na propriedade VALUE do campo texto. Era isso. Problema resolvido. Obrigado.

Pessoal, Tenho um form com varios campos. E faço um submit para a mesma pagina. (submit atraves de javascript) Como faço para que, quando o Form seja enviado, todos os dados nos campos não se percam, sejam mantidos. Segue abaixo um trecho do codigo function check_chamado() { var letters = document.form1.vsat.value.length +1; if(letters <= 8) { document.form1.vsat.focus() } else { document.form1.submit(); document.form1.serial_modem.focus(); } } <form action="novo_registro.asp" method="post" name="form1" onSubmit="return valida_form()"> <input type="text" name="vsat" maxlength="8" size="9" align="middle" onKeyUp="check_chamado()"</> </form>

Achei a resposta no site do macoratti: Desabilitar o beep no controle TextBox quando teclar o ENTER If e.KeyCode = Keys.Enter Then e.SuppressKeyPress = True End If Problema resolvido.

Eu vi, fiz igual, mas aparece a mensagem de erro: Olha só na imagem abaixo: Tenho de fazer algum Import de alguma classe? Tenho de declarar alguma variavel ou algo assim? Abraços.

Pessoal. Montei uma aplicação em VB 2008. No PC onde estou montando o softw, rodou perfeito. Mas levei para um outro micro, onde esta instalado o Framework 2.0. Ao abrir um determinado form dentro do aplicativo aparece uma mensagem de erro e não abre o Form. A mensagem de erro esta no link: alguém sabe o que pode ser? Porque esta dando esse erro? Abraços.

Ola. E Windows Form.

é o mesmo som que se obtem com o comando Beep(). É um beep sonoro.

No meu PC, tenho as versoes abaixo instaladas: Microsoft .NET Framework 2.0 Service Pack 2 Microsoft .NET Framework 3.0 Service Pack 2 Microsoft .NET Framework 3.5 SP1 E no novo projeto, não encontrei a combo onde escolho a versao do Framework E se eu desenvolver um software, e for rodar o aplicativo m outro micro, esse micro onde vai rodar deve ter a mesma versão do Framework instalado? E eu tenho como baixar essas versoes da Internet?

Pessoal, Coloquei um codigo num Form, para que quando o usuario tecle Enter, ele mude o foco para o proximo textbox. O Codigo é esse: Private Sub frmUsuariosCadastro_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown If e.KeyCode = Keys.Enter Then SendKeys.Send("{Tab}") End If End Sub O problema é que quando tecla o Enter, o aplicativo faz um alarme sonoro, ao passo que quando teclo TAB, isso não ocorre, ele muda o foco sem nenhum ruido. COmo faço para que o aplicativo não emita alarme sonoro? To usando Vb Express 2008. Abraços

As unicas opções que tem são essas: SelectedIndexCollection SelectedIndices SelectedItems SelectedListViewItemCollection

Eu to desenvolvendo no meu micro. Como eu faço para descobrir qual Framework esta instalado nele?

Pessoal, To montando um programa com VB Express 2008. Gostaria de saber se o programa já compilado (.EXE) roda nos Windows XP, Windows Vista Home e Windows 2000. Abraços.

Pessoal, Fiz um codigo que carrega um list view com uma lista de usuários: Public Sub carrega_listview() Dim cn As New OleDbConnection Dim cm As New OleDbCommand Dim cm2 As New OleDbCommand Dim dr As OleDbDataReader Dim dr2 As OleDbDataReader Dim vStatusUser As String Dim vTipoUser As String Try cn.ConnectionString = vConexaoString If cn.State = ConnectionState.Closed Then cn.Open() End If cm.CommandText = "Select * FROM usuarios where status = true ORDER by id_usuario" cm.Connection = cn dr = cm.ExecuteReader 'carrega o listview ListView1.Items.Clear() ListView1.Columns.Clear() ListView1.View = View.Details ListView1.FullRowSelect = True ListView1.GridLines = True ListView1.AllowColumnReorder = True ListView1.Columns.Add("Cód.", 50) ListView1.Columns.Add("Nome", 180) ListView1.Columns.Add("Login", 100) ListView1.Columns.Add("email", 180) ListView1.Columns.Add("Tipo de Usuário", 180) ListView1.Columns.Add("Status", 180) Dim vIndice As Integer vIndice = 0 While dr.Read If dr("status") = True Then vStatusUser = "Ativo" ElseIf dr("status") = False Then vStatusUser = "Inativo" End If 'vTipoUser = dr("tipo_usuario") 'busca o nome do tipo de usuario cm2.CommandText = "Select * FROM tipo_usuario WHERE idTipo = " & dr("tipo_usuario") cm2.Connection = cn dr2 = cm2.ExecuteReader If dr2.Read() Then vTipoUser = dr2("nome") End If ListView1.Items.Add(dr("id_usuario")) ListView1.Items(vIndice).SubItems.Add(dr("nome")) ListView1.Items(vIndice).SubItems.Add(dr("login")) ListView1.Items(vIndice).SubItems.Add(dr("email")) ListView1.Items(vIndice).SubItems.Add(vTipoUser) ListView1.Items(vIndice).SubItems.Add(vStatusUser) vIndice = vIndice + 1 dr2.Close() cm2.Cancel() End While cn.Close() Catch ex As Exception MsgBox(ex.Message) cn.Close() End Try End Sub Ele esta atualmente carregando 3 usuários (3 linhas) e a primeira coluna é o Codigo do cliente. Como eu faço para que, quando estiver por exemplo, selecionado a primeira linha, eu clique num botão e ele mostra num messagebox o Codigo (informação da 1a coluna da linha selecionada?

É porque se não me engano, no VB 6 (que eu usava) ele já vinha com a letra sublinhada. Não sei se você tem o VB 6.0 ai instalado, pode fazer o teste, se possível. valeu.

Bem, o tamanho dela é 512 x 512, 120 KB. Inclusive é uma daquelas que você me passou por email.

Pessoal, Coloquei um botão no Form, e coloquei o texto como "&Novo". Isso pra que o N fique sublinhado e responda quand o usuario teclar Alt+N. Em tempo de projeto, o N aparece sublinhado, mas quando o Form é carregado pela primeira vez, em tempo de execução, o N não aparece sublinhado. Ai quando aperto a tecla Alt, o N fica sublinhado. Isso é normal? Como faço para que o N apareça sempre sublinhado?

Pessoal, Coloquei num WinForm (VB Express 2008) um ToolStrip, e dentro dele coloquei um botão. Nesse botão, adicionei um icone. O problema é que o icone esta muito pequeno: Como posso fazer pra deixar o icone maior, pra ficar mais ou menos assim: alguém sabe como fazer isso?

Rafael, mostra 1 das formas que é possivel fazer. Tem como?

Ok. Problema resolvido.

então pelo que vi, nem precisa recarregar a pagina, né? E com VBScript, como ficaria?