AlexMunhoz Postado Junho 2, 2005 Denunciar Share Postado Junho 2, 2005 o que tem de errado com esse codigo... (Tudo?)<%@language=vbscript%><%Option explicitresponse.expires = 0dim localbd, meubd, rsUpdate, rs, usuario, senha, local, codigousuario=request.querystring("usuario")senha=request.querystring("senha")local=request.querystring("local")localbd ="driver={microsoft access driver (*.mdb)};dbq=" & server.mappath("../bd/bd.mdb")set meubd=server.createobject("adodb.connection")set rsUpdate=server.createobject("adodb.recordset")meubd.open localbdrsUpdate.open="UPDATE acesso set (login,senha,local) values('"&usuario&"','"&senha&"','"&local&"') where codigo="& codigo &"", meubd'on error resume nextset rs = meubd.execute(rsUpdate)meubd.closeset rs = nothingset meubd = nothingif err = 0 then response.redirect "sucesso.asp" else response.redirect "alerta.asp"end if%>Ele ta dando esse erro.Tipo de erro:Erro de compilação do Microsoft VBScript (0x800A0401)Fim da instrução esperado/cdasp/adm/senha_alterar.asp, line 16, column 125rsUpdate.open="UPDATE acesso set (login,senha,local) values('"&usuario&"','"&senha&"','"&local&"') where codigo="& codigo &"", meubdjá tentei fazer de um monte de forma e até agora não deu certo!!!alguém pode me ajudar? Link para o comentário Compartilhar em outros sites More sharing options...
0 cyberalexxx Postado Junho 2, 2005 Denunciar Share Postado Junho 2, 2005 [/code] Link para o comentário Compartilhar em outros sites More sharing options...
0 TIO CARNEGO Postado Junho 3, 2005 Denunciar Share Postado Junho 3, 2005 rsUpdate.open "UPDATE acesso set(login ='"&usuario&"', senha='" & senha & "', local='" & local & "' where codigo = "& codigo , meubd Link para o comentário Compartilhar em outros sites More sharing options...
0 AlexMunhoz Postado Junho 3, 2005 Autor Denunciar Share Postado Junho 3, 2005 [/code] Tipo de erro:Erro de compilação do Microsoft VBScript (0x800A0401)Fim da instrução esperado/cdasp/adm/senha_alterar.asp, line 16, column 128rsUpdate.open="UPDATE acesso set(login ='"&usuario&"', senha='" & senha & "', local='" & local & "') where codigo = & codigo & ", meubd-------------------------------------------------------------------------------------------------------------------------------^ Link para o comentário Compartilhar em outros sites More sharing options...
0 AlexMunhoz Postado Junho 8, 2005 Autor Denunciar Share Postado Junho 8, 2005 SOCORRO!!!!! Link para o comentário Compartilhar em outros sites More sharing options...
0 cyberalexxx Postado Junho 8, 2005 Denunciar Share Postado Junho 8, 2005 Link para o comentário Compartilhar em outros sites More sharing options...
0 AlexMunhoz Postado Junho 8, 2005 Autor Denunciar Share Postado Junho 8, 2005 valeu amigão, agora deu certinho... Link para o comentário Compartilhar em outros sites More sharing options...
0 cyberalexxx Postado Junho 8, 2005 Denunciar Share Postado Junho 8, 2005 valeu amigão, agora deu certinho... ok!!!Tópico Fechado!! Link para o comentário Compartilhar em outros sites More sharing options...
Pergunta
AlexMunhoz
o que tem de errado com esse codigo... (Tudo?)
<%@language=vbscript%>
<%
Option explicit
response.expires = 0
dim localbd, meubd, rsUpdate, rs, usuario, senha, local, codigo
usuario=request.querystring("usuario")
senha=request.querystring("senha")
local=request.querystring("local")
localbd ="driver={microsoft access driver (*.mdb)};dbq=" & server.mappath("../bd/bd.mdb")
set meubd=server.createobject("adodb.connection")
set rsUpdate=server.createobject("adodb.recordset")
meubd.open localbd
rsUpdate.open="UPDATE acesso set (login,senha,local) values('"&usuario&"','"&senha&"','"&local&"') where codigo="& codigo &"", meubd
'on error resume next
set rs = meubd.execute(rsUpdate)
meubd.close
set rs = nothing
set meubd = nothing
if err = 0 then
response.redirect "sucesso.asp"
else
response.redirect "alerta.asp"
end if
%>
Ele ta dando esse erro.
Tipo de erro:
Erro de compilação do Microsoft VBScript (0x800A0401)
Fim da instrução esperado
/cdasp/adm/senha_alterar.asp, line 16, column 125
rsUpdate.open="UPDATE acesso set (login,senha,local) values('"&usuario&"','"&senha&"','"&local&"') where codigo="& codigo &"", meubd
já tentei fazer de um monte de forma e até agora não deu certo!!!
alguém pode me ajudar?
Link para o comentário
Compartilhar em outros sites
7 respostass a esta questão
Posts Recomendados