fabio_jms

você não pega os valores do bd? entaum só verifica se estaum preenchidos ou não ... <% if isnull(rs("campo1")) then campo1=0 else campo1=rs("campo1") end if if isnull(rs("campo2")) then campo2=0 else campo2=rs("campo2") end if if isnull(rs("campo3")) then campo3=0 else end if campo3=rs("campo3") end if if isnull(rs("campo4")) then campo4=0 else campo4=rs("campo4") end if soma=campo1+campo2+campo3+campo4 %> Nuam entendi direito mais é isso q você quer?

[form name=restrito" method="post" action="[%request.ServerVariables("SCRIPT_NAME")%]] Login [input type=text" name="login" size="20" maxlength="20] Senha[input type=password" name="senha" size="11" maxlength="15] [input type=submit" name="Submit" value="Entrar] [/form] [% if request.ServerVariables("CONTENT_LENGTH") <> o then dim login dim senha 'Meus parametros para conexao com base de dados SQL server 2000 conexao="Provider=SQLOLEDB.1;Password=****;Persist Security Info=False;User ID=intranet;Initial Catalog=Custos;Data Source=tbserversis\mof" '--------------------------------------------------------------------------------------------- Set DB = Server.CreateObject("ADODB.Connection") DB.Open conexao login=(Request.form("login")) senha=(Request.form("senha")) Set rs = Server.CreateObject("ADODB.Recordset") rs.open "SELECT * FROM login WHERE login='"&login&"' AND senha='"&senha&"'",DB if rs.eof then Response.Redirect "loginnegado.asp" else Session("login")= rs("login") session("logado")= "sim" Response.Redirect "index.asp" end if end if %] trocar [] por <> se não entender alguma parte do cod me avisa Ate

Sistema de login q direciona pra diversos telas? Se for isso q você precisa tem q fazer um controle com ajuda de um banco de dados, e select case assim: select case tela case usuario A redirect pagA case usuario B redirect pagB case usuario C redirect pagC end select Ate. Select case rodrigo, rodrigo select case. Agora q já estaum apresentados ... <.% dim login dim senha DB.Open conexao login=(Request.form("login")) senha=(Request.form("senha")) Set rs = Server.CreateObject("ADODB.Recordset") Ssql=("SELECT * FROM tabela WHERE login='"&login&"' AND senha='"&senha&"' ") set rs=DB.Execute(Ssql) 'response.Write(Ssql) if rs.eof then Response.Redirect "loginnegado.asp" else if rs("ligado_desligado") = 0 then response.Redirect("manutencao.asp") else user = rs("user") select case user case "1" response.redirect "pag1" case "2" response.redirect "pag2" case "3" response.redirect "pag3" case "4" response.redirect "pag4" end select end if end if DB.close set DB=nothing %.> esse é um exemplo q eu crie para um site q desenvolvi. Qualquer duvida posta ai.

Eu uso um programa q faz excelentes menus. Procura na web por Selteco Menu Maker Ate

Opa exatamente isso! Valeu ...

Sistema de login q direciona pra diversos telas? Se for isso q você precisa tem q fazer um controle com ajuda de um banco de dados, e select case assim: select case tela case usuario A redirect pagA case usuario B redirect pagB case usuario C redirect pagC end select Ate.

Manoh se fosse você desistia desse script ai. Não sei, mas ASP com VBscript é mais facil q com Jscript. também é aquele negocio, você disse q não manja nada de asp, mais tem q manjar de Jscript pra entender aquele cod de login q o dreamweaver gerou. Se quiser posso postar um script simples de login aqui usando VBscript Ate.

Já tentou usando uma conexao do tipo ODBC?

Galera estou com uma duvida. Como formatar valores vindo do banco de dados? Preciso formatar valores separando milhares com um ponto (.) e usando duas casas decimais depois da virgula. no vb existe uma função format(var,0.000,00) algo assim ... gostaria de saber se no asp tambem tem? Obrigado.

Algumas instruções de select , insert e update mudam do access para o sql server. Os tipos de dados também. Qualquer duvida manda msg ae. Ate.

Somente o winXP pro pode rodar o IIS, winXp home não adianta. Personal Web Server só roda em win9x. Ate.

Galera já li alguma coisa sobre o assunto mais não lembro onde, alguém ai sabe resolver esse problema ou de algum lugar na net q tenha uma boa explicação/tutorial? Sem mais, Fabio