Ir para conteúdo
Fórum Script Brasil

rodrigotnoma

Membros
 Perfil  Explorar Conteúdo

  • Total de itens

    166

  • Registro em

  • Última visita

 Tipo de Conteúdo 

Tudo que rodrigotnoma postou

  1. rodrigotnoma
    Opa, experimente assim: InstrucaoSQL = "UPDATE cadastro set semestre = '"&semestre&"', nome = '"&nome&"', rg = '" & rg & "', telefone ='" & telefone & "', celular = '" & celular & "', email = '" & email & "', id_controle = "& id_controle &", destino ='" & destino & "', prihorario ='" & prihorario & "', dia_1 ='" & dia_1 & "', seghorario ='" & seghorario & "', dia_2 ='" & dia_2 & "', prisaida ='" & prisaida & "', dia_3 ='" & dia_3 & "', segsaida ='" & segsaida & "', dia_4 ='" & dia_4 & "', tersaida ='" & tersaida & "', dia_5 = '" & dia_5 & "', observacao = '" & observacao & "' WHERE id ="& id & "" Abços.
  2. rodrigotnoma
    Resolvido.
  3. rodrigotnoma
    Somente teste, pois gostaria de entender o porque de não segurar o valor no combo anterior.
  4. rodrigotnoma
    Boa tarde...tenho esse fonte: <script> function abreCombo(v_valor,v_contador) { document.form1.txtValor.value = v_valor; document.form1.txtContador.value = (v_contador + 1); document.form1.submit(); } </script> <form name="form1" method="post"> <input type="hidden" name="txtValor" value="<%=request("txtValor")%>" /> <input type="hidden" name="txtContador" value="<%=request("txtContador")%>" /> <% v_valor = request("txtValor") if v_valor = "" then v_valor = "" else v_valor = request("txtValor") end if v_contador = request("txtContador") if v_contador = "" then v_contador = 1 else v_contador = request("txtContador") end if for i = 1 to v_contador %> <select name="primeiroCombo<%=v_contador%>" onchange="java script:abreCombo(this.value,<%=v_contador%>);"> <option value="">Selecione...</option> <option value="S" <%if request("primeiroCombo" & cstr(v_contador)) = "S" then %> selected="selected" <%end if %>>SIM</option> <option value="N" <%if request("primeiroCombo" & cstr(v_contador)) = "N" then %> selected="selected" <%end if %>>não</option> </select> <% next %> </form> O que acontece, é que quando faço uma escolha em algum combo, outro combo é criado....só que o anterior não segura o valor que escolhi. Onde estou errando? Obrigado.
  5. rodrigotnoma
    Boa noite, Gostaria de saber se existe algum componente para utilizar em C# free, e caso a resposta seja sim, se existe a possibilidade de através de algum metodo desse componente, conseguir resgatar o ID.Ticket das mensagens? Obrigado.
  6. rodrigotnoma
    Bom dia, estou tentando gera um xls da tabela criada no HTML; <HTML> <HEAD> <META HTTP-EQUIV="Content-Type" Content="application/vnd.ms-excel; charset=utf-8> <META HTTP-EQUIV="Content-disposition": attachment; filename="file.xls"> <TITLE>RELATÓRIO PROCESSAMENTO COBERTURA PROVISÓRIA</TITLE> </HEAD> <BODY> <TABLE CELLPADDING=0 CELLSPACING=0 BORDER=0> <TR> <TD NOWRAP COLSPAN=8> <FONT FACE=ARIAL SIZE=4><b>MAPFRE Seguros</b></font> </TD> <TD NOWRAP COLSPAN=2 WIDTH='35%' ALIGN=RIGHT> &nbsp;&nbsp;&nbsp;<IMG SRC='MAPFRE_SP_T.GIF'> </TD> </TR> <TR> <TD><BR><BR></TD> </TR> <TR> <TH>CodigoCobertura</TH> <TH>InicioVigencia</TH> <TH>FinalVigencia</TH> <TH>Protocolo</TH> <TH>NSU</TH> <TH>CodigoProduto</TH> <TH>StatusEmissao</TH> <TH>FormaConciliacao</TH> <TH>CodigoCorretor</TH> <TH>NomeCorretor</TH> </TR> <TR> <TD ALIGN="CENTER">25683498</TD> <TD ALIGN="CENTER">27/04/2004</TD> <TD ALIGN="CENTER">27/04/2005</TD> <TD ALIGN="CENTER">0</TD> <TD ALIGN="CENTER">0</TD> <TD ALIGN="CENTER">0</TD> <TD ALIGN="CENTER"></TD> <TD ALIGN="CENTER">Não Conciliado</TD> <TD ALIGN="CENTER">55851</TD> <TD ALIGN="CENTER"></TD> </TR> <TR> <TD ALIGN="CENTER">25683499</TD> <TD ALIGN="CENTER">27/04/2004</TD> <TD ALIGN="CENTER">27/04/2005</TD> <TD ALIGN="CENTER">0</TD> <TD ALIGN="CENTER">0</TD> <TD ALIGN="CENTER">0</TD> <TD ALIGN="CENTER"></TD> <TD ALIGN="CENTER">Não Conciliado</TD> <TD ALIGN="CENTER">55555</TD> <TD ALIGN="CENTER"></TD> </TR> <TR> <TD ALIGN="CENTER">25683497</TD> <TD ALIGN="CENTER">27/04/2004</TD> <TD ALIGN="CENTER">27/04/2005</TD> <TD ALIGN="CENTER">0</TD> <TD ALIGN="CENTER">0</TD> <TD ALIGN="CENTER">0</TD> <TD ALIGN="CENTER"></TD> <TD ALIGN="CENTER">Não Conciliado</TD> <TD ALIGN="CENTER">16516</TD> <TD ALIGN="CENTER"></TD> </TR> <TR> <TD ALIGN="CENTER">25683495</TD> <TD ALIGN="CENTER">27/04/2004</TD> <TD ALIGN="CENTER">27/04/2005</TD> <TD ALIGN="CENTER">0</TD> <TD ALIGN="CENTER">0</TD> <TD ALIGN="CENTER">0</TD> <TD ALIGN="CENTER"></TD> <TD ALIGN="CENTER">Não Conciliado</TD> <TD ALIGN="CENTER">40482</TD> <TD ALIGN="CENTER"></TD> </TR> </TABLE> </BODY> </HTML> Mas não consigo, alguém poderia me dar uma luza? Obrigado
  7. rodrigotnoma

    DialogResult

    uma questão postou rodrigotnoma .NET

    Estou usando: DialogResult ret = MessageBox.Show("Certeza que deseja fechar?", "Sair", MessageBoxButtons.OKCancel); if (ret == DialogResult.OK) this.Close(); else return; Estou fechando o form no evento KeyDown do textBox: private void textBox1_KeyDown(object sender, KeyEventArgs e) { if (e.KeyValue == 27) { this.Close(); } } De qualquer forma o form é fechado. Alguém poderia me ajudar? Obrigado
  8. rodrigotnoma
    Tenho no Page_Load esta forma: html.Append("<table id='exp_excel' width='100%' cellpadding=0 cellspacing=0 BORDER=0> "); html.Append("<tr>"); html.Append("<td width='35%' colspan=2>&nbsp;<IMG src='../../Resources/StyleSheets/Imagens/mapfre_sp_t.gif'> "); html.Append("</td>"); html.Append("<td width='65%' colspan=2 nowrap> "); html.Append("<table border='0' cellpadding='0' cellspacing='0' style='border-collapse: collapse' bordercolor='black' width='100%'> "); e tenho uma função para exportar o que esta acima para o excel: protected void btn_Excel_Click(object sender, EventArgs e) { string html = String.Empty; Response.Clear(); Response.AddHeader("content-disposition", String.Format("attachment;filename={0}.xls", "Relatorio_" + DateTime.Now.ToString("ddMMyyyy"))); Response.Charset = "ISO-8859-1"; Response.ContentEncoding = System.Text.Encoding.GetEncoding("ISO-8859-1"); Response.ContentType = "application/vnd.xls"; Response.Write(html); Response.Flush(); Response.End(); } Como devo proceder? Obrigado
  9. rodrigotnoma
    OK, vou tentar. Qualquer duvida posto novamente. Obrigado
  10. rodrigotnoma
    Então Anderson, dessa forma eu conseguiria trazer os registros do campo nome e sobrenome, mas e o campo endereço? e se tivesse mais campos do tipo string? ai a query ficaria gigantesca. Estou tentando encontrar uma forma de fazer por ubound e percorrer registro por registro. Mas não sei como fazer isso. Em relação a média: todos os campos de notas iniciam com NT_, tem como pegar o nome da coluna e fazer um select somente nos campos que iniciam com NT_???? Obrigado.
  11. rodrigotnoma
    Na minha tabela aluno, tenho: nome#####Sobrenome#####Telefone#####Endereco#####NT_port#####NT_mat#####NT_geo#####NT_hist Rodrigo###Tavares########37392330####Av Ema 30####6.0#########9.0#######4.0########NULL Jose#####Silva##########69325654####Rua 09 301####NULL########5.0#######8.0########7.0 Maria####Joana##########89562145####Rua Amadeu###8.0#########6.0#######7.0########2.0 Gostaria de trazer todas as palavras que possuem a letra "a", ou seja, traria como resultado: -Tavares -Av -Ema -Silva -Rua -Maria -Joana -Rua -Amadeu E depois faria a média(tirar a média eu consigo) o problema esta que os que estão "NULL", significa q o aluno faltou a prova. Ex: Média Rodrigo: (6.0 + 9.0 + 4.0)/3(o NULL não conta) Média Maria: (8.0 + 6.0 + 7.0 + 2.0)/4(não possue campo NULL) Obrigado.
  12. rodrigotnoma
    Tenho meu código de conexões: teste_conexao_BD.asp <% Option Explicit Dim conn,connstring,comando,nome,sql,rs Sub AbreConexao(conn,connstring) Set Conn=Server.CreateObject("ADODB.Connection") Connstring = "driver={SQL Server};" & _ "server=USER-B95C64A782\SQLEXPRESS1;" & _ "database=teste1;" & _ "Uid=sa;" & _ "Pwd=123456;" Conn.Open Connstring End Sub '################################################################## Sub AbreRs(comando,nome) Set nome=Server.CreateObject("ADODB.Recordset") Set nome= Conn.Execute(comando) End Sub '################################################################## Set rs = Nothing Set Conn = Nothing %> E faço um include nesta pagina: Sub.asp <--!#include file="teste_conexao_BD.asp"--> <% Call AbreConexao(conn,connstring) sql = "select * from tb_usuario" Call AbreRs(sql,rs) Do While Not rs.EOF Response.Write(rs("nome")) & " " & (rs("unidade")) & "<br>" rs.Movenext Loop %> E da esse erro: Tipos incompatíveis: 'AbreConexao' /teste/Sub.asp, line 4 Obrigado.
  13. rodrigotnoma

    Store procedure

    pergunta respondeu ao rodrigotnoma de rodrigotnoma em ASP

    Opa Jonathan Seguinte, tinha postado e esquecido de colocar o código q você citou Mas coloquei e não consegui....detalhe que fiz com select,insert e delete e rodou uma beleza. Só com o update q não ta indo. Não altera de jeito nenhum. vlw Alterei os nomes das variaveis do ASP e a ordem na query que esta na variavel sql e deu certo. varnome=request.form("txt_nome") vartelefone=request.form("txt_telefone") para nome=request.form("txt_nome") telefone=request.form("txt_telefone") e troquei a ordem: sql="execute sp_update1'"&vartelefone&"','"&varnome&"'" para sql="execute sp_update1'"&nome&"','"&telefone&"'" Isso influencia? Eu preciso colocar os nomes nas variaveis o mesmo que utilizei nas stores procedures? Obrigado
  14. rodrigotnoma

    Store procedure

    uma questão postou rodrigotnoma ASP

    Pessoal, criei esta SP no SQL 2008: create procedure sp_update @telefone varchar(10), @nome varchar(30) as update tb_usuario set telefone=@telefone where nome=@nome go No ASP tenho uma pagina que executa a SP: <% option explicit dim conn,connstring,rs,sql,varnome,vartelefone Set conn = server.CreateObject("ADODB.Connection") Set rs=Server.CreateObject("ADODB.Recordset") connstring="driver={SQL Server};" & _ "server=USER-B95C64A782\SQLEXPRESS1;" & _ "database=teste1;" & _ "Uid=sa;" & _ "Pwd=123456;" varnome=request.form("txt_nome") vartelefone=request.form("txt_telefone") conn.open connstring sql="execute sp_update1'"&vartelefone&"','"&varnome&"'" set rs=conn.execute(sql) response.write("OK,Alterado!!!") conn.close %> Executa sem erros, mas quando acesso o BD e dou um "select * from tb_usuario", o telefone do usuario não foi alterado. Será que esqueci de algo? vlw
  15. rodrigotnoma
    OSjunior Obrigado, deu certo.Falta de atenção minha na falta do .ToString(). vlw
  16. rodrigotnoma
    string nome=textbox1.text; string sqlsrt="select * from tb_usuarios where nome='"+nome+"'"; string connstr = @"......................blablablabla"; sqlconnection conn = new sqlconnection(connstr); conn.open(); slqcommand cmd = new sqlcommand(sql,connstr); sqldatareader dr=cmd.executereader(); while (dr.read()) { textbox2.text = dr["nome"]; textbox3.text = dr["sobrenome"]; textbox4.text = dr["telefone"]; } conn.close(); Já tentei colocando: dr["nome"].tostring e não consigo fazer com que o dr["nome"] seja "jogado" no textbox2.text. "Cannot implicitly convert type 'object' to 'string'. An explicit conversion exists (are you missing a cast?)" Qual a forma correta de fazer? Obrigado.
  17. rodrigotnoma
    Consegui desta forma: string sql = "insert into tb_cad_cli(nome,sobrenome,rg,telefone,cod_unid) values('"+nome+", '"+sobrenome+"'',"+rg+"','"+telefone+"','"+unidade+"')"; Obrigado pela ajuda. Rodrigo
  18. rodrigotnoma
    Minha query: string sql = "insert into tb_cad_cli(nome,sobrenome,rg,telefone,cod_unid) values('nome','sobrenome','rg','telefone',unidade)"; Nome de coluna 'unidade' inválido(q no meu banco ta como int). A sintaxe do insert esta correto?No C# não se usa o &, correto?
  19. rodrigotnoma
    Seguinte, fechei o VS 2005, abri novamente e rodou sem erros da forma que eu coloquei la em cima. string sql = "insert into tb_cad_cli(nome,sobrenome,rg,telefone,cod_unid) values('nome','sobrenome','rg','telefone',unidade)"; Nome de coluna 'unidade' inválido A sintaxe do insert esta correto?No C# não se usa o &, correto? Obrigado. obs: não sei porque depois de reiniciar ele parou de dar aquele erro!!!!se alguém tiver alguma ideia do porque, seria válido...
  20. rodrigotnoma
    Pode usar assim: session["nome"]=textbox1.text; Depois em outro lugar por exemplo você pode recupera essa session e dar "Bom dia" + session["nome"]; OK??
  21. rodrigotnoma
    Então, porque na verdade quando faço um debug nele ele já da essa mensagem. Não chego a digitar nada nesse textbox.... Odeio esse erro....
  22. rodrigotnoma
    Boa tarde. private void cad_cli_Load(object sender, EventArgs e) { string conn=@"Data Source=USER-B95C64A782\SQLEXPRESS1;Database=empresa;UID=sa;PWD=123456;Min Pool Size=0;Pooling='true'"; SqlConnection strconn = new SqlConnection(conn); string nome = textBox1.Text; string sobrenome = textBox2.Text; string rg = textBox3.Text; string telefone = textBox4.Text; int unidade = int.Parse(textBox5.Text); string sql = "insert into tb_cad_cli(nome,sobrenome,rg,telefone,cod_unid) values('nome','sobrenome','rg','telefone',unidade)"; strconn.Open(); SqlCommand cmd = new SqlCommand(sql, strconn); cmd.ExecuteNonQuery(); strconn.Close(); } Como posso resolver isso?
  23. rodrigotnoma
    ok, bareta deu certo... sabe porque do meu jeito não tava dando certo? abços
  24. rodrigotnoma
    Um problema estranho acontece,vejam: <%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%> <!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"> <% acento=request.form("txt_acento") tamanho=len(acento) for i=1 to tamanho acento_mid = mid(acento,i,1) select case acento_mid case "á","Á","à","À","ã","Ã","â","Â","â" acento_mid="a" end select final=final & acento_mid next response.write(final) %> Roda normalmente, aperto F12 e abro a pagina para digitar uma string no campo txt_acento, como vocês podem ver acima. Digito por exemplo: são paulo clico no button e no response.write(final) ele me devolve= são paulo Ai que vem a parte estranha: Se apago o "são paulo" que digitei anteriormente e digito "sáo paulo" ele me devolve isso: sa¡o paulo, se digito "sâo paulo", volta:sa¢o paulo e se voltar a digitar "são paulo" ele me retorna: sa£o paulo porque a primeira vez funciona e depois começa a voltar esses caracteres estranhos? Alguém já viu isso? Obrigado
  25. rodrigotnoma
    Opa, até conseguir alterar o nome da coluna, mas ele fica desse jeito: http://img245.imageshack.us/img245/6593/gridview.jpg ou seja, as colunas ficam duplicadas.Como posse desabilitar as colunas que ficaram com o nome que vem do banco? Obrigado.
×
×
  • Criar Novo...