Estou com o seguinte problema: no código abaixo quero gravar a data no campo DataClie e exibi-la em outra página (o campo com a data é o último da lista). O problema é que insiro uma data no formato "dd/mm/aaaa" e, na hora de exibir, aparece no formato "mm/dd/aaaa". Alguém saberia me dizer o que está errado no código abaixo? Obrigado.
data = "#" & FormatDateTime(Day(date()) & "/" & Month(date()) & "/" & Year(date()), 0) & "#"
%>
A linha abaixo é só para mostrar o que estou armazenando no campo data. Depois que consertar o problema, ele vai cair fora.
<td><span class="style48"><%Response.Write "Hoje é: " & data %></td>
<%
SQLInsert = "Insert Into TabClie (EmpClie, NomeClie, CargoClie, EnderecoClie, CidadeClie, EstadoClie, CEPClie, DDDFoneClie, FoneClie, DDDFaxClie, FaxClie, EmailClie, MensClie, DataClie)"
SQLInsert = SQLInsert & " Values ("
SQLInsert = SQLInsert & "'" & Request.Form("empresa") & "',"
SQLInsert = SQLInsert & "'" & Request.Form("nome") & "',"
SQLInsert = SQLInsert & "'" & Request.Form("cargo") & "',"
SQLInsert = SQLInsert & "'" & Request.Form("endereco") & "',"
SQLInsert = SQLInsert & "'" & Request.Form("cidade") & "',"
SQLInsert = SQLInsert & "'" & Request.Form("estado") & "',"
SQLInsert = SQLInsert & "'" & Request.Form("cep") & "',"
SQLInsert = SQLInsert & "'" & Request.Form("ddd1") & "',"
SQLInsert = SQLInsert & "'" & Request.Form("fone") & "',"
SQLInsert = SQLInsert & "'" & Request.Form("ddd2") & "',"
SQLInsert = SQLInsert & "'" & Request.Form("fax") & "',"
SQLInsert = SQLInsert & "'" & Request.Form("e_mail") & "',"
SQLInsert = SQLInsert & "'" & Request.Form("msg") & "',"
SQLInsert = SQLInsert & "'" & Request.Form("data") & "')"
conProCursos.Execute(SQLInsert)
- LarPhozyHah likes this