Ir para conteúdo
Fórum Script Brasil
  • 0

(Resolvido) Erro no comando Update


Wnagot

Pergunta

Amigos, estou tendo dificuldade com o comando abaixo em uma pag ASP, poderiam me ajudar? Muito Obrigado!

Código:

<%

Dim Conn

Dim RS

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

ConnString="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=e:\home\massacritica\dados\massa.mdb;"

Conn.Open ConnString

InstrucaoSQL = "UPDATE cadastro set semestre = '"&semestre&"', nome = '"&nome&"', rg = '" & rg & "', telefone ='" & telefone & "', celular = '" & celular & "', email = '" & email & "', id_controle = "& id_controle", destino ='" & destino & "', prihorario ='" & prihorario & "', dia_1 ='" & dia_1 & "', seghorario ='" & seghorario & "', dia_2 ='" & dia_2 & "', prisaida ='" & prisaida & "', dia_3 ='" & dia_3 & "', segsaida ='" & segsaida & "', dia_4 ='" & dia_4 & "', tersaida ='" & tersaida & "', dia_5 = '" & dia_5 & "', observacao = '" & observacao & "' WHERE id ="& id

Set RS = Conn.Execute (InstrucaoSQL)

Conn.Close

Set RS = Nothing

Set Conn = Nothing

Response.redirect("atualiza_ok.asp")

%>

ERRO:

Microsoft VBScript compilation error '800a0401'

Expected end of statement

/grava_altera.asp, line 36

InstrucaoSQL = "UPDATE cadastro set semestre = '"&semestre&"', nome = '"&nome&"', rg = '" & rg & "', telefone ='" & telefone & "', celular = '" & celular & "', email = '" & email & "', id_controle = "& id_controle", destino ='" & destino & "', prihorario ='" & prihorario & "', dia_1 ='" & dia_1 & "', seghorario ='" & seghorario & "', dia_2 ='" & dia_2 & "', prisaida ='" & prisaida & "', dia_3 ='" & dia_3 & "', segsaida ='" & segsaida & "', dia_4 ='" & dia_4 & "', tersaida ='" & tersaida & "', dia_5 = '" & dia_5 & "', observacao = '" & observacao & "' WHERE id ="& id

---------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------^

Link para o comentário
Compartilhar em outros sites

6 respostass a esta questão

Posts Recomendados

  • 0

Fera a única coisa que pode estar causando esse erro é que na expressão SQL você não a está finalizando com ponto e virgula assim:

InstrucaoSQL = "UPDATE cadastro set semestre = '"&semestre&"', nome = '"&nome&"', rg = '" & rg & "', telefone ='" & telefone & "', celular = '" & celular & "', email = '" & email & "', id_controle = "& id_controle", destino ='" & destino & "', prihorario ='" & prihorario & "', dia_1 ='" & dia_1 & "', seghorario ='" & seghorario & "', dia_2 ='" & dia_2 & "', prisaida ='" & prisaida & "', dia_3 ='" & dia_3 & "', segsaida ='" & segsaida & "', dia_4 ='" & dia_4 & "', tersaida ='" & tersaida & "', dia_5 = '" & dia_5 & "', observacao = '" & observacao & "' WHERE id ="& id & ";"

Deve resolver mais pelo sim pelo não vou mover seu tópico para a sessão de ASP do forum!

Link para o comentário
Compartilhar em outros sites

  • 0

Opa, experimente assim:

InstrucaoSQL = "UPDATE cadastro set semestre = '"&semestre&"', nome = '"&nome&"', rg = '" & rg & "', telefone ='" & telefone & "', celular = '" & celular & "', email = '" & email & "', id_controle = "& id_controle &", destino ='" & destino & "', prihorario ='" & prihorario & "', dia_1 ='" & dia_1 & "', seghorario ='" & seghorario & "', dia_2 ='" & dia_2 & "', prisaida ='" & prisaida & "', dia_3 ='" & dia_3 & "', segsaida ='" & segsaida & "', dia_4 ='" & dia_4 & "', tersaida ='" & tersaida & "', dia_5 = '" & dia_5 & "', observacao = '" & observacao & "' WHERE id ="& id & ""

Abços.

Editado por rodrigotnoma
Link para o comentário
Compartilhar em outros sites

  • 0

para encontrar mais facil use um response.write na sql

erro:

id_controle = "& id_controle"
em vez disso
Set RS = Conn.Execute (InstrucaoSQL)
Conn.Close 
Set RS = Nothing
Set Conn = Nothing
use simplesmente
Conn.Execute (InstrucaoSQL)
se não resolver use...
InstrucaoSQL="..."
response.write InstrucaoSQL
response.end()

imprima na tela e analise sua sql

Link para o comentário
Compartilhar em outros sites

Visitante
Este tópico está impedido de receber novos posts.


  • Estatísticas dos Fóruns

    • Tópicos
      152,3k
    • Posts
      652,4k
×
×
  • Criar Novo...