Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

JBNC

[Resolvido] Combo Dinâmico

Por , em ASP Clássico

Recommended Posts

Mário Monteiro    179

Mário Monteiro
Postado

Nao é isso que ele pediu JBNC

 

Preste atenção

 

Ele que quer voce execute esta pagina normal como vem faznedo

 

Ai com ela aberta voce abre o codigo html que foi gerado e poste aqui

 

Nao é o codigo ASP, entendeu? é o HTML gerado

 

Faça isso e poste corretamente dessa vez

Compartilhar este post

Link para o post
Compartilhar em outros sites

renata_nunes    0

renata_nunes
Postado

eu estou tendo o mesmo problema, apesar de ter postado um modelo do select, verifico que está com esse problema de não ler no bd... se puderem dar uma olhadinha no codigo

A conexão está certa pois outro campos do form estão sendo preenchidos corretamente e estou usando Sql Server...

e qdo vizualizo no codigo html pelo browser entra direto no "else"... e desculpe pela intromissão no tópico do colega...

 

CODE
<!-- #include file="globalLocal.asp" -->

<%

 

codNoticia = request.QueryString("codigo")

acao = request.QueryString("act")

tipo = request.QueryString("tipo")

autor = request.QueryString("autor")

 

set conn = obtain_connection()

 

set rsNoticia = Server.CreateObject("ADODB.Recordset")

set rsEditor = Server.CreateObject("ADODB.Recordset")

set rsTipo = Server.CreateObject("ADODB.Recordset")

 

 

sqlNoticia = "select * from noticias4 WHERE(codigo = '"&codNoticia&"')"

rsNoticia.Open sqlNoticia, conn

 

 

sqlTipo = "select nome from tipodenoticia"

rsTipo.open sqlTipo, conn

 

 

sqlEditor = "select nome from editores where codigo = '"&autor&"'"

rsEditor.Open sqlEditor, conn

 

 

%>

<title>Módulo de Administração</title>

<link href="../css/style.css" rel="stylesheet" type="text/css" />

<link href="../css/exibir.css" rel="stylesheet" type="text/css" />

<link href="../css/modulo.css" rel="stylesheet" type="text/css" />

<script type="text/JavaScript">

<!--

 

//-->

</script>

</head>

autenticado = <%=session("codigo")%>

nivel = <%=session("nivel")%>

<body>

 

<div id="mae">

<div id="pcerj">

<ul id="titPcerj">

<li id="TSup">POLÍCIA CIVIL</li>

<li id="TInf">DO ESTADO DO RIO DE JANEIRO</li>

</ul>

</div>

<div id="subTitulo">

Módulo de Administração - Edição

</div>

<br />

<img src="../imagem/imgTopo.jpg" />

<div id="conteudo">

<div id="formNoticia" >

<br /><%

if acao = "editar" then %>

<form name="form1" method="get" action="actEditar.asp"> <%

else %>

<form name="form1" method="get" action="actExcluir.asp"> <%

end if %>

<table width=60% height=auto cellspacing="4" class="tabCentralizada">

<tr><td colspan="3">Titulo:</td>

</tr>

<tr><td colspan="3"><input type="text" name="titulo" size="90" value="<%=rsNoticia("titulo")%>"/></td></tr>

<tr><td colspan="3">Resumo:</td></tr>

<tr>

<td colspan="3"><textarea name="resumo" cols="80" rows="5"><%=rsNoticia("resumo")%></textarea></td>

</tr>

<tr><td colspan="3">Corpo:</td></tr>

<tr><td height="51" colspan="3"><textarea name="corpo" cols="80" rows="15" id="corpo"><%response.write(rsNoticia("corpo"))%></textarea></td></tr>

<tr><td colspan="3">Autor:</td></tr>

<tr><td colspan="3"><input name="autor" size="50" value="<%=rsEditor("nome")%>"/></td></tr>

<tr><td colspan="3">Sessão:</td>

</tr>

<tr>

<td colspan="3">

<select name="tipo">

<option value="<%=tipo%>" selected="selected"><%=tipo%></option>

<% while not rsTipo.EOF

if rsTipo("nome") = tipo then

rsTipo.moveNext

else%>

<option value="<%=rsTipo("nome")%>"><%=rsTipo("nome")%></option>

<% rsTipo.moveNext

end if

wend

%>

</select>

</td>

</tr>

<% if session("nivel") <> 1 then %>

<tr><td colspan="3">Foto de capa: </td></tr>

<tr><td colspan="3"><input type="text" name="fotocapa" size="20" value="<%=rsNoticia("fotocapa")%>"/>.jpg</td>

</tr>

<tr><td colspan="3">Legenda: </td></tr>

<tr><td colspan="3"><input type="text" name="legenda" size="90" value="<%=rsNoticia("legenda")%>"/></td></tr>

<tr><td>Foto interna:</td><td>Destaque:</td><td>Status:</td></tr>

<tr><td >

<select name="foto">

<% if rsNoticia("foto")= "s" then%>

<option value="s">Sim</option>

<option value="n">Não</option>

<%else%>

<option value="n" selected="selected">Não</option>

<option value="s">Sim</option>

<%end if%>

</select>

 

</td><td>

 

<select name="destaque">

<% if rsNoticia("destaque")= "s" then%>

<option value="s">Sim</option>

<option value="n">Não</option>

<%else%>

<option value="n">Não</option>

<option value="s">Sim</option>

<%end if%>

</select>

 

</td><td>

 

<select name="status">

<% if rsNoticia("status")= "a" then%>

<option value="a">Liberado</option>

<option value="i">Pendente</option>

<%else%>

<option value="i">Pendente</option>

<option value="a">Liberado</option>

<%end if%>

</select>

 

</td></tr> <%

 

end if %>

<tr>

<td width="44" height="50"><input type="submit" name="reset" value="Limpar" /></td>

<td width="42"><input type="submit" name="Submit" value="Salvar" /></td>

</tr>

</table>

</form>

</div>

</div>

<%

set rsNoticia = nothing

set rsTipo = nothing

%>

<div id="rodapeExibir"> Polícia Civil do Estado do Rio de Janeiro </div>

</div>

</body>

 

</html>

eu estou tendo o mesmo problema, apesar de ter postado um modelo do select, verifico que está com esse problema de não ler no bd... se puderem dar uma olhadinha no codigo

Compartilhar este post

Link para o post
Compartilhar em outros sites

Mário Monteiro    179

Mário Monteiro
Postado

Renata é melhor criar outro topico para nao misturar com a duvida deste topico que ainda nao foi solucionada

Compartilhar este post

Link para o post
Compartilhar em outros sites

JBNC    0

JBNC
Postado

Fala pessoal,

Já resolvi o problema. O problema e que eu estava ultilizando no formato em HTML e não em ASP.

Quando eu tornei ele em asp funcionou.

Muito obrigado pela força e quaisquer duvida eu posto um nova duvida.

 

Atenciosamente.

 

 

JBNC.. :)

Compartilhar este post

Link para o post
Compartilhar em outros sites

Mário Monteiro    179

Mário Monteiro
Postado

Ok entao

 

Abraços

Compartilhar este post

Link para o post
Compartilhar em outros sites
Ir para a lista de tópicos ASP Clássico
×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.

  Aceito