Campo data cadastrar

[Gustavo Emygdio Barboza 24]

Faz o teste que o Josimar indicou para ver se vai salvar...

[TeixeiraRamos 4]

Josimar e Gustavo,

Obrigado gente, mas por favor, me permita informar o seguinte. Eu não estou inventando nada tudo que vocês estão vendo faz parte de um capítulo de um livro. Nas páginas números 264 a 279, o autor demonstra e comenta algumas linhas do código. Trata-se do livro MsSQL - Guia de Programador - André Milani - Ed. novatec.

Acontece que no livro não tem exemplo de campo com data dai que eu entrei com mais esse campo para aprender.  Todo o código do autor cadastra, altera e exclui registros no banco de dados. Sem Erro!

Só apresenta erro quando entro com o campo "date". 

Se eu tenho que assumir a responsabilidade dos erros que a postagem é minha eu assumo. Mas sinceramente a única coisa que fiz foi entrar no banco de dados incluir mas um campo data e alterei o código nos locais necessários.  

Mas em nenhum momento eu criei:

 

Citar

If Request.QueryString("acao") = "adicionar"

 

Josimar (da terra da minha mulher), conheço PE, terra boa...

Se eu errar naquilo que você sugere pode meter a bronca, puxar orelha...

Aqui coloquei SQL diretamente no HTML. Mas não acontece nada.

'Caso ocorra um erro, prossiga até o tratamento de erro
On error resume next
'Verifica se o arquivo foi chamado a partir de um formulário
If Request.QueryString("acao") = "adicionar" then
   sql =  "INSERT INTO livros (livro, autor, editora, data_inicio) VALUES ('Teste Forum', 'Josimar', 'Josimar Livros', '2017-07-18')" 

Esse formulário chamado gerencia-registro.asp abre com dois link:

Clique aqui para inserir um novo registro.
Clique aqui para visualizar os registros.

Se eu clicar em "...inserir um novo registro..." abre a página inserir.asp  com os campos em brando para entrar com um novo registro.

Se eu clicar em "...visualizar os registros..." abre a página lista.asp onde mostra todos os registros.

Concordo que eu ao entrar com esse campo date posso está errando em alguma coisa (considerando que o Gustavo postou que na função não tem erro) na SQL.

Vou voltar a fazer um exame acurado no código.

Obrigado.

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

[JosimarNew 12]

Não amigo, não estamos aqui pra puxar orelha de ninguém rsrsrs. Nós apenas estamos partilhando de seu problema para tentarmos encontrar uma solução.

 

Você está usando banco de dados mySql ou MsSQL?

 

Vi que acima quando você mencionou o livro do autor você citou MsSQL (Microsoft SQL)

[TeixeiraRamos 4]

Valeu Josimar,

Puxar orelha é só uma força de expressão. Desculpe alguma coisa.

O nome correto do livro é "MySQL - Guia do Programador - autor André Milani - Ed. novatec."

Com relação ao nome do livro desculpe também.

Já fiz diversas tentativas, mas ainda não foi possível.

Continua o erro que aponta para a página gerencia-registro.asp:

Citar

Erro: [MySQL][ODBC 3.51 Driver][mysqld-5.7.13-log]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

  Onde sugere ser a SQL, mas onde?

Mais um vez muito obrigado Josimar pela atenção.

[Gustavo Emygdio Barboza 24]

tente colocar esse trecho no inicio da página asp vai ter que salvar no banco no ato que a página abrir independente de qualquer ação... vamos fazer salvar no banco...

<%

sql =  "INSERT INTO livros (livro, autor, editora, data_inicio) " 
sql = sql & "VALUES ('Teste Forum', 'Josimar', 'Josimar Livros', '2017-07-18')" 
'Executa a expressão SQL no servidor
cnnDB.Execute sql

%>

 

[TeixeiraRamos 4]

Bom dia a todos,

Vamos lá Gustavo e Josimar,

Primeiro vamos a um dos meus erros grave que estava gerando esse "Erro". A função InverteDataMySql abaixo sugerida desde o início:

Function InverteDataMySql(data_inicio)
if not isdate(data_inicio) then exit function
if instr(data_inicio, " ") > 0 then
hora  = split(data_inicio, " ")(1)
end if
InverteDataMySql = year(cdate(data_inicio)) & "-" & month(cdate(data_inicio)) & "-" & day(cdate(data_inicio))
if hora <> "" then InverteDataMySql = InverteDataMySql & " " & hora
End Function 

deveria ficar dentro do formulário gerencia-registro.asp e estava no inserir.asp.

Bastou eu colocar a função no formulário certo e tudo foi resolvido.

Entendo que tem que ser uma coisa de cada vez, mas já pensaram o que tem dentro de uma "form":

checkbox, list/Menu etc e onde vamos achar isso para estudar, fazer, testar?

Desculpes os autores, mas os livros só mostram exemplos de campo texto.

Bem é a vida...se vocês descobrirem livro, apostila etc para estudar HTML com ASP interagindo com MySQL por favor me avise.

Obrigado por tudo, inclusive Josimar tenho um amigo que também não usa função, segundo ele: " sem função... só manipulando as variáveis...". Vou testar depois, sem função, agora Não! Salvei 10 vezes os formulários inclusivo o da função e imprimi.   

Até a próxima e muito sucesso para vocês!!!

 

 

 

 

 

 

 

 

 

[JosimarNew 12]

Olá @TeixeiraRamos, gosto muito dos cursos no Neri Neitzke

Veja o lançamento do curso ASP.NET do mesmo -> Curso ASP.NET

[TeixeiraRamos 4]

Josimar,

Não achei do Neri Neitzke nada sobre ASP,  MySQL?

Curso ASP.NET depois vou querer sim.

Obrigado!

[TeixeiraRamos 4]

Minha gente, boa noite,

Ainda tenho um problema. Nem sempre vou ter que digitar data.

Devo colocar na SQL, NULL?

Estou entrando com registro e, não digito data, mostra erro assim:

Citar

Erro: [MySQL][ODBC 3.51 Driver][mysqld-5.7.13-log]Incorrect date value: '' for column 'data_inicio' at row 1

Direto no banco entro com (NULL) e tudo bem. Mas no ASP não tem condições.

 

[Gustavo Emygdio Barboza 24]

Com relação a função nem me atentei da mesma não estar no arquivo por ser uma função genérica que pode ser usada em várias páginas ASP o melhor seria não colocar na página a ser usada e sim numa página específica de funções e depois dar um include nas páginas que forem usar tais funções desta forma evita até redundâncias de códigos dificultando em manutenções tendo que corrigir em diversas páginas a mesma coisa... exemplo:

 

ARQUIVO FUNCOES.ASP

Function SomaValor(v1,v2)

SomaValor = cdbl(v1)+ cdbl(v2)

End Function

 

Function TiraEspaco(Texto)

for i = 1 to 100

TiraEspaco = replace(Texto," ","")

next

End Function

 

FIM  DO ARQUIVO FUNÇÕES

 

ARQUIVO CLIENTES.ASP

<!--#include file="FUNCOES.ASP"-->

 

<%

if request("botao") = "SALVAR CLIENTE" then

nomecliente  = TiraEspaco(request("nomecliente"))

end if

%>

<form name="form">

...

</form>

FIM DO ARQUIVO CLIENTES.ASP

 

Como pode ver a função tiraespaco não está diretamente na página clientes.asp mas foi referenciada de funcoes.asp do jeito que foi incluída o arquivo é porque está na mesma pasta se estivesse fora desta pasta é só deixar assim:

<!--#include file="../FUNCOES.ASP"-->

 

agora com relação ao campo está vazio lá no banco deve permitir valor nulo...

 

 

 

 

[TeixeiraRamos 4]

OK.

Obrigado, vou aproveitar suas sugestões.

Muito obrigado.

Sucesso para você e sua Família.

Fique com Deus.

[TeixeiraRamos 4]

Pessoal Boa Noite.

Tive um sério de problema. A data só entrava no formulário inserir (INSERT INTO...) com a função.

Ocorre que se Editar tem que entrar com a data novamente. Em fim...tentei de tudo.

Estou tentando entrar com a formatação direto na SQL.

Postei na área MySQL.

Por favor moderador, não sei se aqui poderia fechar.

Pode me ajudar?