Ir para conteúdo

Arquivado

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

Martinsrj

[Resolvido] [Erro] Alteração

Recommended Posts

Ola pessoal, boa tarde!

Estou com dificuldade de criar link no campo ID, pois ao ser selecionado como parametro cod_dados por intermedio da variavel cod_dados1.

Verifique na imagem abaixo o campo ID, justamente a coluna que desejo que criar o link:

Imagem Postada

Abaixo segue o erro:

Imagem Postada

 

ABAIXO segue o meu codigo:

<%
Option Explicit
%>
<!--#Include file="conexao.asp"-->
<%
Dim conbd_gd1, rsDados, strSQL 
strSQL = "SELECT status, id, sistema, descricao, observacao, fase, plano_entrega FROM tab_dados"
strSQL = strSQL & " order by dt_inc desc"
Call AbreConexao

Set rsDados = conbd_gd1.Execute(strSQL)
'--response.write strSQL
%>

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<title>Untitled Document</title>

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

<style type="text/css">
<!--
body {
	margin-left: 0px;
}
-->
</style>
</head>

<body>
<table width="100%" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
	<td><!--#include file="topo.asp"--></td>
  </tr>
</table>
<table width="100%" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
	<td class="tabela_fundo" ><div align="center"> <br />
		  <table width="98%" border="0" cellpadding="0" cellspacing="1" bgcolor="#CCCCCC">
			<tr>
			  <td height="200" class="tabela_branca"><div align="center"> 
				<!-- Div do codigo horário -->
				
<br />
				  <table width="98%" border="0" cellspacing="0" cellpadding="0">
					<tr>
					  <td><div align="right"><a href="login.asp" class="menu19"><strong>Módulo Administrativo</strong></a>  </div></td>
					</tr>
				  </table>
				  <table width="98%" border="0" cellspacing="0" cellpadding="0">
				  <tr>
					<td><span class="style2">Status dos Problemas - Atendimento</span></td>
				  </tr>
				</table> 
				<br />
				<table width="98%" border="0" cellpadding="0" cellspacing="1" bgcolor="#CCCCCC">
				  <tr>
					<td width="9%" height="20" class="tabela_verde"><div align="center" class="style3">Status</div></td>
					<td width="6%" class="tabela_verde"><div align="center" class="style3"><strong>ID</strong></div></td>
					<td width="12%" class="tabela_verde"><div align="center" class="style3">Sistema</div></td>
					<td width="22%" class="tabela_verde"><div align="center" class="style3">Descrição / Impacto</div></td>
					<td width="17%" class="tabela_verde"><div align="center" class="style3">Observações</div></td>
					<td width="17%" class="tabela_verde"><div align="center" class="style3">Fase</div></td>
					<td width="17%" class="tabela_verde"><div align="center" class="style3">Plano de Entrega</div></td>
				  </tr>
<%
Do While Not rsDados.Eof
%>

				  <tr>
					<td width="9%" height="20" class="tabela_branca"><div align="center" class="style3">
					<% = rsDados.Fields("status") %></div></td>
					<td width="6%" class="tabela_branca"><div align="center" class="style3">
					<a hef="alt2.dados.asp?cod_dados1=<% = rsDados.Fields("cod_dados") %>"> <% = rsDados.Fields("id") %></a>
					</div></td>
					<td width="12%" class="tabela_branca"><div align="center" class="style3">
					<% = rsDados.Fields("sistema") %></div></td>
					<td width="22%" class="tabela_branca"><div align="center" class="style3"><% = rsDados.Fields("descricao") %></div></td>
					<td width="17%" class="tabela_branca"><div align="center" class="style3">
					<% = rsDados.Fields("observacao") %></div></td>
					<td width="17%" class="tabela_branca"><div align="center" class="style3">
					<% = rsDados.Fields("fase") %></div></td>
					<td width="17%" class="tabela_branca"><div align="center" class="style3">
					<% = rsDados.Fields("plano_entrega") %></div></td>
				  </tr>
<%
rsDados.MoveNext
Loop
rsDados.Close
Call FechaConexao
Set rsDados = Nothing
%>
					  </table>
					</div></td>
					<td class="tabela_branca"><div align="center"></div></td>
					
				  </tr>
				</table>
				<br />
				<br />
				<br />
			  </div></td>
			</tr>
		  </table>
		<br />
	</div></td>
  </tr>
</table><!--#include file="rodape.asp"-->
</body>
</html>

Desde ja agradeço ajuda de todos.

 

Esqueci de colocar a minha tabela:

tab_dados  CREATE TABLE `tab_dados` (			   
			 `cod_dados` int(10) NOT NULL,		  
			 `status` varchar(100) DEFAULT NULL,	
			 `id` varchar(10) DEFAULT NULL,		 
			 `sistema` varchar(20) DEFAULT NULL,	
			 `descricao` text,					  
			 `cod_grupo` varchar(12) DEFAULT NULL,  
			 `observacao` text,					 
			 `fase` varchar(20) DEFAULT NULL,	   
			 `plano_entrega` text,				  
			 `dt_inc` datetime DEFAULT NULL,		
			 PRIMARY KEY (`cod_dados`)			  
		   ) ENGINE=InnoDB DEFAULT CHARSET=utf8

Compartilhar este post


Link para o post
Compartilhar em outros sites

Este erro está ocorrendo pois você não incluiu a coluna COD_DADOS na instrução SQL que carrega o seu recordset.

 

Você precisa fazer o seguinte:

strSQL = "SELECT COD_DADOS, status, id, sistema, descricao, observacao, fase, plano_entrega FROM tab_dados"

 

Abraços

Compartilhar este post


Link para o post
Compartilhar em outros sites

Ola amigão fiz exatamente o que você mencionou. Deu certo em parte, porem na coluna ID não foi criado o link nos registtros.

 

Conforme a minha intenção nesse código:

<td width="6%" class="tabela_branca"><div align="center" class="style3">
					<a hef="alt2.dados.asp?cod_dados1=<% = rsDados.Fields("cod_dados") %>">
					<% = rsDados.Fields("id") %></a>
					</div></td>

<%
Dim conbd_gd1, rsDados, strSQL 
strSQL = "SELECT * FROM tab_dados"
strSQL = strSQL & " order by dt_inc desc"
Call AbreConexao

Set rsDados = conbd_gd1.Execute(strSQL)
'--response.write strSQL
%>

 

Este erro está ocorrendo pois você não incluiu a coluna COD_DADOS na instrução SQL que carrega o seu recordset.

 

Você precisa fazer o seguinte:

strSQL = "SELECT COD_DADOS, status, id, sistema, descricao, observacao, fase, plano_entrega FROM tab_dados"

 

Abraços

Compartilhar este post


Link para o post
Compartilhar em outros sites

A questão do link é um probleminha de sintaxe/digitação o correto seria:

 

<a href="alt2.dados.asp?cod_dados1=<% = rsDados.Fields("cod_dados") %>">

<% = rsDados.Fields("id") %></a>

Faltou um R ali.

 

Abraços

Compartilhar este post


Link para o post
Compartilhar em outros sites

Valeu Giovane, valeu galera pela ajuda!

o erro estava nessa linha: <a href="alt2.dados.asp?cod_dados1=<% = rsDados.Fields("cod_dados") %>">

 

Esqueci de colocar o R no <a href ... rsrsrsrsrs

 

Agora irei iniciar a pagina que exibirá no formulario contendo os campos para a alteração.

 

desde já agradeço pela ajuda e conto com vocês para as futuras dúvidas.

 

Abraços

 

A questão do link é um probleminha de sintaxe/digitação o correto seria:

 

<a href="alt2.dados.asp?cod_dados1=<% = rsDados.Fields("cod_dados") %>">

<% = rsDados.Fields("id") %></a>

 

Faltou um R ali.

 

Abraços

Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

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