ñ sei como usar

[CafeNeon 0]

Galera, novamente aki estou, pedindo help aos papas do ASP , rsrs ...

 

Estou elaborando uma página simples de envio de texto ao banco de dados, e preciso apenas trocar os 'enter' por '<br>' .... Simples né? porém já procurei nos meu livros e aki nos tópicos como usar, mas não encontrei, segue abaixo o código da página. Se alguém puder dar um help, ficarei eternamente grato !!! rsrs ...

 

if request.QueryString("enviar")="true" then

vtexto=request.Form("texto")

set verificar=con.execute("SELECT * FROM empresa ORDER BY ID DESC")

if verificar.EOF then

id=1

else

id=verificar("ID")

id=id+1

end if

sql = "INSERT INTO empresa(texto) VALUES('"&vtexto&"')"

con.execute(sql)

end if

[ultra 0]

Replace(vtexto, chr(13), "<BR>")Tenta assim.... deve funcionar

[dark0 0]

ultra .. eu estava utilizando uns lances aqui ..ASP + Ajax + Banco Access +Javascript ..Tentei fazer desse modo tradicional .. e nao tava funfando ..Mudei pra CHR(10) .. e resolveu o problema Sabe pq?Rs.. fiquei sem resposta tambem.. mas resolvi o problema

[ultra 0]

É... já usei esse chr(10) e funcionouacho q era esse código mesmo... o 13 deve ser outra coisa

[dark0 0]

heheheeh possivel..mas lembro q antes de usar com ajax.. me parece q era o 13 mesmoMas num sei mais.. tenho programado só com ajax mesmo.. rsabraço

[CafeNeon 0]

Galera,... valew pelos tokes ...o replace tá funfando perfeitamente ... porém estranhamente, agora não tá mais inserindo no BD ... q m***** ..será q dá pra identificar o problema ???<%if request.QueryString("enviar")="true" thenvtexto = Replace(request.Form ("texto"), chr(13), "<br>")set verificar=con.execute("SELECT * FROM empresa ORDER BY ID DESC")if verificar.EOF thenid=1elseid=verificar("ID")id=id+1end ifsql = "INSERT INTO empresa (texto) VALUES('"&vtexto&"')"con.execute(sql)end if%>Vlw.

[dark0 0]

Dando uma olhadela por cima .. eu vi o seguinte

 

<%

if request.QueryString("enviar")="true" then

vtexto = Replace(request.Form ("texto"), chr(13), "<br>")

set verificar=con.execute("SELECT * FROM empresa ORDER BY ID DESC")

if verificar.EOF then

id=1

else

id=verificar("ID")

id=id+1

end if

sql = "INSERT INTO empresa (texto) VALUES('"&vtexto&"')"

con.execute(sql)

end if

 

%>

Perceba q você esta comparando a "TRUE"

 

Com aspas ..

 

Não deveria ser sem as aspas?

 

<%

if request.QueryString("enviar")=true then

vtexto = Replace(request.Form ("texto"), chr(13), "<br>")

set verificar=con.execute("SELECT * FROM empresa ORDER BY ID DESC")

if verificar.EOF then

id=1

else

id=verificar("ID")

id=id+1

end if

sql = "INSERT INTO empresa (texto) VALUES('"&vtexto&"')"

con.execute(sql)

end if

 

%>

[CafeNeon 0]

Dark,eu corrigi o eskema do 'true' .. porém continua não incluindo .... cara ... ñ sei mais o q olhar .. to perdido ....eu só preciso pegar o que está no textarea ('texto') ... e incluir no BD ... na coluna 'texto' tb ..ele tá dando erro nesta linha:con.execute(sql) ...saberia do q se trata ??? pois já alterei várias coisas ...Obrigado! Vlw ...

[dark0 0]

posta o erro pra nós..

[CafeNeon 0]

Dark,

então cara ...

 

abaixo segue o código que estou usando ... o erro não tá aparecendo mais, porém continua não funcionando.

 

O erro é:

Microsoft JET Database Engine (0x80004005)

A operação deve usar uma consulta atualizável.

insere.asp, line 14 <--- con.execute (sql)

 

 

========================================

<%

Constring="Provider=Microsoft.Jet.OLEDB 4.0; DataSource = "&Server.MapPath (banco.mdb)

set con = server.CreatObject ("ADODB.Connection")

con.open Constring

%>

========================================

<%

<!-- #include file "conexao_inc" -->

<%

if request.QueryString("enviar")=true then

vtexto = Replace(request.Form ("texto"), chr(13), "<br>")

set verificar=con.execute("SELECT * FROM empresa ORDER BY ID DESC")

if verificar.EOF then

id=1

else

id=verificar("ID")

id=id+1

end if

sql = "INSERT INTO empresa (texto) VALUES('"&vtexto&"')"

con.execute(sql)

end if

%>

[dark0 0]

cara, erro de "A Operação deve ser uma consulta atualizável" é erro de permissão!Se você está rodando o codigo no Servidor, provavelmente na pasta onde você colocou o banco não tem permissão de escrita .. por isso não grava!O que aquela SQL Verificar faz?Se o erro for o q eu escrevi ali.. reveja as permissões!Abraço