Xistyle

Cara, sugiro você a criar um Windows Form normal. Só que o Load dele você dá um Hide() e já coloca ele no NotifyIcon (SysTray). Depois montar uma forma dele ser executado no início do Windows. O serviço em si não interage com o usuário. Caso queira criar um serviço mesmo, crie um projeto do tipo Windows Service. Windows Service: http://www.codeguru.com/vb/gen/vb_system/s...ticle.php/c4825

Não entendi... você quer apenas mudar o valor da variável? string texto = "meu nome é ianez"; texto = "meu nome é zenai";

Tente passar o seguinte código, levando em consideração que sua ListBox1 contém o caminho completo do arquivo: AxWindowsMediaPlayer1.URL = ListBox1.Text Caso não funcione, dê uma olhada neste tópico: http://social.msdn.microsoft.com/Forums/en...8-cdaf0e078a19/

Cleiton, gravar diretamente num txt, sem ser linha por linha eu desconheço. Se optar por trabalhar com outra estrutura de arquivos, pode extrair diretamente para um XML, usando o método WriteXML de um DataSet (http://forums.asp.net/t/1441971.aspx/1).

Binder, dê uma olhada nos artigos do Macoratti. Sempre têm bons exemplos e de linguagem prática. http://www.macoratti.net/aspn_dbc.htm

Você pode colocar como padrão todas as suas variáveis de valores monetários como Double. Com isso, você pode ter apenas uma rotina de formatação desses valores, tanto para carregar na grid quanto para salvar no banco.

Só de analisar o código parece normal, levando em conta suas observações quanto às configurações. Qualquer coisa faça o seguinte: disponibilize esse form com um banco de dados com os valores alterados em um site de armazenamento e me passe o link por mensagem. Eu baixo esse form com o banco (pode ser apenas a tabela com os valores modificados) e executo por aqui, fazendo uma série de testes, tentando entender melhor o funcionamento. OBS: verifique a tipagem da sua variável. Pelo que entendi, a variável que apresenta o problema de conversão é a "avalor_unitario_saidas©". Essa variável está declarada como String. Faça a declaração dele como Double ou Currency (ou até mesmo Decimal, mas prefiro o uso de Double pois é mais preciso).

Agora que vi seu código editado no post anterior. Então, seu código carrega os valores provenientes do SELECT. Mas a grid não está fazendo a formatação do valor, com duas casas decimais. Supondo que o valor que você queira formatar esteja nessa linha: avalor_unitario_saidas© = vleitor("valor_unitario_saidas") Se você aplicar aquele FormatCurrency (sem o Replace) nessa linha não funcionaria o carregamento (levando em consideração que a gravação está correta)?

No item A, significa mudar o tipo de dados do seu campo. Mudando seu valor pra texto, quando você inserir 1234,50, vai aparecer 1234,50. Ao contrário do numérico/moeda, quando você tem 1234,50 ele formata automaticamente para 1234,5. Mas isso não é uma boa prática de programação. Normalmente para esses casos são feitas as formatações necessárias, que seria o item B.

Cara, você vai ter duas soluções, pelo que entendi seu problema: a. Mudar o campo do seu banco de numérico para string; b. Formatar as casas decimais da sua grid. Quando você substitui o R$ por nada, esse valor é salvo no banco? Como você carrega sua grid? Pois pelo que tu explicou, a grid está carregando os dados do TextBox, aparentemente. Vamos focar na solução que lhe passei, formatando os dados. Esse problema de carregar e exibir 1234,5 ao invés de 1234,50 é relacionado à formatação de casas decimais.

Rafael, você está procurando por um nome de funcionário no campo ID? Não sei como está a estrutura da sua tabela, mas normalmente os campos ID são numéricos. O correto não seria: "SELECT funcionario_funcionario.funcionario_id, funcionario_funcionario.funcionario_nome, funcionario_funcionario.funcionario_telefone, funcionario_funcionario.funcionario_id, funcionario_cargo.funcionario_cargo_nome, funcionario_cargo.funcionario_cargo_id FROM funcionario_funcionario INNER JOIN funcionario_cargo on funcionario_cargo.funcionario_cargo_id = funcionario_funcionario.funcionario_cargo_id where funcionario_funcionario.funcionario_nome = '" & txt_funcionarioLIST.Text & "'" ?

Cara, testei esse código e funcionou. Precisa pressionar uma tecla qualquer para iniciar. Montei uma classe específica para a Cobra, para organizar melhor. Isso vai facilitar, por exemplo, quando você alimentar a cobra, pois vai adicionar apenas mais um Chr(1) ao objCobra.Caracter. Module Module1 Class Cobra Private intTamanho As Integer Private intPosicaoX As Integer Private intPosicaoY As Integer Private objCor As ConsoleColor Private strCaracter As String Public Property Tamanho() As Integer Get Return intTamanho End Get Set(ByVal value As Integer) intTamanho = value End Set End Property Public Property PosicaoX() As Integer Get Return intPosicaoX End Get Set(ByVal value As Integer) intPosicaoX = value End Set End Property Public Property PosicaoY() As Integer Get Return intPosicaoY End Get Set(ByVal value As Integer) intPosicaoY = value End Set End Property Public Property Cor() As ConsoleColor Get Return objCor End Get Set(ByVal value As ConsoleColor) objCor = value End Set End Property Public Property Caracter() As String Get Return strCaracter End Get Set(ByVal value As String) strCaracter = value End Set End Property End Class Sub Main() Dim tecla, ultimaPosicaoX, ultimaPosicaoY, velocidade As Integer Dim objCobra As New Cobra objCobra.Cor = ConsoleColor.Cyan objCobra.Tamanho = 1 objCobra.PosicaoX = 40 objCobra.PosicaoY = 12 objCobra.Caracter = Chr(1) velocidade = 500 'Pode aumentar de acordo com o tamanho While True While Not Console.KeyAvailable Console.SetCursorPosition(ultimaPosicaoX, ultimaPosicaoY) Console.Write(" ") Console.SetCursorPosition(objCobra.PosicaoX, objCobra.PosicaoY) Console.ForegroundColor = objCobra.Cor Console.Write(objCobra.Caracter) ultimaPosicaoX = objCobra.PosicaoX ultimaPosicaoY = objCobra.PosicaoY Threading.Thread.Sleep(velocidade) If tecla = 40 Then objCobra.PosicaoY = objCobra.PosicaoY + 1 End If If tecla = 39 Then objCobra.PosicaoX = objCobra.PosicaoX + 1 End If If tecla = 37 Then objCobra.PosicaoX = objCobra.PosicaoX - 1 End If If tecla = 38 Then objCobra.PosicaoY = objCobra.PosicaoY - 1 End If If tecla = 27 Then Exit While End If End While tecla = Console.ReadKey().Key End While End Sub End Module

Você deve passar apenas o valor, sem os caracteres que indicam a moeda. Precisa-se tratar esse valor portanto. Também sugiro que dê um replace na vírgula para ponto, que é o padrão usado.

Exatamente... o erro está relacionado ao não preenchimento dos valores. Você deve tratar isso, de duas formas: 1. Carregando 0,00 para os campos quando iniciar o Form; 2. Quando for Salvar: a. Informar o usuário que ele deve preencher os dados, não concluindo a gravação no banco; b. Substituir os campos não digitados por zero para que possa ser inserido no banco.

Se você usou o código dentro do bloco Try/Catch, como coloquei acima com um MessageBox, vai aparecer uma mensagem de erro. Você pode montar uma validação de número usando o método IsNumeric, antes de realizar a multiplicação.

Tente: "Server=nomeServidor\nomeInstancia;Database=nomeBanco;Trusted_Connection=True;User Id=usuario; Password=senha;"

Henrique, provavelmente é um problema de atualização do VS. Tente instalar o VS2008 SP1, que irá atualizar a IDE e o framework 3.5 SP1. Microsoft Visual Studio 2008 Service Pack 1 (Instalador): http://www.microsoft.com/downloads/info.as...isplaylang%3den Microsoft .NET Framework 3.5 Service Pack 1: http://www.microsoft.com/downloads/info.as...isplaylang%3den Deve-se verificar também a versão do seu VS. Se for Trial, a ferramenta pode ser limitado com relação a algumas funcionalidades. Neste caso, compensa você baixar a versão Express da linguagem (VB.NET ou C#) em http://www.microsoft.com/visualstudio/en-u...ditions/express

Cara, segue esse passo a passo: http://www.linhadecodigo.com.br/artigo/126...erver-2005.aspx Pode ser que alguma coisa esteja faltando. Outra coisa, que pode pegar é a senha. Se o SQL entender que não é uma senha segura, forte, você precisará trocá-la, pois o mesmo bloqueia o acesso remoto.

Agora quem não entendeu nada fui eu... você quer adicionar as linhas dinamicamente, sem usar o DataSource, certo? Esse código permite que você faça isso. Mas você não pode usar o "dataGridView1.DataSource = ds.Tables["cidade"];".

Você tem duas opções: configurar a grid, depois de carregada, para não exibir essas colunas indesejáveis (dataGridView1.Columns[indice].Visible = False;) ou adicionar manualmente. O problema de adicionar manualmente é que vai ficar trabalhoso. Você terá que criar cada coluna, configurar o tipo, adicionar ao DataGridView, depois ir de linha em linha no seu ds.Tables["cidade"] e atribuir os campos às colunas correspondentes. Segue um exemplo simples: dataGridView1.Columns.Add("Cidade", "Cidade"); dataGridView1.Columns["Cidade"].Width = 120; dataGridView1.Columns.Add("Estado", "Estado"); dataGridView1.Columns["Estado"].Width = 120; dataGridView1.Columns.Add("Regiao", "Região"); dataGridView1.Columns["Região"].Width = 120; for (int contador = 0; contador <= (ds.Tables["cidade"].Rows.Count - 1); contador++) { DataGridViewRow linha = new DataGridViewRow(); DataGridViewTextBoxCell colunaCidade = new DataGridViewTextBoxCell(); colunaCidade.Value = ds.Tables["cidade"].Rows[contador]["Cidade"].ToString(); linha.Cells.Add(colunaCidade); DataGridViewTextBoxCell colunaEstado = new DataGridViewTextBoxCell(); colunaEstado.Value = ds.Tables["cidade"].Rows[contador]["Estado"].ToString(); linha.Cells.Add(colunaCidade); DataGridViewTextBoxCell colunaRegiao = new DataGridViewTextBoxCell(); colunaRegiao.Value = ds.Tables["cidade"].Rows[contador]["Regiao"].ToString(); linha.Cells.Add(colunaRegiao); dataGridView1.Rows.Add(linha); }

Supondo que você tenha um botão que irá captar os dados do TextBox1 e do TextBox2, para exibir no TextBox3: Private Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs) Try 'Verifica se o usuário digitou alguma coisa no campo If (TextBox1.Text <> "") And (TextBox2.Text <> "") Then 'Verifica se foi digitado número If (IsNumeric(TextBox1.Text)) And (IsNumeric(TextBox2.Text)) Then Dim valor1 As Double Dim valor2 As Double valor1 = CDbl(TextBox1.Text) valor2 = CDbl(TextBox2.Text) TextBox3.Text = CStr(valor1 * valor2) End If End If Catch (ex As Exception) MessageBox.Show("Teste", ex.Message) End Try End Sub

Existe mais de uma instância do SQL Server no servidor, além da default? Se sim, a forma de conexão será diferente (Named Pipes).

Sua string de conexão está correta, apesar de nunca ter trabalhado desta forma. Como sempre usei Named Pipes, não passava esse parâmetro "Network Library". Qual é o erro que ocorre? Ou apenas dá timeout?

Deu certo?

Precisando de ajuda com o WPF, coloca seu código ai que, na medida do possível, te ajudo. :D