Fernando

[Junior QDN]

e ae pesoal firmeza? sou leio em asp e queria ajuda pra criar um select case ou seja o usuario sera redirecionado para uma determinada pagina com dados de sua empresa, ou seja tem q ser uma pagina pra cada cliente, como faço isso?

Codigo de conexa com o banco

<%

vlogin = Request.Form("login")

senha = Request.Form("senha")

if vlogin = "" then

Response.Redirect "error.asp"

end if

Set conn = Server.CreateObject("ADODB.Connection")

rs = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("senha.mdb")

conn.Open rs

sql = "SELECT * FROM acesso WHERE login= '" & vlogin & "' and senha='" & senha & "'"

Set verifica = Server.CreateObject("ADODB.Recordset")

verifica.Open sql, conn, 3, 3

If not verifica.EOF then

user = verifica("login")

elseif user = "" then

Response.Redirect "error.asp"

end if

if not verifica.EOF then

vlogin = verifica.Fields("login").Value

Response.Redirect"acesso.asp"

elseif vlogin <> verifica.Fields("login").Value then

Response.Redirect "error.asp"

End if

%>

Atenciosamente,

Fernando

[SPAWN™]

Acho que isso pode te ajudar

[Guest - Fernando -]

e ae spaw, entaum mas não é exatamente criar niveis e sim redireciona um usuario para cada pagina pois são empresas diferentes e informacoes confidencais entende? e ae alguma sugestao pessoal

t+

[Reginaldo ASP]

empresa = request.querystring("empresa")

Select Case empresa

case 1

response.redirect "empresa1.asp"

case 2

response.redirect "empresa2.asp"

End select

[Guest - Fernando -]

e ae reginaldo firmeza?

Oh tipo da uma explicada melhor se possivel pois não entendi muito aonde entra isso no codigo?

empresa = request.querystring("empresa")

Select Case empresa

case 1

response.redirect "empresa1.asp"

case 2

response.redirect "empresa2.asp"

End select

o case 1 é redirecionado pra o primeiro cadastro no banco e assim por diante ou não?

Grato Des Já

Fernando

[Reginaldo ASP]

Vamos supor que o seu Banco de dados tenha login - senha - cod_empresa:

Então depois de conectar ao bd você faz:

empresa = verifica("cod_empresa")

select case empresa

case 1

response.redirect "empresa1.asp"

etc...

A empresa 1, tem o codigo 1, e se o código for 1 redireciona para a página específica, se for 2, idem...

Melhorou?

[Deividy]

Carinha como eu estou acompanhando o trabalho acho que a melhor coisa que você pode fazer é quando for cadastrar a empresa você cadastrar uma tela de entrada pra ele tambem.]

Assim quando o cara logar vai chamar tudo o que é dele assim chamaria a tela da empresa especificamente.

Entendeu.