Alcaide

Acamargo_BAUR, Obrigado por sua ajuda, vou fazer os testes aqui e te retorno já já!

Olá Pessoal, tudo bem ? Estou com dificuldades ao elaborar um relatório no Crystal Reports, e gostaria muito da colaboração de vocês. No sistema existem 3 tabelas: Responsável --> Bairros --> Municípios (Anexo "Tabela") Nesta tabela responsável, existe um campo chamado "CodMunicipio" e "CodBairro", sendo que alguns estão com o valor Null, pois no ato do cadastro algum usuário não fez o processo corretamente. Minha questão é a seguinte: Quando esse campo estiver Null, quero exibir uma mensagem na fórmula por exemplo "Município não cadastrado". Qual o erro? Quando coloco os campos referentes as tabelas "Bairros" ou "Municípios", simplesmente os responsáveis que estão com os "CodMunicipio" e "CodBairro" do tipo Null, não é exibido de forma alguma. Vejam o que já fiz: Tipo de Junção das tabelas: Junção Interna / Junção Externa Esquerda / Junção Externa Direita / Junção Externa Completa, e mesmo assim nada resolveu. Vejam as fórmulas que fiz para tratar os erros: Bairro: If IsNull ({responsavel1.CodBairro}) = true then Formula ="Não cadastrado" else Formula = {bairro1.Nome} End if Município: If IsNull ({responsavel1.CodMunicipio}) = true then Formula ="Não cadastrado" else Formula = {municipio1.Nome} & "/" & {municipio1.UF} End if Agradeço muito a ajuda de todos! Forte abraço,

Jhonas, Fiz isso que você falou, matei o processo SVCHOST.EXE ----- SERVIÇO DE REDE que estava abaixo do primeiro SVCHOST.EXE ------ SISTEMA. Mas ainda tenho uns 10 desse abertos, sendo que 3 são SERVIÇO DE REDE. Tentei acessar os sites .com.br e tudo esta funcionando normalmente! E agora qual o próximo passo ??? Obrigado

Certo, esse processo após ser "morto", o que devo fazer ?

Amigos, boa tarde! Estou com uma dificuldade em minha rede, migramos todos os servidores para a plataforma 2008 server, porém, isso já foi feito a 6 meses mas meu DNS por várias vezes para de funcionar sem mais e sem menos... acontece que nenhum domínio .com.br funciona e alguns .com ficam perdidos também. Ao reiniciar o serviço, tudo volta ao normal... Já verifiquei meu DNS de cabo a rabo e NADA... será que alguém já passou por esse problema e poderia me dar uma ajuda ?!?!?

Beleza cara, obrigado pela sua ajuda. Amanhã já vou cair dentro disso e ver se vai funcionar e retorno para vocês! Abraço! dei uma olhada no projeto que me passou, mas mesmo assim não consegui! Acho que é algum erro dá máquina, não é possível!

Beleza cara, obrigado pela sua ajuda. Amanhã já vou cair dentro disso e ver se vai funcionar e retorno para vocês! Abraço!

Boa tarde amigos, Tenho uma Hipatch 1190 e estou tentando desenvolver um tarifador para este equipamento com BD Firebird. O que preciso é o seguinte: Pegar as ligações e jogar no BD. Já li várias páginas na internet, e mesmo assim não consigo. Quando eu conecto a COM1 através do Vb.net, o sistema simplesmente para e não acontece nada. Meu código: Dim WithEvents port As New IO.Ports.SerialPort port.Open() If port.IsOpen Then MessageBox.Show("ABRIU") End If While port.IsOpen RichTextBox1.Text = port.ReadLine() End While End Sub Poderiam me ajudar ?? OBS: Pelo Hyperterminal eu consigo acessar e receber todos os dados da Central

Gente estou aqui com a tela do erro, que é apresentada! Falha ao abrir a conexão Fala ao abrir a conexao. Pagamentos Efetuados {A3E82C97-0C9A-49F9-8BD8-DCBC1DD5A2D3}.RPT Acho muito estranho, pois na minha máquina de desenvolvimento funciona sem problema algum! :wub:

Boa tarde Amigos, Estou novamente com uma grande dificuldade com meu Sistema desenvolvido em Vb.net + Crystal Reports, é o seguinte: Quando eu mando abrir o relatório, na minha máquina funciona 100%, mas nas máquinas dos meus clientes, ele sempre da erro! Já testei todas as configurações destes usuários, o BD esta sendo acessado normalmente através da rede, e não sei mais o que fazer... segue o meu código: Private Sub BtnVisualizar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnVisualizar.Click PassaValorTabRelAUX() PegaDadosRelatorio() AlteraSelectionFormula() 'Passa os valores para abrir o relatório! FrmVerRel.CrExibe.ReportSource = RetRelCaminho FrmVerRel.CrExibe.SelectionFormula = AuxSelectionFormula 'Coloquei esse RefreshReport, pois quando mandava ver de todos clientes, não atualizava a data referencia (datainical e final) FrmVerRel.CrExibe.RefreshReport() FrmVerRel.Show() End Sub Explicando: PegaDadosRelatorio vai me retornar tudo do relatorio (O seu selection formula e caminho) Uso o Firebird 2.5, existe alguma coisa que eu estou esquecendo ?!?! A aplicação, como já falei, esta rodando normalmente em minha máquina acesso tanto o BD local quanto o BD no Server. Abraços!

Uma forma de acessar dinamicamente um campo texto, é utilizando o metodo findcontrol No exemplo abaixo os campos textos estão definidos diretamente no Form (página) se seus textos estiverem em algum outro container, tem que procurar no container especifico. protected void Button1_Click(object sender, EventArgs e) { // Crio uma variavel textoatual do tipo TEXTBOX e procuro no (container) form o campo: TextBox + i // e ao encontrar o campo retorno também um TEXTBOX Label1.Text = ""; for (int i = 1; i < 3; i++) { TextBox textoatual = this.Form.FindControl("TextBox" + i.ToString()) as TextBox; if (textoatual.Text != null) { Label1.Text = Label1.Text.ToString() + textoatual.Text.ToString(); } } } No Exemplo acima criei duas textbox com nomes padroes TextBox1 e TextBox2 juntei as duas e mostrei no Label1. segue abaixo se você quiser testar, a página que utilizei, e o código completo da página: <%@ Page Language="C#" AutoEventWireup="true" CodeFile="Default.aspx.cs" Inherits="_Default" %> <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"> <html xmlns="http://www.w3.org/1999/xhtml"> <head runat="server"> <title></title> </head> <body> <form id="form1" runat="server"> <div> <asp:TextBox ID="TextBox1" runat="server"></asp:TextBox> <asp:TextBox ID="TextBox2" runat="server"></asp:TextBox> <asp:button ID="Button1" runat="server" text="Button" onclick="Button1_Click" /> </div> <asp:Label ID="Label1" runat="server" Text="Label"></asp:Label> </form> </body> </html> código em c# using System; using System.Collections.Generic; using System.Linq; using System.Web; using System.Web.UI; using System.Web.UI.WebControls; public partial class _Default : System.Web.UI.Page { protected void Page_Load(object sender, EventArgs e) { } protected void Button1_Click(object sender, EventArgs e) { // Crio uma variavel textoatual do tipo TEXTBOX e procuro no (container) form o campo: TextBox + i // e ao encontrar o campo retorno também um TEXTBOX Label1.Text = ""; for (int i = 1; i < 3; i++) { TextBox textoatual = this.Form.FindControl("TextBox" + i.ToString()) as TextBox; if (textoatual.Text != null) { Label1.Text = Label1.Text.ToString() + textoatual.Text.ToString(); } } } } Sds Messias Vilalta Messias, boa noite! Muito obrigado pela sua ajuda, mas acabei resolvendo de uma forma não muito "correta", a famosa "gambiarra" hehehehe Fiz o seguinte: select case I case 1 Auxiliar = Txt1.text case 2 = Txt2.text e assim foi ... Mas, mesmo assim te agradeço !

Oi MC, bom dia! Para você chamar uma sub do form A no form B basta fazer o seguinte: No formB: formA.nomedasub() é isso que você precisa fazer ??

Amigos, bom dia! Estou com uma dúvida ao montar uma string, é o seguinte: Tenho 100 TextBox em um form, e todos numerados de 1 a 100 e quero fazer um insert no meu banco da seguinte forma: For I = 0 To 100 Insere = "INSERT into CCRGAB (GABQUEST, GABQUESTRES, GABTIPPROVA, GABTITPROVA)" Insere = Insere + "Values ('" & I & "', '" & Txt(i).text & "', '" & CmbNumProva.Text & "', '" & TxtTitulo.Text & "') " next i Bom, explicando melhor... Quero pegar assim: Se o I ta no 1 eu vou pegar a txt1.text Se o I ta no 2 eu vou pegar a txt2.text e assim sucessivamente ! Tentei fazer indexando txt(i).text mas não rola dessa forma hehehe... e não conheço outra forma! Poderiam me ajudar nesta por favor ???

O Kuroi, Cara muito obrigado por sua ajuda... Mas pensei bem, e vi que não é necessário fazer isso, nos meus relatórios posso fazer relacionamento e utilizar um IF na própria programação do VB, como voce você explicou primeiramente! Mutio obrigado novamente, Grande abraço!

Complementando a pergunta: Por exemplo, eu tenho 10 relatorios que utilizam este campos saca ???? So que nestes relatorios nem todos utilizam a tabela EDGCLI ... então por isso penso em fazer alguma maneira direto no Selection Formula, para se não tiver valor, ignora a clausula... Entende??? Quando eu pego o retorno do Banco (onde esta armazenado o selection), eu vou tratar esse problema.