Usamos cookies para medir audiência e melhorar sua experiência. Você pode aceitar ou recusar a qualquer momento. Veja sobre o iMasters.
Eu to fazendo a pagina pra inserir noticias, tem a primeira que você cadastra os dados da noticia e a segunda que deveria cadastrar no banco:A primeira, vejam se eu fiz alguma coisa errada....
<%@LANGUAGE="VBSCRIPT"%><html><head><title>Inserindo Noticias</title><script LANGUAGE="JAVASCRIPT">function validaForm() {if (documento.formLivro.txtCodigo.value.lenght <1){alert("O campo Codigo da Noticia não pode ficar em branco.");formLivros.txtCodigo.focus();return false;}if (documento.formLivro.txtTitulo.value.lenght <1){alert("O campo Titulo não pode ficar em branco.");formLivros.txtCodCategoria.focus();return false;}if (documento.formLivro.txtData.value.lenght <1){alert("O campo Data não pode ficar em branco.");formLivros.txtTitulo.focus();return false;}if (documento.formLivro.txtPre.value.lenght <1){alert("O campo Pre-News não pode ficar em branco.");formLivros.txtAutor.focus();return false;}if (documento.formLivro.txtPre.value.lenght >60){alert("O campo Pre-News não pode ter mais do que 60 caracteres.");formLivros.txtAutor.focus();return false;}if (documento.formLivro.txtNews.value.lenght <1){alert("O campo News não pode ficar em branco.");formLivros.txtPreco.focus();return false;}if (documento.formCapa.txtNovidade.value.lenght <1){alert("O campo Novidade não pode ficar em branco.");formLivros.txtCapa.focus();return false;}if (documento.formCapa.txtNovidade.value.lenght >1){alert("O campo Novidade deve conter apenas S / N.");formLivros.txtCapa.focus();return false;}return true;}</SCRIPT>.[html].<form name="formLivro" method="POST" ACTION="adiciona_news_add.asp" onSubmit="return validaForm(this);"><span class="style1">Inclusão de Noticias (lembre-se, é um grande poder mas também uma grande responsabilidade, use-o com consciência): </span><br><br><span class="style1">Informe os dados da noticia a serem inseridos. Os campos com (*) são de preenchimento obrigatorio.</span><br><table border="0" cellpadding="0" cellspacing="0" width="100%"><tr><td width="20%" bgcolor="#CCCCCC"><span class="style1">Codigo da Noticia : </span></td><td width="80%"><input type="text" name="txtCodigo"> * obs: Veja o codigo da noticia mais recente e coloque o proximo numero pra essa noticia </td></tr><tr><td width="20%" bgcolor="#999999"><span class="style1">Titulo: </span></td><td width="80%"><input name="txtTitulo" type="text" id="txtTitulo"> *</td></tr><tr><td width="20%" bgcolor="#CCCCCC"><span class="style1">Data (dd/mm/aa) : </span></td><td width="80%"><input name="txtData" type="text" id="txtData"> * </td></tr><tr><td width="20%" bgcolor="#999999"><span class="style1">Pre-News (max:60letras) : </span></td><td width="80%"><textarea name="txtPre" id="txtPre"></textarea> *</td></tr><tr><td width="20%" bgcolor="#CCCCCC"><span class="style1">News: </span></td><td width="80%"><textarea name="txtNews" id="txtNews"></textarea> *</td></tr><tr><td width="20%" bgcolor="#999999"><span class="style1">Pagina Inicial (S/N) : </span></td><td width="80%"><input name="txtNovidade" type="text" id="txtNovidade"> *</td></tr><tr><td width="20%"></td><td width="80%"><input type="submit" value="Inserir" name="btInsere"><input type="reset" value="Limpar Campos" name="btLimpa"></td></tr></table></form>.[html].a pagina que envia pro banco(adiciona_news_add.asp):
<%@LANGUAGE="VBSCRIPT"%><%Option Explicit%><!--#Include file="dbConexao.inc"--><%DIM conexaoDataBaseDIM strIns, rsLivrosDIM varCodigo, varTitulo, varData, varPre, varNews, varNovidadevarCodigo = TRIM(Request.QueryString("txtCodigo"))varTitulo = Request.QueryString("txtTitulo")varData = TRIM (Request.QueryString("txtData"))varPre = TRIM (Request.QueryString("txtPre"))varNews = Request.QueryString("txtNews")varNovidade = TRIM (Request.QueryString("txtNovidade"))varTitulo = REPLACE(varTitulo, "'" , " " )varData = REPLACE(varData, "'" , " " )varPre = REPLACE(varPre, "'" , " " )varNovidade = REPLACE(varNovidade, "'" , " " )strINS = " INSERT into News "strINS = strINS & "(CodLivro, Titulo, data, prenews, news, Lancamento)"strINS = strINS + "VALUES ('" + varCodigo + "',"strINS = strINS + "'" + varTitulo + "',"strINS = strINS + "'" + varData + "',"strINS = strINS + "'" + varPre + "',"strINS = strINS + "'" + varNews + "',"strINS = strINS + "'" + varNovidade + "')"Call abreConexaoSet rsLivros = conexaoDataBase.Execute(strINS)%><style type="text/css"><!--.style1 { font-family: Arial, Helvetica, sans-serif; font-size: 12px; color: #333333;}--></style><div align="center"><span class="style1">A noticia: <strong> <% = varTitulo %></strong> foi cadastrada com sucesso</span></div><%Call fechaConexaoSet rsLivros = Nothing%>
esse é o erro:Tipo de erro:Microsoft OLE DB Provider for ODBC Drivers (0x80004005)[Microsoft][Driver ODBC para Microsoft Access] A operação deve usar uma consulta atualizável./editaouadiciona/adiciona_news_add.asp, line 33Desculpa postar codigos tão grandes :PSe alguém puder me ajudar a achar o erro...
Carregando comentários...