Não Sei Fazer

[Guest Guest]

eu tenho esse codigo que atualiza as informações no meu banco de dados,

estou usando IIS com ACESS 97

o codigo está assim

<%

Option Explicit

Response.Expires = 0

Dim objConn, strQuery, sql_query, RsQuery, campo, sql, autonum

Dim valor, ObjRs

valor = Request.Form("valor")

autonum = Request.Form("autonum")

Set objConn = Server.CreateObject("ADODB.Connection")

objConn.Open "DBQ=" & Server.MapPath("banco.mdb") & ";Driver={Microsoft Access Driver (*.mdb)}","username","password"

strQuery = "UPDATE tabela SET valor='"&valor&"' WHERE autonum ="&autonum

On error Resume Next

'Executaa inserção no Banco de Dados

Set ObjRs = objConn.Execute(strQuery)

'Fecha o Objeto de Conexão

objConn.close

Set objRs = Nothing

Set objConn = Nothing

if err = 0 Then

response.redirect "deucerto.asp"

end if

%>

mais seu eu tento gravar a pagina fica em branco... dai eu apaguei a linha On error Resume Next

e ele me deu um erro

Microsoft OLE DB Provider for ODBC Drivers (0x80040E07)

[Microsoft][Driver ODBC para Microsoft Access] Tipo de dados imcompatível na expressão de critério.

/arquivo.asp, line 18

e a linha 18 é:

'Executaa inserção no Banco de Dados

Set ObjRs = objConn.Execute(strQuery)

[cyberalexxx]

strQuery = "UPDATE tabela SET valor="&valor&" WHERE autonum ="&autonum

Não seu usa aspas simples em campos numéricos.

[]'s

[Guest Guest]

eu já tinha tentando mudar para aspas simples aspas duplas e não deu certo

[cyberalexxx]

não é simples e nem dupla é sem aspas. tentou dessa forma q eu passei???

strQuery = "UPDATE tabela SET valor=" & valor & " WHERE autonum =" & autonum

[Guest Guest]

eu tentei.. e a pagina continua em branco....

dai seu apago o erron resume next ele dá aquele erro

[Microsoft][Driver ODBC para Microsoft Access] Erro de sintaxe na instrução UPDATE.

não sei mais o que fazer

[ViniciusJau]

cara... eu já tive esse prob..

verifica se o seu form o nome do campo está batendo com o seu request form...

[RAFBRASIL]

strQuery = "UPDATE tabela SET valor='"&valor&"' WHERE autonum ="&autonum

Pessoal, desculpe a minha iguinorância, mas não está faltando um fechamento de aspas no final desse comando? É que a expressão à direita da igualdade, do jeito que está não está formando uma string...

[Principe]

mas pra que string? o campo é autonumeração ou seja .. numero !

"update tabela set valor = '"&valor&"' where autonum = "&autonum

^ tem que funcionar ^

a não ser que o access97 não reconhessa o comando sql update rss..

[Guest Guest]

Putz, é que eu sempre só usei strings nas SQLs, mesmo com argumentos numéricos. E funciona!

[RAFBRASIL]

Esquecii de me logar no post acima. É que sempre montava os comandos sqls em uma string conntendo todos os argumentos e valores e comandos e operadores. E funciona. Por isso achei que tinha que ser uma string, nunca fiz da forma que vces sugeritam!

Vivendo e aprendendo!

[Guest - Rafael -]

cara..depende de como ta o banco..

n mexo no asp n..mas pelo sql se for do tipo float eu tenho q colocar entre aspas simples mas se for do tipo int n coloca aspas..

se o campo valor for float e o campo autonum int

strQuery = "UPDATE tabela SET valor='" & valor & "' WHERE autonum =" & autonum

se o campo valor for float e o campo autonum for float

strQuery = "UPDATE tabela SET valor='" & valor & "' WHERE autonum ='" & autonum &"'"

se o campo valor for int e o campo autonum int

strQuery = "UPDATE tabela SET valor=" & valor & " WHERE autonum =" & autonum

se o campo valor for int e o campo autonum float

strQuery = "UPDATE tabela SET valor=" & valor & " WHERE autonum ='" & autonum &"'"

o mais lógico seria o campo valor ser float e o campo autonum int..

[Guest Guest]

quis dizer q n mexo com access hehehe