Ir para conteúdo

POWERED BY:

Arquivado

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

caioosman

Problema com alteração de cadastro...

Por , em ASP Clássico

Recommended Posts

caioosman    0

caioosman
Postado

Olá galera, estou editando um sistema de cadastro de Moto Clubes, no qual adaptei ele de um outro sistema... está tudo funcionando ok, só a função alterar que apresenta o seguinte erro:

 

Microsoft OLE DB Provider for ODBC Drivers error '80004005'

 

[Microsoft][ODBC Microsoft Access Driver] Field 'motoclubes.Presidente' cannot be a zero-length string.

 

/motoclubes/alterar.asp, line 19

 

Arquivo alterar.asp:

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

<%

AbreConexao

Dim motoclube,Cidade,Estado,Presidente,Quantidade_membros,Telefone,Email,Site,Url_br

asao,Disp,ID

motoclube = replace(request.form("Motoclube"), "'", "''")

Cidade = replace(request.form("Cidade"), "'", "''")

Estado = replace(request.form("Estado"), "'", "''")

presidente = replace(request.form("Presidente"), "'", "''")

Quantidade_membros = replace(request.form("Quantidade_membros"), "'", "''")

Telefone = replace(request.form("Telefone"), "'", "''")

Email = replace(request.form("Email"), "'", "''")

Site = replace(request.form("Site"), "'", "''")

Url_brasao = replace(request.form("Url_brasao"), "'", "''")

Disp = replace(request.form("Disp"), "'", "''")

ID = replace(request.form("ID"), "'", "''")

 

 

alterar = "UPDATE motoclubes SET motoclube = '" & Motoclube & "', Cidade = '" & Cidade & "', Estado = '" & Estado & "', presidente = '" & Presidente & "', Quantidade_membros = '" & Quantidade_membros & "', Telefone = '" & Telefone & "', Email = '" & Email & "', Site = '" & Site & "', Url_brasao = '" & Url_brasao & "', Disp = '" & Disp & "' WHERE ID = " & (ID) & ""

Conexao.Execute(alterar)

FechaConexao

response.redirect "admin.asp"

%>

 

Arquivo que visualiza os Moto Clubes e permite a atualização dos dados:

<!--#include file="restrito.asp"--><!--#include file="conecta.asp"--><%AbreConexaolistar = "SELECT * FROM motoclubes ORDER BY ID DESC"Set lista = Conexao.Execute(listar)%><html><head><title>Administre os Inscritos</title><style>input         {background-color: #D4D4D4; font-family: Verdana; font-size: 8pt; color: #000000;}textarea      {background-color: #D4D4D4; font-family: Verdana; font-size: 8pt; color: #000000;}body,td,th {	font-family: Verdana, Arial, Helvetica, sans-serif;	font-size: 11px;	color: #CCCCCC;}body {	background-color: #000000;	background-image: url(../layout/back.gif);	margin-left: 0px;	margin-top: 0px;	margin-right: 0px;	margin-bottom: 0px;}.style1 {	font-size: 12px;	font-weight: bold;}</style><meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1"></head><body link="#000000" vlink="#000000" alink="#000000"><hr size="1"><p align="center" class="style1"><font face="Tahoma">Administração dos Moto Clubes Inscritos </font></p><hr size="1"><p align="center"><%if lista.EOF then%> <font face="Tahoma"><b> N</b>ão há usuários cadastrados <%else%>  </font> <%do while NOT lista.EOF%> <form method="post" action="alterar.asp"><center>  <div align="center">    <table border="0" cellpadding="0" cellspacing="2">      <tr>        <th width="179" class="estilotexto" scope="row"><div align="left" class="style3">Moto Clube:</div></th>        <td width="173">             <p>        <input type="text" name="nome" size="20" value="<%= lista("Motoclube")%>"></p>        </td>      </tr>      <tr>        <th width="179" class="estilotexto" scope="row"><div align="left">Cidade:</div></th>        <td width="173"><font face="Tahoma"><input type="text" name="email" size="20" value="<%= lista("Cidade")%>"></font></td>      </tr>      <tr>        <th width="179" class="estilotexto" scope="row"><div align="left" class="style3">Estado:</div></th>        <td width="173"><font face="Tahoma"><input type="text" name="idade" size="20" value="<%= lista("Estado")%>"></font></td>      </tr>      <tr>        <th width="179" class="estilotexto" scope="row"><div align="left" class="style3">Presidente:</div></th>        <td width="173"><font face="Tahoma"><input type="text" name="cidade" size="20" value="<%= lista("Presidente")%>"></font></td>      </tr>      <tr>        <th width="179" class="estilotexto" scope="row"><div align="left" class="style3">Quantidade de membros: </div></th>        <td width="173"><font face="Tahoma"><input type="text" name="estado" size="20" value="<%= lista("Quantidade_membros")%>"></font></td>      </tr>      <tr>        <th width="179" class="estilotexto" scope="row"><div align="left"><span class="style3">Telefone:</span></div></th>        <td width="173"><font face="Tahoma"><input type="text" name="site" size="20" value="<%= lista("Telefone")%>"></font></td>      </tr>      <tr>        <th width="179" class="estilotexto" scope="row"><div align="left">E-mail:</div></th>        <td width="173"><font face="Tahoma">          <input type="text" name="site2" size="20" value="<%= lista("Email")%>">        </font></td>      </tr>      <tr>        <th width="179" class="estilotexto" scope="row"><div align="left">Site:</div></th>        <td><font face="Tahoma">          <input type="text" name="site3" size="20" value="<%= lista("Site")%>">        </font></td>      </tr>      <tr>        <td align="right" valign="top"><div align="left"><font face="Tahoma"><b>Url do Brasão: </b></font></div></td>        <td width="173"><font face="Tahoma">          <input type="text" name="site4" size="20" value="<%= lista("Url_brasao")%>">        </font></td>      </tr>      <tr>        <td align="right" valign="top"><div align="left"><strong>Disponível:</strong></div></td>        <td><select name="Disp">    <option value="S" <%If lista("Disp")="S" Then Response.Write "selected" End If%>>Sim</option>    <option value="N" <%If lista("Disp")="N" Then Response.Write "selected" End If%>>Não</option>    </select></td>      </tr>      <tr>        <td colspan="2">          <p align="center">          <input type="hidden" name="ID" value="<%= lista("ID")%>">        <input type="submit" value="Alterar"><input type="reset" value="Desfazer" name="reset">        </td>      </tr>    </table></div></form><div align="center">  <center>    <table border="0" cellpadding="0" cellspacing="0">      <tr>        <td width="330" align="center">         <font face="Tahoma">        <form method="post" action="deletar.asp">        <input type="hidden" name="ID" value="<%= lista("ID")%>">        <input type="submit" value="          Deletar          " name="deletar">        </form>  </font></td>      </tr>    </table>  </center></div><hr size="1"><%lista.MoveNext%> <%loop%> <%end if%><% FechaConexao %></body></html>
o que pode ser galera?

 

Atenciosamente,

Caio Osman

Compartilhar este post

Link para o post
Compartilhar em outros sites

Luan Tavares    0

Luan Tavares
Postado

Voce deve estar enviando uma variavel de valor nulo numa coluna do banco de dados que e de um tipo que nao aceita valores nulos. assim deve dar erro na hora de jogar dados no banco de dados...você deve ter uma coluna chamada presidente que nao aceite valores nulos...deve ser isso :lol:

Compartilhar este post

Link para o post
Compartilhar em outros sites

manga    0

manga
Postado

Acho que é isso mesmo. Vá na estrutura do banco Access e no campo correspondente sete Permitir comprimento 0 = SimT+ B)

Compartilhar este post

Link para o post
Compartilhar em outros sites

caioosman    0

caioosman
Postado

Olá Silas, a linha 19 é a que está em vermelho agora.Valeu Manga e Luan, vou conferir se isso resolve o problema!Abraços!Atenciosamente,Caio Osman

Compartilhar este post

Link para o post
Compartilhar em outros sites

caioosman    0

caioosman
Postado

Manga e Luan, fiz isso que vocês falaram e aceitou, só que deu problema e perdeu os dados na alteração (comprimento 0)... acho que o problema não está no bd.

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