' Open Connection to the database
set conn = Server.CreateObject("ADODB.Connection")
conn.Open xDb_Conn_Str
Select Case a
Case "A": ' Add
' Open record
strsql = "SELECT * FROM [links]"
set rs = Server.CreateObject("ADODB.Recordset")
rs.Open strsql, conn, 1, 2
rs.AddNew
tmpFld = Trim(x_nome_site)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("nome_site") = tmpFld
tmpFld = Trim(x_url_site)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("url_site") = tmpFld
tmpFld = Trim(x_descricao_site)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("descricao_site") = tmpFld
rs.Update
rs.Close
Set rs = Nothing
conn.Close
Set conn = Nothing
Response.Clear
Response.Redirect "links.asp"
End Select
%>
Função Data
Started By Bruno M., 02/05/2003, 16:39
6 replies to this topic
#1
Bruno M.
-
- Usuários
-
- 10 posts
Novato no fórum
- Sexo:Não informado
Posted 02/05/2003, 16:39
Olá tenho o código abaixo e gostaria de colocar a data no banco de dados na hora que a pessoa se cadastrar como faço?
#2
Marcio_
Marcio_
-
- Visitantes
Posted 02/05/2003, 17:13
Olá...
Crie uma variavel e acrescenta a função now
Ex:
Dim hora
hora = Now()
Ai vc cria um campo no banco que vai receber esta variavel....
Crie uma variavel e acrescenta a função now
Ex:
Dim hora
hora = Now()
Ai vc cria um campo no banco que vai receber esta variavel....
#3
Bruno M.
-
- Usuários
-
- 10 posts
Novato no fórum
- Sexo:Não informado
Posted 02/05/2003, 17:32
Cara valeu pela ajuda, mais so meio novo no assunto como faço para por a funcao? em que lugar!Olá...
Crie uma variavel e acrescenta a função now
Ex:
Dim hora
hora = Now()
Ai vc cria um campo no banco que vai receber esta variavel....
#4
Marcio_
Marcio_
-
- Visitantes
Posted 02/05/2003, 22:46
Suponhemos (nossa, será que essa palavra existe ..hehehe) que tenho um form, com tres campos que irão ser salvos em um BD:
Os campos são:
Nome
Email
Cidade
E no Banco de Dados eu tenhos os seguintes campos:
Nome = vai receber o campo do formulário "nome"
Email = vai receber o campo do formulário "email"
Cidade = vai receber o campo do formulário "cidade"
Data_cad = irá receber a variavel que vamos criar
Vamos pro codigo:
Se você olhar o codigo vai notar que a Variavel Data_Cad recebeu o comando NOW(), comando esse que mostra a Data e a Hora.
Entendeu...
Agora é só vc adaptar isso no seu codigo.
Qualquer coisa da um grito!!!!
Os campos são:
Nome
Cidade
E no Banco de Dados eu tenhos os seguintes campos:
Nome = vai receber o campo do formulário "nome"
Email = vai receber o campo do formulário "email"
Cidade = vai receber o campo do formulário "cidade"
Data_cad = irá receber a variavel que vamos criar
Vamos pro codigo:
<%
set conn = Server.CreateObject("ADODB.Connection")
conn.Open xDb_Conn_Str
Dim Nome, Email, Cidade, Data_Cad, SQL
Nome = TRIM(request.form("nome")
Email = TRIM(request.form("email")
Cidade = TRIM(request.form("cidade")
Data_cad = Now()
SQL = "INSERT INTO tbl_cadastro (nome, email, cidade, data_cad)"&_
"VALUES ('"&Nome&"', '"&Email&"', '"&Cidade&"', '"&Data_cad&"')"
Conn.Execute SQL
%>Se você olhar o codigo vai notar que a Variavel Data_Cad recebeu o comando NOW(), comando esse que mostra a Data e a Hora.
Entendeu...
Agora é só vc adaptar isso no seu codigo.
Qualquer coisa da um grito!!!!
#5
Bruno M.
-
- Usuários
-
- 10 posts
Novato no fórum
- Sexo:Não informado
Posted 03/05/2003, 11:35
Valeu cara funcionou perfeitamente!
#6
K I L L I N G
-
- Banidos
-
- 398 posts
Batera na veia, ASP no coração
- Sexo:Não informado
Posted 03/05/2003, 18:36
Valeu cara funcionou perfeitamente!
Ae cara só para esclarecer... vc declara uma variável com Dim... ex Dim olá (declarei olá)bem o now() vc pode fazer assim olha...
<%=Time%> as horas todas 12:15:18 PM
<%=Hour(Now)%> mostra apenas as horas sacou? ex : 12
<%=minute(Now)%> apenas os minutos ex : 15...
ae vc declara uma variavel e coloca o que desejar(horas, minutos etc..)
ex:
<%
Dim horas
Dim msg
horas = Hour(Now)
if horas > 6 and horas < 12 then
msg = "Bom Dia"
End if
Else
msg = "Boa noite"
%>
<%=msg%>
aki fiz um dakeles códigos de Bom dia , boa tarde boa noite mas fiz só com bom dia e boa noite...
se for mais de 6hs e menus de 12hs mensagen = "Bom dia"
ao contrário
msg ="boa noite "
sacou???
ABRAÇOS
-ihP-
http://www.fiquecomigo.com
http://www.fiquecomigo.com.br
Encontre o amor da sua vida aqui!
Vinícius Nunes Lage
vinibaterabol@msn.com
http://www.fiquecomigo.com.br
Encontre o amor da sua vida aqui!
Vinícius Nunes Lage
vinibaterabol@msn.com
#7
Leandro
Leandro
-
- Visitantes
Posted 04/05/2003, 15:00
Ae KILLING e só para esclarecer um pouco você...
Primeiro, declaração de variavel só se faz necessaria se o option explicit for usado, as variaveis podem ser estanciadas no momento que vc desejar, sem precisar de qualquer declaracao (se o option explicit n for usado)..
Segundo, nao é permitido o uso de caracteres especiais em variaveis, como por exemplo olá..
Terceira, a sintaxe do seu exemplo está errada, seria.. If.. Else.. End if e não If.. End if .. Else...
Só uma dica cara, sei que vc ta comecando e quer mostrar que sabe tambem, mas nao poe exemplo errado nao se nao confunde o pessoal que tb ta comecando, dá uma testada na tua casa, lê mais, antes de postar algo que vc tenha duvida...
Primeiro, declaração de variavel só se faz necessaria se o option explicit for usado, as variaveis podem ser estanciadas no momento que vc desejar, sem precisar de qualquer declaracao (se o option explicit n for usado)..
Segundo, nao é permitido o uso de caracteres especiais em variaveis, como por exemplo olá..
Terceira, a sintaxe do seu exemplo está errada, seria.. If.. Else.. End if e não If.. End if .. Else...
Só uma dica cara, sei que vc ta comecando e quer mostrar que sabe tambem, mas nao poe exemplo errado nao se nao confunde o pessoal que tb ta comecando, dá uma testada na tua casa, lê mais, antes de postar algo que vc tenha duvida...
1 user(s) are reading this topic
0 membro(s), 1 visitante(s) e 0 membros anônimo(s)
