Ir para conteúdo
Fórum Script Brasil
  • 0

Problemas De Link Asp

Guest - Gabriel -

Perguntado por Guest - Gabriel -,

 Share

Pergunta

Guest - Gabriel -

Guest - Gabriel -

Postado
Postado

Pessoal, estou com um probleminha filho da p..........., tenho uma página de cadastro onde exibe todos os usuários cadastrados (Users.asp), porém quando eu clico na figura editar usuário ele deveria chamar uma outra página asp chamada de editarUser.asp, mas na verdade o que acontece é que não exibe a página e nem erro, simplesmente informa aquela famosa frase " a página não pode ser exibida", estou postando os códigos abaixo, se alguém puder dar uma força eu agradeço muito.

desde já obrigado.

Users.asp

***********

<%

option explicit

%>

<!--#include file="bib_conexao.asp"-->

<%

Dim sqlUser, rsUser, counter

counter = 0

sqlUser = "SELECT * FROM login ORDER BY ID_User"

call abre_conexao

set rsUser = Conexao1.Execute(sqlUser)

%>

<html>

<head>

<title></title>

<link rel="stylesheet" href="estilo/estilo2.css">

<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">

</head>

<body topmargin="0" leftmargin="0" marginhight="0" marginwidth="0" bgcolor="#FFFFFF" text="#000000">

<table width="778" border="0" class="tabela">

<tr>

<td>

<table border="0" width="650" align="center" class="forms">

<%

IF session("nivel") <> 1 THEN

%>

<tr>

<td colspan="6">

<div align="center"><b><font size="3">Voc&ecirc; n&atilde;o tem permiss&atilde;o

para<br>

visualizar todos os usu&aacute;rios cadastrados.<br>

Por favor entre em contato com o<br>

Administrador !!!<br>

</font></b><font size="3"> <font size="2"><a href="javascript:history.go(-1)">Voltar</a></font></font></div>

</td>

</tr>

<%

ELSE

%>

<tr>

<td colspan="6" background="images/fundo_meio.gif">

<div align="center"><font size="4"><b>USU&Aacute;RIOS CADASTRADOS</b></font></div>

</td>

</tr>

<tr>

<td width="62" background="images/back_azul.gif">

<div align="center"><b><font color="#FFFFFF">C&oacute;digo</font></b></div>

</td>

<td width="86" background="images/back_azul.gif">

<div align="left"><b><font color="#FFFFFF">Login</font></b></div>

</td>

<td width="205" background="images/back_azul.gif">

<div align="left"><b><font color="#FFFFFF">Nome</font></b></div>

</td>

<td width="129" background="images/back_azul.gif">

<div align="center"><b><font color="#FFFFFF">N&iacute;vel de Acesso</font></b></div>

</td>

<td width="129" background="images/back_azul.gif">

<div align="center"><b><font color="#FFFFFF">Alterar</font></b></div>

</td>

<td width="129" background="images/back_azul.gif">

<div align="center"><b><font color="#FFFFFF">Excluir</font></b></div>

</td>

</tr>

<%

dim cor

dim bg

dim fonte

cor = 1

While Not rsUser.eof

if (cor = 1) then

bg = "#66cccc"

'fonte = "#000000"

cor = 2

else

bg = "images/fundo_meio.gif"

'fonte = "#ffffff"

cor = 1

end if

%>

<tr>

<td background="<%=bg%>" width="62">

<div align="center"><font color="#000000"><%=rsUser("ID_User")%></font></div></td>

<td background="<%=bg%>" width="86">

<div align="left"><font color="#000000"><%=rsUser("user")%></font></div></td>

<td background="<%=bg%>" width="205">

<div align="left"><font color="#000000"><%=rsUser("nome")%></font></div></td>

<td background="<%=bg%>" width="129">

<div align="center"><font color="#000000"><%=rsUser("COD_Nivel")%></font></div></td>

<td background="<%=bg%>" width="129">

<div align="center"><a href="editarUser.asp?id=<%=rsUser("ID_User")%>"><img src="images/ico_editar.gif" width="19" height="19" border="0"></a></div>

</td>

<td background="<%=bg%>" width="129">

<div align="center"><img src="images/ico_excluir.gif" width="19" height="19"></div>

</td>

</tr>

<%

counter = counter + 1

rsUser.MoveNext

wend

%>

<tr>

<td colspan="6">

<div align="center"><br>No momento temos <b><%=counter%></b> usu&aacute;rios

cadastrados em nosso sistema.</div>

</td>

</tr>

<tr>

<td colspan="2">

<div align="left"><br>

<a href="IncluirLogin.asp">Novo Usu&aacute;rio</a> </div>

</td>

<td colspan="2">

<div align="right"><br>

</div>

</td>

<td colspan="2">

<div align="right"><br>

<a href="javascript:history.go(-1)">Voltar</a> </div>

</td>

</tr>

<%

END IF

%>

</table>

</td>

</tr>

</table>

<!--#include file="rodape.asp"-->

</body>

</html>

<%

rsUser.Close

call fecha_conexao

set rsUser = nothing

%>

***********

EditarUser.asp

************

<%

Option Explicit

%>

<!--#include file="bib_conexao.asp"-->

<%

Dim varID, rsEdit, sqlEdit, rsNivel, sqlNivel, varNivel

varID = Request.Querystring("id")

sqlEdit = "SELECT * FROM login WHERE ID_User = '"& varID &"'"

sqlNivel = "SELECT * FROM nivel ORDER BY nivel"

Call abre_conexao

Set rsEdit = Conexao1.Execute(sqlEdit)

Set rsNivel = Conexao1.Execute(sqlNivel)

varNivel = rsEdit("COD_Nivel")

%>

<html>

<head>

<title></title>

<link rel="stylesheet" href="estilo/estilo2.css">

<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">

</head>

<body topmargin="0" leftmargin="0" marginhight="0" marginwidth="0" bgcolor="#FFFFFF" text="#000000">

<table width="778" class="tabela">

<tr>

<td>

<form name="EditaLogin" method="post" action="editarUser2.asp">

<table width="300" border="0" align="center" class="forms">

<tr>

<td background="images/fundo_meio.gif" colspan="2">

<div align="center"><b><font size="4">ALTERA&Ccedil;&Atilde;O </font><font size="4">

DE USU&Aacute;RIO</font></b></div>

</td>

</tr>

<tr>

<td width="64">Nome</td>

<td width="226">

<input type="text" name="usuario" size="45" maxlength="30" value="<%=rsEdit("nome")%>">

</td>

</tr>

<tr>

<td width="64">Login</td>

<td width="226">

<input type="text" name="login" size="45" value="<%=rsEdit("user")%>">

</td>

</tr>

<tr>

<td width="64">Senha</td>

<td width="226">

<input type="password" name="senha" size="20" value="<%=rsEdit("senha")%>">

</td>

</tr>

<tr>

<td width="64">N&iacute;vel</td>

<td width="226">

<select name="nivel" class="forms">

<%

while not rsNivel.eof

%>

<option value="<%=rsNivel("COD_Nivel")%>"

<% if rsNivel("COD_Nivel") = varNivel then

response.write("selected")%> >

<%=rsNivel("nivel")%>

</option>

<%

rsNivel.MoveNext

Wend

rsNivel.Close

Set rsNivel = Nothing

%>

</select>

</td>

</tr>

<tr>

<td background="images/fundo_meio.gif" colspan="2">

<div align="right">

<input type="button" name="voltar" value="cancelar" class="botao" onclick="javascript:history.go(-1)">

<input type="submit" name="salvar" value="Salvar" class="botao">

</div>

</td>

</tr>

</table>

<input type="hidden" name="id" value="<%=varID%>">

</form>

<%

rsEdit.Close

Call fecha_conexao

Set rsEdit = Nothing

%>

</td>

</tr>

</table>

</body>

</html>

Link para o comentário
Compartilhar em outros sites

2 respostass a esta questão

Posts Recomendados

  • 0
dark0

dark0

Postado
Postado

Bom..

você criou 3 tópicos iguais..

então eu deixei esse, e removi os outros 2, ok?

Vamos lá:

Quando clica na imagem, que deveria abrir a pagina, para que pagina vai?

dá pagina não encontrada... mas pelo menos abre alguma pagina?

não parece ter erro naquela parte.. pelo menos ate onde olhei..

Link para o comentário
Compartilhar em outros sites

Participe da discussão

Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.

Visitante
Responder esta pergunta...

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emoticons são permitidos.

×   Seu link foi incorporado automaticamente.   Exibir como um link em vez disso

×   Seu conteúdo anterior foi restaurado.   Limpar Editor

×   Você não pode colar imagens diretamente. Carregar ou inserir imagens do URL.

×
 Share
Ir para lista de Perguntas


  • Estatísticas dos Fóruns

    • Tópicos
      152,3k
    • Posts
      652,5k
×
×
  • Criar Novo...