Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

Jow Xavier

dados já selecionado do banco de dados no select

Recommended Posts

mas o erro persiste?

Compartilhar este post


Link para o post
Compartilhar em outros sites

mas voce reclama de atualização epostou um insert aqui

 

onde esta dando erro?

Compartilhar este post


Link para o post
Compartilhar em outros sites

Opá Mario é q acontece um seguinte um postei um print errado desculpa ai cara, então sempre qd eu tento alterar com um campo select no meu formulário ele ñ altera, só altera se for um <input type="text"> ... Mandei imprimir na tela a minha sql ficou assim

UPDATE projetos SET data_alt = '19/5/2008', hora_alt = '18:15:44', cliente = 'Jonathan Xavier ', jobs='Teste', status='Alteração', prazo='01/06/2008', obs='Observação', resp='Jonathan Xavier' WHERE id =2

Compartilhar este post


Link para o post
Compartilhar em outros sites

Qual é a mensagem de erro?

Compartilhar este post


Link para o post
Compartilhar em outros sites

Qual é a mensagem de erro?

Exato, qual?

Compartilhar este post


Link para o post
Compartilhar em outros sites

Posta todo o código da sua página de UPDATE, porque ficar em branco mesmo sem o On Error Next Resume é sinal de que não tem nada errado na interpretação do código, o que não significa que o código esteja funcionando do jeito que você precisa.

Compartilhar este post


Link para o post
Compartilhar em outros sites

<title>Sistema Thatto - Jobs</title>
<%
if session("login") <> true then
  response.redirect "../default.asp"
end if
%>

<!--#include file="../config/conexao.asp"-->
<%

call abre_conectar

data_alt = date
hora_alt = time

'Atrubuição dos valores as respectivas variáveis
cliente = Request.Form("cliente")
jobs = Request.Form("jobs")
status = Request.Form("status")
prazo = Request.Form("prazo")
obs = Request.Form("obs")
resp = Request.Form("resp")

id = Request.Form("id")

If session("nivel") = 1 or session("nivel") = 2 Then 'se for nivel 2 ou nivel 3
sql = "UPDATE projetos SET data_alt = '"&date()&"', hora_alt = '"&time()&"', cliente = '"&cliente&"', jobs='"&jobs&"', status='"&status&"', prazo='"&prazo&"', obs='"&obs&"', resp='"&resp&"' WHERE id ="&id

'Caso ocorra um erro esta função de erro será chamada
'On error Resume Next
'Executa inserção no Banco de Dados 
set tab = cnn.execute(sql)
else 
sql = "UPDATE projetos SET data_alt = '"&date()&"', hora_alt = '"&time()&"', status='"&status&"' WHERE id ="&id
'Caso ocorra um erro esta função de erro será chamada
'On error Resume Next
'Executa inserção no Banco de Dados 
set tab = cnn.execute(sql)
End If


'Fecha o Objeto de Conexão
call fecha_conectar
set tab = nothing 
if err = 0 Then
	'Redireciona o usuário caso não tenha ocorrido erro na transação
	response.redirect "pesquisar_projetos.asp"
end if
%>

Então se eu tirar ele dá erro na minha sql do meu UPDATE conforme já postado

 

Será q é pq eu uso uma verifivação no meu UPDATE ...

Compartilhar este post


Link para o post
Compartilhar em outros sites

Opá galera eu consegui fazer alterar dentro do select na página. Mas aconte um seguinte, preciso listar todos os dados do campo dentro do select , pra trazer os dados estou usando um loop, mas ai dá erro no UPDATE, ou seja só atualiza sem o loop abaixo o código do meu loop.

 

<% while not tab.EOF %>
				<OPTION><%=tab("resp")%></OPTION> 
				<% tab.movenext 
	wend %>

Compartilhar este post


Link para o post
Compartilhar em outros sites

1) Você disse que deu erro na linha 35 quando tira o On Error Next Resume, mas qual o erro? Deve ter mostrado alguma mensagem além da linha.

 

2) Onde está o SELECT do tab?

Compartilhar este post


Link para o post
Compartilhar em outros sites

Então cara qd eu uso o select no meu formulário sem um while, q uso para pegar todos os registro funciona corretamente, agora eu eu uso com WHILE ou sem o On Error Next Resume dá esse erro Microsoft OLE DB Provider for ODBC Drivers (0x80040E14)

[MySQL][ODBC 3.51 Driver][mysqld-5.0.51a-community-nt]You have an error in your SQL syntax; check the manual that corresponds to your MySQL server version for the right syntax to use near '' at line 1

/interno/admin/projetos/altera_dados_projetos.asp, line 31. abaxo o meu select onde eu uso o tab

 

<select name="resp" class="formulario">
						<option <% Response.Write("selected=""selected""") %>><%=tab("resp")%></option>
						<%
sql = "Select * from projetos"  
set tab = cnn.execute(sql) %>
						 
				<% while not tab.EOF %>
				<OPTION><%=tab("resp")%></OPTION> 
				<% tab.movenext 
	wend %>
			  </SELECT>

Compartilhar este post


Link para o post
Compartilhar em outros sites

o que tem na linha 31?

Compartilhar este post


Link para o post
Compartilhar em outros sites

escreve sql na tela e post aqui

Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.