Romero Dias

Pessoal, Estou construindo um sistema para planejamento de serviços, e fui incumbido de fazer um relatório, o relatório terá que exibir um cronograma, por exemplo, tenho os seguintes dados nota data_inicial data_final ----------------------------------------------- 055 11/12/2008 25/12/2008 098 15/12/2008 19/12/2008 088 02/12/2008 28/12/2008 Com base nas dadas tenho que criar um cronograma, com aqueles quadradinhos escuros. tentei fazer com matrizes, mas não fui muito feliz nas tentativas, se alguém tiver algum exemplo ou então me indicar alguma forma de estar fazendo, utilizando algum componente. Agradeço a ajuda,

Jonathan, tentei sim, eu debuguei o software, constatei que o valor fica correto até ser inserido na base de dados. A um pouco mais de um ano assumi a manutenção deste software, ele é um ERP, Financeiro, Contábil, RH, etc... o maior problema é migrar a base em Access (190 tabelas) para SQL Server, da um pau danado. Nem me perguntem porque o programador desenvolveu o software utilizando Access como o SGDB. Vlw moçada pela ajuda até agora,

Pessoal, Tetei o LCDI com 1033 e 1046 e não seu certo, O formulario continua enviando o valor 9,00 e quando vou inserir no banco de dados o valor fica 90,00 O banco de dados é access, procurei por alguma configuraçao no banco e não tive sucesso, alguém teria mais alguma dica ?? Vlw moçada.

Caro Rafael, O sistema que desenvolvi esta muito complexo, ou seja, muito grande, tem 248 script em asp, mas no meu script de conexão já existe o tratamento Session.LCDI = 1046 e se eu for colocar o Replace vou passar um ano colocando. Acredito que seja um problema de configuração de sistema operacional, pois os valores só modificam quando são inseridos no banco de dados. Poder ter algo haver com MDAC ? Obrigado Rafael pela ajuda, Aguardo uma ajuda Abraços,

Prezados, Boa Tarde. Meu problema é o seguinte, compramos um Server para substituir o IIS aqui no serviço, bom, antes era um WinXP 32bits SP2 - ISS 6, agora passamos para um Win2003 Standard 64Bits - IIS 6, bom, com esta migração ocorrerão alguns erros, como era de se esperar, mas agora estou com um problema gigante que é o seguinte, quando estou manipulando algum valor, quando algum usuário do sistema entra com algum valor atravez do formulário, um valor por exemplo : 9,99 ele insere o valor no campo e faz o submit mas quando insere no banco o valor fica 999,00, isto esta ocorrendo com todos os valores que são inseridos no banco de dados. Tentei de varias formas resolver este problema, agora estou chegando a uma conclusão, acho que é o drive de conexão com o banco de dados que esta com problema. Ai pergunto, alguém já teve algum problema parecido com este ou tem alguma dica para tentar aqui? Obrigado ai..

Amigo, você mesmo já disse o problema, o banco de dados está como somente leitura. Vá até o arquivo.mdb e de permissão total para modificaçao. Se não econtrar a aba de Segurança nas propiedades do arquivo, vá até No Windows Explorer | Menu : Ferramentas --> Opções de Pasta --> Modo de Exibição e desmarque a opção [ ] Usar compartilhamento simples de arquivo (recomdável) Dai, você já pode dar permissão para modifiação do arquivo, Espero ter ajudado, Att Remero Dias

Boa tarde pessoal, Bom, sou iniciante em Linux e me esbarrei em uma questão que é a seguinte, Tenho em minha matriz um servidor linux Kurumin 7.0 rodando o samba e também tenho em minha filial um servidor kurumin 7.0 com samba. Ai pergunto. Teria a possibilidade de meus dois servidores ficarem com o mesmo domínio “mesmo nome”, pois temos um fluxo muito grande de computadores que vão para a filial e depois voltam para a matriz, gostaria que eles ficassem no mesmo domínio não precisando de toda a vez que uma maquina sair de uma rede e for para outra, coloca-lo novamente no domínio. Agradeço a atenção, Att, Romero Dias

Kara não entendi corretamente as regras de negócio, mas seu objeto oRS4 excuta somente uma vez né? bom dessa forma deve funcinar, teste ai.. abraço <% sql3 = "SELECT DISTINCT IdentificadorFilial, Cidade FROM Filial order by IdentificadorFilial " set oRS3 = oConn2.execute(sql3) '1º - while not oRS3.EOF sql4 = "SELECT Left(Imoveis.NumAutorizacao,5) AS cidades, count(*) as total FROM Concelho INNER JOIN IMOVEIS ON Concelho.Id_Concelho = IMOVEIS.Id_Concelho WHERE Left(Imoveis.NumAutorizacao,5)=Left(Imoveis.NumAutorizacao,5) GROUP BY Left(Imoveis.NumAutorizacao,5)" set oRS4 = oConn.execute(sql4) ' 2º - while not oRS4.EOF if cstr(oRS3("IdentificadorFilial")) = cstr(Request.QueryString("filial")) then %> <option selected="selected" value=<%Response.Write(oRS3("IdentificadorFilial"))%>>•&nbsp;<%=ucase(oRS3("Cidade"))%></option> <%else%> <option value="<%Response.Write(oRS3("IdentificadorFilial"))%>"><%=oRS3("Cidade")%> <%=oRS4("total")%></option> <%end if%> <% oRS4.MoveNext wend oRS4.close set oRS4 = nothing oRS3.MoveNext wend oRS3.close set oRS3 = nothing %>

kara, tb tem a opção de usar Session. Abraço

Kara, já estou essa query diramente no banco de dados ? id_cliente esta como texto ou numero ? Teste assim tb "SELECT * FROM tbleventos WHERE id_cliente ="&cliente&"" Abraço.

kara, vá até o arquivo e em Propriedades do mesmo, na aba seguraça adicione todos e permissao total Abraço

Kara, se o que quer fazer é uma simples consulta como o ADL disse, essa abiaxo deve resolver, Pagina1.asp ------------------------------------------------------------------------------ <Form name="formAvaliacao" action="Pagina2.asp" method="get"> <input type="Text" name="Codigo" value="" onChange="java script:window.document.formAvaliacao.submit();"> </Form> Pagina2.asp ------------------------------------------------------------------------------ <% Codigo = Request.QueryString("Codigo") 'Abre a conexao strSql = "SELCT *" strSql = strSql & " FROM Schedulle" strSql = strSql & " WHERE RE = "&Codigo&"" 'Gere o Recordset %> <input type="text" name="" value="<%=RS("NOME")%>"> Abraço,

kara, faça o seguinte, recupere o que estiver no bando de dados e jogue em uma variavel comentario = objRs("pComments") dai quando for fazer o update voce concatena o que já havia no bando de dados com o novo conteudo digitado pelo usuario, dai voce consegue preservar o que estava salvo e o novo comentario. formComentario = request.querystring("PrComments") novoComentario = comentario & " " & formComentario Saco. Abraço.

kara, seu erro pode estar tb quando você concatena a string sql é necessario um espaço = o exemplo abaixo. Espero ter ajudado. sql ="insert into credenciados (nome, endereco, complemento, site, telefone, email, fax, bairro, razao,entrega,cod_cidade)" sql=sql & " values ('" & nome & "','" & endereco & "','" & complemento & "','" & site & "','" & telefone & "','" & email & "','"& fax & "','" & bairro & "','" & razao & "," & entrega & "," & cod_cidade & "')" Abraço,

kara, No access você irá usar o Is Null Abraço,

Kara, vai ai um exemplo bem simples, espero que ajude, <html> <head> <script language="javascript"> function validaCk() { if (window.document.forms[0].ck1.checked) alert("on") else alert("off") } </script> </head> <body> <form name="formTeste"> <input type="checkbox" name="ck1" onclick="validaCk();"> </form> </body> </html> Abraço

Kara, uma vez tive um problema parecido, daí, resolvi desta forma, pegue o exemplo e agregue ao seu código. SELECT TOP 1, (SELECT SUM(qtde) FROM tb_movimento WHERE tipo_mov = 'e') AS E, (SELECT SUM(qtde) FROM tb_movimento WHERE tipo_mov = 's') AS S, (E - S) AS TOTAL FROM tb_movimento Sei que é meio "gambiarrento" + funfo, Abraço

karo amigo, segue abaixo o codigo, espero que ajude, é só copiar e colar em alguma pagina ASP e rodar ! <% numbersToSum = Request.QueryString("teste") newNumber = 0 newNumber = replace(numbersToSum,",","") newNumber = replace(newNumber," ","") Dim teste() numero = newNumber tamanho_matrix = Len(numero) Soma = 0 ReDim teste(tamanho_matrix) For i=1 To tamanho_matrix teste(i) = Mid(numero, i, 1) Soma = Soma + teste(i) Next if Soma = 0 then Soma = "Atribua algum valor a ser somado" End if Response.Write "Quantide : <b>" & Soma & "</b>" %> <html> <body style='font:menu'> <head><title></title></head> <form name="formTeste" action="" method="get" > <input type="checkbox" value="5" name="teste"> Arroz <input type="checkbox" value="3" name="teste"> Fejão <input type="checkbox" value="2" name="teste"> Farofa <hr> <input type="submit" value="Calcular"> </form> </body> </html> Abraço,

kara, dexa eu entender, de onde vem essa string <% if RadioModalidade = "Aéreo + Hotel + Serviço" then Aerea = tab("EmpresaAereaNome") elseif RadioModalidade = "Aéreo + Hotel" then Aerea = tab("EmpresaAereaNome") elseif RadioModalidade = "Hotel + Serviço" then Aerea = Response.Write("Não tem") else Aerea = Response.Write("Não tem") end if %> o atributo Aerea contem o Código da Empresa ? Só quer exibir os dados da empresa selecionada no select? Seja mais especifico, abraço

Notax ! kara, qual DB você ta utilizando ? Access ? o campo que usa para inserir as datas esta como Data/Hora ? Para melhorar sua aplicação, use a função Cdate anoi=year(Cdate(Request.Form("dtInicial"))) mesi=month(Cdate(Request.Form("dtInicial"))) diai=day(Cdate(Request.Form("dtInicial"))) Session.LCID = 1033 --> Data Padrão Americanio Session.LCID = 1046 --> Data Padrão Brasileiro Para saber mais leia o tópico abaixo http://www.imasters.com.br/artigo/777/asp/..._o_sessionlcid/ falou

kara, não entendi o que esta querendo fazer, mas vai ai uma soluçao <select name="select1"> <option value="todos">Todos</option> . . . . </select> <select name="select2"> <option value="todos">Todos</option> . . . . </select> <% select1 = request.form("select1") select2 = request.form("select2") if select1 = "todos" or select2 = "todos" then SELECT * FROM acat ORDER BY ERRO_MEDIO ASC end if %> Espero ter ajudado.

obrigado pessoal, funfo direitinho,

kara, dependen da quantidade de dados que você vai resgatar, se for muito, aconselho você a fazer uma nova consulta na pagina de destino ou seja, <a href="pag2.asp?codigo=<%=objRs("codigo")%>">Ver Dados</a> na pagina dois, com o codigo informado você faz mais um select, falw,

Boa Noite Pessoal, Bom, tenho um sistema todo em asp, me deparei hoje, com uma tarefa que me repassarao, que o a seguinte, tenho que retornar registos de uma tabela, com referencia a dois ou mais codigos ou seja, veja exemplo abaixo, talves seja uma ignorancia minha, mas como eu faria para retornar registos a partir de dois ou mais codigos predefinidos, strSql = "select nmFunc, cfpFunc from tbFunc where codFunc = '00121' and codFunc = '00125'" agradeço a atenção

Boa tarde pessoal, Bom tenho um banco de dados em um servidor remoto, Fisioco c:\domains\host.com\wwwroot\banco.mdb Http http://www.infodesignengenharia.com.br/banco.mdb meu sistema é local (intranet), mas o banco é na internet, gostaria de saberm como faço a conexao com o banco de dados remoto, segue abaixo minha string de conexão "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=http://www.host.com/banco.mdb; Jet OLEDB" como devo fazer para conectar? desde já agradeço