Pagina ASP não funciona!!!

[sbrianti]

Alguem poderia me ajudar, porque dá erro nessas instruções
Dim conBASE
Dim objrs
Dim strSQL

set conBASE = Server.CreateObject("ADODB.Connection")
conBASE.Open "DBteste"

strSQL = "UPDATE tbl_teste SET "
strSQL = strSQL & "nome='"& Request.Form("nome") &"'"
strSQL = strSQL & " WHERE id='"& Request.Form("id") &"'"


conBASE.execute(strSQL)
conBASE.Close
set conBASE = Nothing

Estou fazendo igual a diversos exemplos da net e não funciona..
O banco está com permissão de escrita.

Obrigado
Sidnei

[zemarlon]

Perguntas:

0) QUAL MENSAGEM DE ERRO ESTÁ APARECENDO? Sempre que pedir ajuda sobre um erro, indique qual o erro.

1) é Access? Certeza MESMO que está com permissão de escrita?

2) Já tentou fazer esse UPDATE "na mão", fora do ASP, direto no banco? É bom fazer para saber se o seu comando está bem montado. Ex: UPDATE tbl_teste SET nome = 'Zé Marlon é legal' WHERE id = '33'

3) Faz um tempo que não mecho com essas coisas no ASP e eu fazia função de montagem para evitar de montar SQL na mão, mas se o teu BD é Access, acho que string tem que ser fechada com " (veja que para escrever um " dentro de uma string, você precisa de "").

Código: Selecionar todos

strSQL = "UPDATE tbl_teste SET "
strSQL = strSQL & "nome=""" & Request.Form("nome") & """"
strSQL = strSQL & " WHERE id=""" & Request.Form("id") & """"


E como você também não passou o erro e a gente não sabe se é banco ou sintaxe ou qualquer outra coisa, quando usar o concatenador &, deixe espaço antes e depois. Eu não sei se isso está errado, mas não tenho tempo de testar no meu computador.

Grande abraço e boa sorte.

[sbrianti]

Valeu, más achei mais tarde, era falta de espaço em branco, entre o campo é a virgula.

Sidnei